1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-26 04:18:05 +11:00

Fix stack leak in LIST

This commit is contained in:
Virgil Dupras 2020-11-08 17:30:27 -05:00
parent 3615944ffa
commit a88c2b6b42
2 changed files with 1 additions and 1 deletions

View File

@ -3,7 +3,7 @@
16 0 DO
I 1+ DUP 10 < IF SPC THEN . SPC
64 I * BLK( + DUP 64 + SWAP DO
I C@ DUP 0x1f > IF EMIT ELSE LEAVE THEN
I C@ DUP 0x1f > IF EMIT ELSE DROP LEAVE THEN
LOOP
NL
LOOP ;

Binary file not shown.