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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/high-opt/normalize.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/high-opt/normalize.sml

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

revision 4079, Tue Jun 28 15:44:27 2016 UTC revision 4080, Tue Jun 28 16:43:48 2016 UTC
# Line 106  Line 106 
106    
107      structure Promote = PromoteFn (IR)      structure Promote = PromoteFn (IR)
108    
109    (*
110      val transform = Promote.transform o Rewrite.transform      val transform = Promote.transform o Rewrite.transform
111    *)
112    
113  (*DEBUG*  (*DEBUG*)
114  fun transform prog = let  fun transform prog = let
115        val prog = Rewrite.transform prog        val prog = Rewrite.transform prog
116        val _ = HighPP.output(Log.logFile(), "AFTER REWRITE", prog)        val _ = HighPP.output(Log.logFile(), "AFTER REWRITE", prog)
# Line 117  Line 119 
119        in        in
120          prog          prog
121        end        end
122  *DEBUG*)  (*DEBUG*)
123    
124    end    end

Legend:
Removed from v.4079  
changed lines
  Added in v.4080

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