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/compiler/Semant/statenv/prim.sml
ViewVC logotype

Diff of /sml/trunk/compiler/Semant/statenv/prim.sml

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

revision 3265, Tue Jan 13 17:42:58 2009 UTC revision 3266, Tue Jan 13 20:04:31 2009 UTC
# Line 567  Line 567 
567      val { hash, pickle, ... } =      val { hash, pickle, ... } =
568          PickMod.pickleEnv (PickMod.INITIAL ModuleId.emptyTmap) primEnv          PickMod.pickleEnv (PickMod.INITIAL ModuleId.emptyTmap) primEnv
569  in  in
570      UnpickMod.unpickleEnv (fn _ => ModuleId.emptyTmap) (hash, pickle)      UnpickMod.unpickleEnv (fn _ => (ModuleId.emptyTmap, fn () => "dummy"))
571                              (hash, pickle)
572  end  end
573    
574  end (* local *)  end (* local *)

Legend:
Removed from v.3265  
changed lines
  Added in v.3266

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