diff options
Diffstat (limited to 'ABC/Code')
| -rw-r--r-- | ABC/Code/RTS.icl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/ABC/Code/RTS.icl b/ABC/Code/RTS.icl index f28f4d8..89032f3 100644 --- a/ABC/Code/RTS.icl +++ b/ABC/Code/RTS.icl @@ -7,6 +7,8 @@ rts = [ Descriptor "INT" "_rnf" 0 "integer" , Descriptor "BOOL" "_rnf" 0 "boolean" , Jmp "init_graph" + , Label "_rnf" + , Rtn , Label "init_graph" , Create , Fill "Start" 0 "n_Start" 0 @@ -31,6 +33,7 @@ rts , DecI , Jmp "_brackets" , Label "_exit" + , Pop_b 1 , Rtn , Label "_args" , Print "(" @@ -49,8 +52,6 @@ rts , Jsr "_driver" , DecI , Jmp "_arg_loop" - , Label "_rnf" - , Rtn , Label "_cycle" , Print "cycle in spine\n" , Halt |