parent
651ffcb888
commit
8d585d765b
@ -0,0 +1,15 @@ |
|||||||
|
( |
||||||
|
(stack r0) |
||||||
|
|
||||||
|
(push @r0 1) |
||||||
|
(push @r0 2) |
||||||
|
|
||||||
|
(pop r1 @r0) |
||||||
|
(cmp r1 2 (ne? (fault))) |
||||||
|
|
||||||
|
(pop r1 @r0) |
||||||
|
(cmp r1 1 (ne? (fault))) |
||||||
|
|
||||||
|
(drop @r0) |
||||||
|
(halt) |
||||||
|
) |
Loading…
Reference in new issue