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

Parent Directory | Revision Log | Patch

	revision 39, Sat Mar 14 04:41:37 1998 UTC	revision 40, Sun Mar 22 19:26:12 1998 UTC
#	Line 256	Line 256
256	handle EndOfFile => ()	handle EndOfFile => ()
257	| Interrupt => (say "\nInterrupt\n";	| Interrupt => (say "\nInterrupt\n";
258	flush(); loop())	flush(); loop())
259	| EM.Error => (flush(); loop())	(* | EM.Error => (flush(); loop()) *)
260	| C.Compile "syntax error" => (flush(); loop())	| C.Compile "syntax error" => (flush(); loop())
261	| C.Compile s =>	| C.Compile s =>
262	(say(concat["\nuncaught exception Compile: \"",	(say(concat["\nuncaught exception Compile: \"",

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.39   changed lines   Added in v.40

---

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