collapseos/blk/456

: .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
;