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/evalloop.sml
ViewVC logotype

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

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

revision 25, Thu Mar 12 00:49:58 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: \"",

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

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