diff options
Diffstat (limited to 'src/boot/translator.boot')
| -rw-r--r-- | src/boot/translator.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/translator.boot b/src/boot/translator.boot index 68b9eef3..85f67993 100644 --- a/src/boot/translator.boot +++ b/src/boot/translator.boot @@ -392,7 +392,7 @@ translateSignatureDeclaration d == ++ A non declarative expression `expr' appears at toplevel and its ++ translation needs embeddeding in an `EVAL-WHEN'. translateToplevelExpression expr == - expr' := rest rest shoeCompTran ["LAMBDA",["x"],expr] + expr' := rest rest shoeCompTran ["LAMBDA",nil,expr] -- replace "DECLARE"s with "DECLAIM"s, as the former can't appear -- at toplevel. for t in expr' repeat |