You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
- : .2 DUP 10 < IF SPC THEN . ;
- : EOL? ( c -- f ) DUP 0xd = SWAP NOT OR ;
- : LIST
- BLK@
- 16 0 DO
- I 1+ .2 SPC
- 64 I * BLK( + DUP 64 + SWAP DO
- I C@ DUP EOL? IF DROP LEAVE ELSE EMIT THEN
- LOOP
- NL
- LOOP
- ;
|