Fix DUMP's broken "round up to next 8" logic
This was caused by the removal of signed-ness a long while ago.
This commit is contained in:
parent
9df053b76c
commit
60b4bbf28a
7
blk/445
7
blk/445
@ -1,9 +1,6 @@
|
|||||||
: DUMP ( n a -- )
|
: DUMP ( n a -- )
|
||||||
LF
|
LF
|
||||||
BEGIN
|
SWAP 8 /MOD SWAP IF 1+ THEN
|
||||||
OVER 1 < IF 2DROP EXIT THEN
|
0 DO _ LOOP
|
||||||
_
|
|
||||||
SWAP 8 - SWAP
|
|
||||||
AGAIN
|
|
||||||
;
|
;
|
||||||
|
|
||||||
|
BIN
emul/forth.bin
BIN
emul/forth.bin
Binary file not shown.
Loading…
Reference in New Issue
Block a user