Преглед изворни кода

Spit SPC instead of NL between blknos in LOADR

It's a bit wasteful to spit full NLs.
master
Virgil Dupras пре 3 година
родитељ
комит
ba4edbdce3
2 измењених фајлова са 1 додато и 1 уклоњено
  1. +1
    -1
      blk.fs
  2. BIN
      cvm/stage.bin

+ 1
- 1
blk.fs Прегледај датотеку

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



Loading…
Откажи
Сачувај