36 lines
373 B
Text
36 lines
373 B
Text
|
ENTER 0, 0
|
||
|
|
INVOKE Ackermann, m, n
|
||
|
|
LEAVE
|
||
|
|
RET
|
||
|
|
|
||
|
|
@Ackermann
|
||
|
|
ENTER 0, 0
|
||
|
|
|
||
|
|
.IF DWORD PTR [m] .THEN
|
||
|
|
JMP @F
|
||
|
|
.ENDIF
|
||
|
|
MOV EAX, n
|
||
|
|
INC EAX
|
||
|
|
JMP xit
|
||
|
|
|
||
|
|
@@
|
||
|
|
.IF DWORD PTR [n] .THEN
|
||
|
|
JMP @F
|
||
|
|
.ENDIF
|
||
|
|
MOV EAX, m
|
||
|
|
DEC EAX
|
||
|
|
INVOKE Ackermann, EAX, 1
|
||
|
|
JMP xit
|
||
|
|
|
||
|
|
@@
|
||
|
|
MOV EAX, n
|
||
|
|
DEC EAX
|
||
|
|
INVOKE Ackermann, m, EAX
|
||
|
|
MOV ECX, m
|
||
|
|
DEC ECX
|
||
|
|
INVOKE Ackermann, ECX, EAX
|
||
|
|
|
||
|
|
@xit
|
||
|
|
LEAVE
|
||
|
|
RET 8
|