From 4ca90e2a6a9188bb8427af3928243f1722f9b0cf Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sat, 14 Mar 2009 23:00:29 -0500 Subject: [PATCH] Fix compile error in fjsc --- extra/fjsc/fjsc.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/extra/fjsc/fjsc.factor b/extra/fjsc/fjsc.factor index cf733dbbfd..bc6b8a092f 100755 --- a/extra/fjsc/fjsc.factor +++ b/extra/fjsc/fjsc.factor @@ -356,9 +356,9 @@ M: quotation fjsc-parse ( object -- ast ) : fjsc-compile* ( string -- string ) '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 ;