diff --git a/blk.fs b/blk.fs index ceab160..9bf064d 100644 --- a/blk.fs +++ b/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 ) diff --git a/cvm/stage.bin b/cvm/stage.bin index 74727a9..448a39a 100644 Binary files a/cvm/stage.bin and b/cvm/stage.bin differ