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/compiler/TopLevel/interact/interact.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/TopLevel/interact/interact.sml

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

revision 1711, Tue Nov 23 05:13:59 2004 UTC revision 1712, Tue Nov 23 20:44:10 2004 UTC
# Line 11  Line 11 
11    
12    fun interact() = (EvalLoop.interact (); OS.Process.exit OS.Process.success)    fun interact() = (EvalLoop.interact (); OS.Process.exit OS.Process.success)
13    
14      val withErrorHandling = EvalLoop.withErrorHandling
15    
16    fun useFile fname =    fun useFile fname =
17        (app Control.Print.say ["[opening ",fname,"]\n"];        (app Control.Print.say ["[opening ",fname,"]\n"];
18         EvalLoop.evalStream         EvalLoop.evalStream

Legend:
Removed from v.1711  
changed lines
  Added in v.1712

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