| Chris Lattner | 6484bf7 | 2003-11-23 18:12:22 +0000 | [diff] [blame] | 1 | # |
| 2 | # OVER2 test | ||||
| 3 | # | ||||
| 4 | # Logic: // w1 w2 w3 w4 -- w1 w2 w3 w4 w1 w2 | ||||
| 5 | # | ||||
| 6 | FORWARD success; | ||||
| 7 | FORWARD failure; | ||||
| 8 | : try_0 0 = IF success ELSE failure ENDIF ; | ||||
| 9 | : try_1b 1 = IF try_0 ELSE failure ENDIF ; | ||||
| 10 | : try_2 2 = IF try_1b ELSE failure ENDIF ; | ||||
| 11 | : try_3 3 = IF try_2 ELSE failure ENDIF ; | ||||
| 12 | : try_4 4 = IF try_3 ELSE failure ENDIF ; | ||||
| 13 | : try_1a 1 = IF try_4 ELSE failure ENDIF ; | ||||
| 14 | : MAIN 0 1 2 3 4 OVER2 2 = IF try_1a ELSE failure ENDIF ; | ||||