[MLton-commit] r7043

[Matthew Fluet]

Drop top-level effects.

These effects were only used for setting up SML/NJ REPL in a debugging
state, but that usage is no longer used.
----------------------------------------------------------------------

U   mlton/trunk/mlton/main/main.sml

----------------------------------------------------------------------

Modified: mlton/trunk/mlton/main/main.sml
===================================================================
--- mlton/trunk/mlton/main/main.sml	2009-04-08 12:30:57 UTC (rev 7042)
+++ mlton/trunk/mlton/main/main.sml	2009-04-08 12:31:00 UTC (rev 7043)
@@ -1,4 +1,5 @@
-(* Copyright (C) 1999-2007 Henry Cejtin, Matthew Fluet, Suresh
+(* Copyright (C) 2009 Matthew Fluet.
+ * Copyright (C) 1999-2007 Henry Cejtin, Matthew Fluet, Suresh
  *    Jagannathan, and Stephen Weeks.
  * Copyright (C) 1997-2000 NEC Research Institute.
  *
@@ -7,12 +8,3 @@
  *)
 
 structure Main = Main ()
-
-val _ =
-   let
-      open Trace.Immediate
-   in
-      debug := Out Out.error
-      ; flagged ()
-      ; on []
-   end