mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2025-12-31 14:50:50 -08:00
Code Issues Projects Releases Packages Wiki Activity

*CURRENT-FORM* must be bound to at least an empty statement.

Browse source
This commit is contained in:
jgarcia 2007-10-13 09:47:09 +00:00
parent 7de7e4a471
commit 2b75bb9fad
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/symbols_list.h
View file

@ -1657,7 +1657,7 @@ cl_symbols[] = {
{SYS_ "GC-STATS", SI_ORDINARY, si_gc_stats, 1, OBJNULL},
{SYS_ "*CURRENT-FORM*", SI_SPECIAL, Cnil, -1, OBJNULL},
{SYS_ "*CURRENT-FORM*", SI_SPECIAL, NULL, -1, Cnil},
{SYS_ "CODE-BLOCK", SI_ORDINARY, NULL, -1, OBJNULL},

2
src/c/symbols_list2.h
View file

@ -1657,7 +1657,7 @@ cl_symbols[] = {
{SYS_ "GC-STATS","si_gc_stats"},
{SYS_ "*CURRENT-FORM*","Cnil"},
{SYS_ "*CURRENT-FORM*",NULL},
{SYS_ "CODE-BLOCK",NULL},