tests.hex
1 2 3 4 5 6 7 8 9 10 11
( "current-test" store (current-test i) ("." print) ("\nTest Failed: " print current-test print "\n" print) if ) "test" store (0x1 0x1 ==) test i (0x1 0x1 ==) test i "" puts