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 4080, Tue Jun 28 16:43:48 2016 UTC revision 4084, Tue Jun 28 20:58:19 2016 UTC
# Line 106  Line 106 
106    
107      structure Promote = PromoteFn (IR)      structure Promote = PromoteFn (IR)
108    
 (*  
109      val transform = Promote.transform o Rewrite.transform      val transform = Promote.transform o Rewrite.transform
 *)  
110    
111  (*DEBUG*)  (*DEBUG*
112  fun transform prog = let  fun transform prog = let
113        val prog = Rewrite.transform prog        val prog = Rewrite.transform prog
114        val _ = HighPP.output(Log.logFile(), "AFTER REWRITE", prog)        val _ = HighPP.output(Log.logFile(), "AFTER REWRITE", prog)
# Line 119  Line 117 
117        in        in
118          prog          prog
119        end        end
120  (*DEBUG*)  *DEBUG*)
121    
122    end    end

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

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