blob: e32dcc2798f2cfe3fabe6d6e2f9593c98cc7d896 [file] [log] [blame]
Chris Lattnere44f1db2003-11-23 18:12:22 +00001#
2# TUCK2 test
3#
4# Logic: // w1 w2 w3 w4 -- w3 w4 w1 w2 w3 w4
5#
6FORWARD success;
7FORWARD failure;
8: try_0 0 = IF success ELSE failure ENDIF ;
9: try_3b 3 = IF try_0 ELSE failure ENDIF ;
10: try_4 4 = IF try_3b ELSE failure ENDIF ;
11: try_1 1 = IF try_4 ELSE failure ENDIF ;
12: try_2 2 = IF try_1 ELSE failure ENDIF ;
13: try_3a 3 = IF try_2 ELSE failure ENDIF ;
14: MAIN 0 1 2 3 4 TUCK2 4 = IF try_3a ELSE failure ENDIF ;