Sign in
llvm
/
llvm
/
refs/heads/release_16
/
.
/
projects
/
Stacker
/
test
/
swap.st
blob: 14176dbd10a5d415ba7266dec3846fb888b53ec4 [
file
] [
log
] [
blame
]
#
# DUP test
#
FORWARD success
;
FORWARD failure
;
:
phase3
0
=
IF success ELSE failure ENDIF
;
:
phase2
2
=
IF phase3 ELSE failure ENDIF
;
:
MAIN
0
1
2
SWAP
1
=
IF phase2 ELSE failure ENDIF
;