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:
Virgil Dupras 2020-05-05 22:09:11 -04:00
parent 9df053b76c
commit 60b4bbf28a
2 changed files with 2 additions and 5 deletions

View File

@ -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
; ;

Binary file not shown.