version 1.12, 2006/03/26 22:54:20
|
version 1.13, 2006/05/27 21:19:25
|
Line 35 Variable echo -1 echo !
|
Line 35 Variable echo -1 echo !
|
dup #cr = over #lf = or IF |
dup #cr = over #lf = or IF |
echo @ IF space THEN drop nip swap - ( xoff ) EXIT THEN |
echo @ IF space THEN drop nip swap - ( xoff ) EXIT THEN |
dup #eof = IF eof on THEN |
dup #eof = IF eof on THEN |
#bs = IF 3 pick over <> over 0> and |
#bs = IF 2 pick over <> |
IF 1 chars - |
IF 1 chars - |
echo @ IF #bs emit bl emit #bs emit THEN |
echo @ IF #bs emit bl emit #bs emit THEN |
ELSE echo @ IF bell THEN THEN THEN |
ELSE echo @ IF bell THEN THEN THEN |