瀏覽代碼

Have RDLN spit newlines more consistently

On CRLF interfaces, newlines were mostly broken after previous
RDLN consolidation.
master
Virgil Dupras 3 年之前
父節點
當前提交
a9cb5a42d4
共有 2 個檔案被更改,包括 2 行新增2 行删除
  1. +2
    -2
      blk.fs
  2. 二進制
      cvm/stage.bin

+ 2
- 2
blk.fs 查看文件

@@ -1801,9 +1801,9 @@ SYSVARS 0x55 + :** KEY?
DUP BS? IF
IN> @ IN( > IF -1 IN> +! BS EMIT THEN SPC> BS EMIT
ELSE DUP LF = IF DROP CR THEN ( same as CR )
DUP EMIT ( echo back )
DUP SPC >= IF DUP EMIT ( echo back ) THEN
DUP IN> @ ! 1 IN> +! THEN ( c )
DUP CR = SWAP EOT? OR UNTIL IN( IN> ! ;
DUP CR = SWAP EOT? OR UNTIL NL> IN( IN> ! ;
( ----- 363 )
: RDLN<
IN> @ C@ ( c )


二進制
cvm/stage.bin 查看文件


Loading…
取消
儲存