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 3525, Mon Dec 21 21:09:58 2015 UTC revision 3527, Tue Dec 22 16:44:18 2015 UTC
# Line 233  Line 233 
233              indent out; prl(out, ["end ", Atom.toString name, "\n"])              indent out; prl(out, ["end ", Atom.toString name, "\n"])
234            end            end
235    
236      fun ppGlobal prefix outS gv = (      fun ppGlobal outS gv = (
237            indent outS;            indent outS;
238            prl(outS, [            prl(outS, [
239                prefix, " ", Ty.toString(GVar.ty gv), " ", GVar.uniqueName gv, "\n"                GlobalVarKind.toString(IR.GlobalVar.kind gv), " ", Ty.toString(GVar.ty gv),
240                  " ", GVar.uniqueName gv, "\n"
241              ]))              ]))
242    
243      fun ppInput outS inp = prl (outS, ["input ", Inputs.toString inp, "\n"])      fun ppInput outS inp = prl (outS, ["input ", Inputs.toString inp, "\n"])
# Line 255  Line 256 
256                  String.concatWithMap " " Properties.toString props, "\n"                  String.concatWithMap " " Properties.toString props, "\n"
257                ]);                ]);
258              pr (out, "## globals\n");              pr (out, "## globals\n");
259              List.app (ppGlobal "const" out1) consts;              List.app (ppGlobal out1) consts;
260              List.app (ppInput out1) inputs;              List.app (ppInput out1) inputs;
261              List.app (ppGlobal "global" out1) globals;              List.app (ppGlobal out1) globals;
262              pr (out, "## input initialization\n");              pr (out, "## input initialization\n");
263              ppCFG (out1, constInit);              ppCFG (out1, constInit);
264              pr (out, "## global initialization\n");              pr (out, "## global initialization\n");

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

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