gmbytecode/test/asm_code/jumpif.fate
2019-02-18 18:09:00 +01:00

10 lines
127 B
Plaintext

;; CONTRACT jumpif
FUNCTION skip(integer, integer) : integer
PUSH arg1
PUSH 0
EQ a a arg0
JUMPIF a 2
INCA
JUMP 2
RETURN