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/system/smlnj/internal/int-sys.sml
ViewVC logotype

Diff of /sml/trunk/src/system/smlnj/internal/int-sys.sml

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

revision 1651, Wed Oct 13 21:37:30 2004 UTC revision 1652, Thu Oct 14 22:38:54 2004 UTC
# Line 75  Line 75 
75      (* initialize control *)      (* initialize control *)
76      val _ = ControlRegistry.init BasicControl.topregistry      val _ = ControlRegistry.init BasicControl.topregistry
77    
78        (* install btrace implementation *)
79        val _ = BackTrace.install ()
80    
81      (* launch interactive loop *)      (* launch interactive loop *)
82      val _ = (Control.Print.say "Generating heap image...\n";      val _ = (Control.Print.say "Generating heap image...\n";
83               if SMLofNJ.exportML heapfile then               if SMLofNJ.exportML heapfile then

Legend:
Removed from v.1651  
changed lines
  Added in v.1652

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