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/cm/bootstrap/btcompile.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/bootstrap/btcompile.sml

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

revision 403, Tue Aug 31 07:44:29 1999 UTC revision 432, Fri Sep 10 05:44:08 1999 UTC
# Line 33  Line 33 
33    
34      (* instantiate Stabilize... *)      (* instantiate Stabilize... *)
35      structure Stabilize =      structure Stabilize =
36          StabilizeFn (fun destroy_state _ _ = ()          StabilizeFn (fun destroy_state _ i = Compile.evict i
37                       structure MachDepVC = MachDepVC                       structure MachDepVC = MachDepVC
38                       fun recomp gp g = let                       fun recomp gp g = let
39                           val { store, get } = BFC.new ()                           val { store, get } = BFC.new ()

Legend:
Removed from v.403  
changed lines
  Added in v.432

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