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/compile/recomp-persstate-fn.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/compile/recomp-persstate-fn.sml

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

revision 296, Thu May 27 05:31:04 1999 UTC revision 297, Thu May 27 08:29:19 1999 UTC
# Line 17  Line 17 
17          val smlmap = ref (AbsPathMap.empty: recomp_memo AbsPathMap.map)          val smlmap = ref (AbsPathMap.empty: recomp_memo AbsPathMap.map)
18          val stablemap = ref (StableMap.empty: recomp_memo StableMap.map)          val stablemap = ref (StableMap.empty: recomp_memo StableMap.map)
19    
20          fun recomp_look_sml (i, provided) = let          fun recomp_look_sml (i, provided, gp) = let
21              fun isValid { bfc, ctxt } = let              fun isValid { bfc, ctxt } = let
22                  val demanded = PidSet.addList (PidSet.empty, BF.cmDataOf bfc)                  val demanded = PidSet.addList (PidSet.empty, BF.cmDataOf bfc)
23              in              in

Legend:
Removed from v.296  
changed lines
  Added in v.297

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