collapseos/blk/634
2020-05-15 15:41:06 -04:00

6 lines
124 B
Plaintext

: _chk ( c --, check _sel range )
_sel C@ DUP 0x7f > IF 0x20 _sel C! THEN
0x20 < IF 0x7f _sel C! THEN ;
: _nxtcls
;