1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-23 07:58:06 +11:00

Spit SPC instead of NL between blknos in LOADR

It's a bit wasteful to spit full NLs.
This commit is contained in:
Virgil Dupras 2021-01-02 09:23:28 -05:00
parent 7fd74e2d80
commit ba4edbdce3
2 changed files with 1 additions and 1 deletions

2
blk.fs
View File

@ -2079,7 +2079,7 @@ SYSVARS 0x55 + :** KEY?
( ----- 385 )
: LOAD+ BLK> @ + LOAD ;
( b1 b2 -- )
: LOADR 1+ SWAP DO I DUP . NL LOAD LOOP ;
: LOADR 1+ SWAP DO I DUP . SPC LOAD LOOP ;
: LOADR+ BLK> @ + SWAP BLK> @ + SWAP LOADR ;
( ----- 390 )
( xcomp core high )

Binary file not shown.