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/stable/stabilize.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/stable/stabilize.sml

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

revision 362, Thu Jul 1 09:39:48 1999 UTC revision 363, Fri Jul 2 02:45:45 1999 UTC
# Line 33  Line 33 
33    
34  functor StabilizeFn (val bn2statenv : statenvgetter  functor StabilizeFn (val bn2statenv : statenvgetter
35                       val getPid : SmlInfo.info -> pid option                       val getPid : SmlInfo.info -> pid option
36                         val transfer_state : SmlInfo.info * BinInfo.info -> unit
37                       val recomp : recomp) :> STABILIZE = struct                       val recomp : recomp) :> STABILIZE = struct
38    
39      datatype pitem =      datatype pitem =
# Line 342  Line 343 
343                                                 localimports = li,                                                 localimports = li,
344                                                 globalimports = gi }                                                 globalimports = gi }
345                          in                          in
346                                transfer_state (smlinfo, i);
347                              m := SmlInfoMap.insert (!m, smlinfo, n);                              m := SmlInfoMap.insert (!m, smlinfo, n);
348                              n                              n
349                          end                          end

Legend:
Removed from v.362  
changed lines
  Added in v.363

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