I could write symbolic assembly within Nokolisp. Sentences were feeded straight into DEBUG and
numbers were absolute addresses within COM-file. This is superfast fibonacci.
(defun fib2
(x)
(AX-reg x)
(assembly
(CALL 272)
(JMP 320)
272
(CMP AX , 2)
(JC 304)
(push AX)
(sub ax , 1)
(call 272)
(MOV BX , AX)
(POP AX)
(PUSH BX)
(sub ax , 2)
(call 272)
(pop BX)
(add AX , BX)
(RET)
304
(RET)
320)
(AX-reg))