Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /trunk/src/compiler/IL/dom-tree-fn.sml
ViewVC logotype

Diff of /trunk/src/compiler/IL/dom-tree-fn.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1115, Thu May 5 04:42:18 2011 UTC revision 1640, Wed Nov 16 02:19:51 2011 UTC
# Line 65  Line 65 
65                        walk (THEN_BR{cond=nd, elseBr = !falseBranch}::ifStk, !trueBranch)                        walk (THEN_BR{cond=nd, elseBr = !falseBranch}::ifStk, !trueBranch)
66                    | IL.COM{succ, ...} => walk (ifStk, !succ)                    | IL.COM{succ, ...} => walk (ifStk, !succ)
67                    | IL.ASSIGN{succ, ...} => walk (ifStk, !succ)                    | IL.ASSIGN{succ, ...} => walk (ifStk, !succ)
68                      | IL.MASSIGN{succ, ...} => walk (ifStk, !succ)
69                    | IL.NEW{succ, ...} => walk (ifStk, !succ)                    | IL.NEW{succ, ...} => walk (ifStk, !succ)
70                      | IL.SAVE{succ, ...} => walk (ifStk, !succ)
71                    | IL.EXIT _ => resume ifStk                    | IL.EXIT _ => resume ifStk
72                  (* end case *))                  (* end case *))
73            and resume [] = ()            and resume [] = ()
# Line 100  Line 102 
102                    (* end case *))                    (* end case *))
103                | IL.COM{succ, ...} => maybeSucc succ                | IL.COM{succ, ...} => maybeSucc succ
104                | IL.ASSIGN{succ, ...} => maybeSucc succ                | IL.ASSIGN{succ, ...} => maybeSucc succ
105                  | IL.MASSIGN{succ, ...} => maybeSucc succ
106                | IL.NEW{succ, ...} => maybeSucc succ                | IL.NEW{succ, ...} => maybeSucc succ
107                  | IL.SAVE{succ, ...} => maybeSucc succ
108                | IL.EXIT _ => []                | IL.EXIT _ => []
109              (* end case *)              (* end case *)
110            end            end

Legend:
Removed from v.1115  
changed lines
  Added in v.1640

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0