diff options
author | Camil Staps | 2017-07-29 00:09:54 +0200 |
---|---|---|
committer | Camil Staps | 2017-07-29 00:09:54 +0200 |
commit | 03e2887e46a8b84f73037583945ce80b0682d057 (patch) | |
tree | fb93c51d51a5d53270f10df4b81769f25bc93e82 /Sil | |
parent | Add globals on A-stack (diff) |
Fix lazy operators
Diffstat (limited to 'Sil')
-rw-r--r-- | Sil/Compile.icl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Sil/Compile.icl b/Sil/Compile.icl index 0d5a3f2..fab7643 100644 --- a/Sil/Compile.icl +++ b/Sil/Compile.icl @@ -508,6 +508,7 @@ where storeStackOffsets *> gen e1 *> tell [ 'ABC'.JmpTrue true ] *> + shrinkStack {zero & bsize=1} *> gen e2 *> tell [ 'ABC'.Jmp end ] *> restoreStackOffsets *> @@ -523,6 +524,7 @@ where storeStackOffsets *> gen e1 *> tell [ 'ABC'.JmpFalse false ] *> + shrinkStack {zero & bsize=1} *> gen e2 *> tell [ 'ABC'.Jmp end ] *> restoreStackOffsets *> |