Plaster
New
List
Login
cobol
default
anonymous
2025.06.20 06:19:28
data: 0: rec syms: 0: sys:rt-defun 1: minusp 2: neg 3: pred code: 0: 8C000010 close t4 0 5 16 1 1 nil t2 1: 00000004 2: 00010001 3: 00000005 4: 00000002 5: 20010003 gcall t3 1 t2 6: 00020001 7: 3800000C if t3 12 8: 00000003 9: 20010003 gcall t3 2 t2 10: 00020002 11: 10000003 end t3 12: 20010004 gcall t4 3 t2 13: 00020003 14: 2C020004 movsr t2 t4 15: 34000005 jmp 5 16: 20020002 gcall t2 0 d0 t4 17: 04000000 18: 00000004 19: 10000002 end t2 instruction count: 10 #<sys:vm-desc: 8a74590>
Raw
Annotate
Repaste
Edit