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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/driver/main.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/driver/main.sml

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

revision 3862, Sun May 15 15:44:30 2016 UTC revision 3863, Sun May 15 17:18:04 2016 UTC
# Line 105  Line 105 
105            end            end
106    
107      fun doFile (target : TargetOptions.t, filename) = let      fun doFile (target : TargetOptions.t, filename) = let
108              val {info, generate} = Targets.get target
109            val baseName = (case OS.Path.splitBaseExt filename            val baseName = (case OS.Path.splitBaseExt filename
110                   of {base, ext=SOME "diderot"} => base                   of {base, ext=SOME "diderot"} => base
111                    | _ => (errnl "expected diderot file"; quitWithError filename)                    | _ => (errnl "expected diderot file"; quitWithError filename)
# Line 139  Line 140 
140            val _ = verbosePrint["done\n"];            val _ = verbosePrint["done\n"];
141          (***** TRANSLATION TO TREE IR *****)          (***** TRANSLATION TO TREE IR *****)
142            val _ = verbosePrint["translating to TreeIR ... "];            val _ = verbosePrint["translating to TreeIR ... "];
143            val tree = PhaseTimer.withTimer Timers.timeLowToTree LowToTree.translate            val tree = PhaseTimer.withTimer Timers.timeLowToTree LowToTree.translate (low, info)
                 (low, DummyTarget.info (#double target))  
144            val _ = verbosePrint["done\n"];            val _ = verbosePrint["done\n"];
145            val tree = TreeOptimizer.checkAfter ("low-to-tree translation", tree)            val tree = TreeOptimizer.checkAfter ("low-to-tree translation", tree)
146          (***** TREE-IR OPTIMIZATION *****)          (***** TREE-IR OPTIMIZATION *****)
# Line 149  Line 149 
149            val _ = verbosePrint["done\n"];            val _ = verbosePrint["done\n"];
150            in            in
151            (***** CODE GENERATION *****)            (***** CODE GENERATION *****)
152  (* TODO *)()              PhaseTimer.withTimer Timers.timeCodegen generate tree
153            end            end
154    
155      fun usage (cmd, long) = TextIO.output(TextIO.stdErr, Options.usage (cmd, long))      fun usage (cmd, long) = TextIO.output(TextIO.stdErr, Options.usage (cmd, long))

Legend:
Removed from v.3862  
changed lines
  Added in v.3863

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