izaya/collapseos
1
0
Fork 0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-23 15:58:05 +11:00
Code Issues Releases Wiki Activity

Spit SPC instead of NL between blknos in LOADR

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
blk.fs
View File

@ -2079,7 +2079,7 @@ SYSVARS 0x55 + :** KEY?
( ----- 385 ) ( ----- 385 )
: LOAD+ BLK> @ + LOAD ; : LOAD+ BLK> @ + LOAD ;
( b1 b2 -- ) ( 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 ; : LOADR+ BLK> @ + SWAP BLK> @ + SWAP LOADR ;
( ----- 390 ) ( ----- 390 )
( xcomp core high ) ( xcomp core high )

BIN
cvm/stage.bin
View File

Binary file not shown.