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

SCM Repository

[diderot] Diff of /branches/lamont/src/compiler/IL/value-numbering-fn.sml
ViewVC logotype

Diff of /branches/lamont/src/compiler/IL/value-numbering-fn.sml

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

revision 2245, Sun Mar 3 12:51:51 2013 UTC revision 2246, Sun Mar 3 14:51:31 2013 UTC
# Line 325  Line 325 
325            end            end
326    
327      fun transform prog = let      fun transform prog = let
328            val IL.Program{props, globalInit, globalBlock, initially, strands} = prog            val IL.Program{props, globalInit, globalBlock, globalReduce, initially, strands} = prog
329            val {cfg=globalInit, rename} = transformCFG' ([], [], globalInit)            val {cfg=globalInit, rename} = transformCFG' ([], [], globalInit)
330            val globals = (IL.CFG.liveAtExit globalInit)            val globals = (IL.CFG.liveAtExit globalInit)
331        val {cfg=globalBlock, rename} = transformCFG' (globals, rename, globalBlock)        val {cfg=globalBlock, rename} = transformCFG' (globals, rename, globalBlock)
332        val globals = (IL.CFG.liveAtExit globalBlock)        val globals = (IL.CFG.liveAtExit globalBlock)
333          val {cfg=globalBlock, rename} = transformCFG' (globals, rename, globalReduce)
334          val globals = (IL.CFG.liveAtExit globalReduce)
335    
336          (* transform the strand initialization code *)          (* transform the strand initialization code *)
337            val initially = if List.null rename            val initially = if List.null rename
# Line 392  Line 394 
394                  props = props,                  props = props,
395                  globalInit = globalInit,                  globalInit = globalInit,
396          globalBlock = globalBlock,          globalBlock = globalBlock,
397            globalReduce = globalReduce,
398                  initially = initially,                  initially = initially,
399                  strands = strands                  strands = strands
400                }                }

Legend:
Removed from v.2245  
changed lines
  Added in v.2246

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