Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/compiler/FLINT/main/control.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/FLINT/main/control.sml

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

revision 625, Sat Apr 22 23:21:36 2000 UTC revision 626, Sat Apr 22 23:24:24 2000 UTC
# Line 10  Line 10 
10       * locally unused but could be cross-module inlined. *)       * locally unused but could be cross-module inlined. *)
11      val phases = ref ["lcontract", (* Cruder but quicker than fcontract *)      val phases = ref ["lcontract", (* Cruder but quicker than fcontract *)
12                        "fixfix", "fcontract",                        "fixfix", "fcontract",
13                        "specialize", (* "fixfix", "split", *) "fcontract",                        "specialize",
14                        "wrap", "loopify", "fixfix", "fcontract", "reify",                        "loopify", "fixfix", (* "split", *) "fcontract",
15                        "fcontract", "fixfix", "fcontract+eta"]                        "wrap", "fcontract", "reify",
16                          (* "abcopt", *) "fcontract", "fixfix", "fcontract+eta"]
17    
18      val inlineThreshold = ref 16      val inlineThreshold = ref 16
19      val splitThreshold  = ref 0      val splitThreshold  = ref 0

Legend:
Removed from v.625  
changed lines
  Added in v.626

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