collapseos/tests/forth/test_cmp.fs

5 lines
148 B
Forth
Raw Normal View History

2020-04-05 19:52:12 -04:00
0x70 <>{ 0x70 &= 0x58 |= 0x20 |= <>} #
0x71 <>{ 0x70 &= 0x58 |= 0x20 |= <>} NOT #
0x42 <>{ 0x40 &> 0x44 &< <>} #
0x44 <>{ 0x40 &> 0x44 &< <>} NOT #