1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-12-24 14:28:06 +11:00

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 -- )
LF
BEGIN
OVER 1 < IF 2DROP EXIT THEN
_
SWAP 8 - SWAP
AGAIN
SWAP 8 /MOD SWAP IF 1+ THEN
0 DO _ LOOP
;

Binary file not shown.