gmbytecode/test/asm_code/jumpif.fate
2019-02-14 15:38:49 +01:00

10 lines
126 B
Plaintext

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