Fix compile error in fjsc
parent
7ed56a3cef
commit
4ca90e2a6a
|
@ -356,7 +356,7 @@ M: quotation fjsc-parse ( object -- ast )
|
||||||
: fjsc-compile* ( string -- string )
|
: fjsc-compile* ( string -- string )
|
||||||
'statement' parse ast>> fjsc-compile ;
|
'statement' parse ast>> fjsc-compile ;
|
||||||
|
|
||||||
: fc* ( string -- string )
|
: fc* ( string -- )
|
||||||
[
|
[
|
||||||
'statement' parse ast>> values>> do-expressions
|
'statement' parse ast>> values>> do-expressions
|
||||||
] { } make [ write ] each ;
|
] { } make [ write ] each ;
|
||||||
|
|
Loading…
Reference in New Issue