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 621, Wed Apr 19 22:44:30 2000 UTC revision 622, Wed Apr 19 22:47:11 2000 UTC
# Line 173  Line 173 
173                handle EndOfFile => (say "\n")                handle EndOfFile => (say "\n")
174                    | Interrupt => (say "\nInterrupt\n";                    | Interrupt => (say "\nInterrupt\n";
175                                flush(); loop())                                flush(); loop())
176                    | EM.Error => (flush(); loop())                    (* | EM.Error => (flush(); loop()) *)
177                    | C.Compile "syntax error" => (flush(); loop())                    | C.Compile "syntax error" => (flush(); loop())
178                    | C.Compile s =>                    | C.Compile s =>
179                       (say(concat["\nuncaught exception Compile: \"",                       (say(concat["\nuncaught exception Compile: \"",

Legend:
Removed from v.621  
changed lines
  Added in v.622

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