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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/translate/translate.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/translate/translate.sml

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

revision 3190, Sat Apr 4 00:18:24 2015 UTC revision 3191, Sat Apr 4 00:33:02 2015 UTC
# Line 342  Line 342 
342                        in                        in
343                          cvt (env, IL.CFG.appendNode (cfg, nd), stms)                          cvt (env, IL.CFG.appendNode (cfg, nd), stms)
344                        end                        end
345                      | S.S_Continue => (
346                          killPath joinStk;
347                          (IL.CFG.concat (cfg, saveStrandState (env, state, IL.Node.mkACTIVE())), env))
348                    | S.S_Die => (                    | S.S_Die => (
349                        killPath joinStk;                        killPath joinStk;
350                        (IL.CFG.appendNode (cfg, IL.Node.mkDIE ()), env))                        (IL.CFG.appendNode (cfg, IL.Node.mkDIE ()), env))
# Line 398  Line 401 
401            val entry = IL.Node.mkENTRY ()            val entry = IL.Node.mkENTRY ()
402            val loadCFG = IL.CFG.prependNode (entry, loadCFG)            val loadCFG = IL.CFG.prependNode (entry, loadCFG)
403            val exit = (case name            val exit = (case name
404                   of StrandUtil.Update => IL.Node.mkACTIVE ()                   of StrandUtil.Initially => IL.Node.mkACTIVE ()
405                      | StrandUtil.Update => IL.Node.mkACTIVE ()
406                    | StrandUtil.Stabilize => IL.Node.mkRETURN []                    | StrandUtil.Stabilize => IL.Node.mkRETURN []
407                  (* end case *))                  (* end case *))
408            val body = IL.CFG.concat (loadCFG, cfg)            val body = IL.CFG.concat (loadCFG, cfg)

Legend:
Removed from v.3190  
changed lines
  Added in v.3191

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