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

Parent Directory | Revision Log | 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

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

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