collapseos/blk/607

5 lines
70 B
Plaintext

( send-and-crc7 )
( n c -- c )
: _s+crc SWAP DUP _sdcSR DROP _crc7 ;