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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/cfg-ir/ssa-pp-fn.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/cfg-ir/ssa-pp-fn.sml

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

revision 3527, Tue Dec 22 16:44:18 2015 UTC revision 3536, Fri Dec 25 18:51:48 2015 UTC
# Line 136  Line 136 
136                              goto (out, !succ))                              goto (out, !succ))
137                          | IR.COND{cond, trueBranch, falseBranch, ...} => (                          | IR.COND{cond, trueBranch, falseBranch, ...} => (
138                              prln (out1, [                              prln (out1, [
139                                  "if ", Var.toString cond,                                  "if ", Var.toString (!cond),
140                                  " then goto ", IR.Node.toString(!trueBranch),                                  " then goto ", IR.Node.toString(!trueBranch),
141                                  " else goto ", IR.Node.toString(!falseBranch), "\n"                                  " else goto ", IR.Node.toString(!falseBranch), "\n"
142                                ]);                                ]);
# Line 144  Line 144 
144                              ppNd (out, false, !falseBranch))                              ppNd (out, false, !falseBranch))
145                          | IR.FOREACH{phis, var, src, bodyEntry, succ, ...} => (                          | IR.FOREACH{phis, var, src, bodyEntry, succ, ...} => (
146                              prln (out1, [                              prln (out1, [
147                                  "foreach (", Var.toString var, " in ", Var.toString src, ")",                                  "foreach (", Var.toString var, " in ", Var.toString (!src), ")",
148                                  " on exit goto ", IR.Node.toString(!succ), "\n"                                  " on exit goto ", IR.Node.toString(!succ), "\n"
149                                ]);                                ]);
150                              List.app (prPhi (incIndent out1)) (!phis);                              List.app (prPhi (incIndent out1)) (!phis);

Legend:
Removed from v.3527  
changed lines
  Added in v.3536

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