Compiler/virtual machine interpreter: Difference between revisions

m
Line 3,764:
 
procedure printc(f_out, vm)
/f_out := &output
writes(f_out, char(pop(vm.stack)))
end
 
procedure printi(f_out, vm)
/f_out := &output
writes(f_out, pop(vm.stack))
end
 
procedure prints(f_out, vm)
/f_out := &output
writes(f_out, vm.strings[pop(vm.stack) + 1])
end
1,448

edits