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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/IL/promote-fn.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/IL/promote-fn.sml

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

revision 2800, Thu Nov 6 17:34:24 2014 UTC revision 2801, Thu Nov 6 23:08:02 2014 UTC
# Line 151  Line 151 
151                        fun f ([], globals, stms) = (globals, stms)                        fun f ([], globals, stms) = (globals, stms)
152                          | f ((gx, x)::globs, globals, stms) = (                          | f ((gx, x)::globs, globals, stms) = (
153                                incUse x;                                incUse x;
154                                  IL.GlobalVar.setBinding(gx, x);
155                                f (globs, gx::globals, IL.GASSGN(gx, x)::stms))                                f (globs, gx::globals, IL.GASSGN(gx, x)::stms))
156                        val (globals', stms) = f (globs, [], [])                        val (globals', stms) = f (globs, [], [])
157                        in                        in

Legend:
Removed from v.2800  
changed lines
  Added in v.2801

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