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

SCM Repository

[diderot] Diff of /branches/lamont_dev/src/compiler/IL/ssa-pp-fn.sml
ViewVC logotype

Diff of /branches/lamont_dev/src/compiler/IL/ssa-pp-fn.sml

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

revision 1867, Mon May 7 14:43:11 2012 UTC revision 1868, Fri May 11 03:17:42 2012 UTC
# Line 121  Line 121 
121                          | IL.MASSIGN{stm, succ, ...} => (                          | IL.MASSIGN{stm, succ, ...} => (
122                              prln (out1, [massignToString stm, "\n"]);                              prln (out1, [massignToString stm, "\n"]);
123                              goto (out, !succ))                              goto (out, !succ))
124              | IL.FOREACH{cond,stmBranch,succ, ...} => (              | IL.FOREACH{cond,stmBranch,succ,phis, ...} => (
125                                List.app prPhi (!phis);
126                  prln (out1, [                  prln (out1, [
127                  "foreach(", Var.toString cond , ")\n",                  "foreach(", Var.toString cond , ")\n",
128                  " do ", IL.Node.toString(!stmBranch), "\n"                  " do ", IL.Node.toString(!stmBranch), "\n"
129                  ]);                  ]);
130                  ppNd (out, false, !stmBranch))                  ppNd (out, false, !stmBranch);
131                    prln(out1, ["---END OF FOREACH BLOCK-----\n"]);
132                        goto (out, !succ))
133                          | IL.NEW{strand, args, succ, ...} => (                          | IL.NEW{strand, args, succ, ...} => (
134                              prln (out1, [                              prln (out1, [
135                                  "new ", Atom.toString strand, "(",                                  "new ", Atom.toString strand, "(",

Legend:
Removed from v.1867  
changed lines
  Added in v.1868

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