[MLton-commit] r5492

Vesa Karvonen vesak at mlton.org
Wed Apr 4 01:13:19 PDT 2007


Just disable debug output for now.
----------------------------------------------------------------------

U   mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml

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

Modified: mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml
===================================================================
--- mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml	2007-04-02 04:03:07 UTC (rev 5491)
+++ mltonlib/trunk/com/ssh/async/unstable/example/smlbot/smlbot.sml	2007-04-04 08:13:18 UTC (rev 5492)
@@ -35,6 +35,9 @@
       val iodEvt = mk id
    end
 
+   val print = ignore
+   val println = ignore
+
    fun mkSender sock = let
       val msgs = Mailbox.new ()
       fun taking () =




More information about the MLton-commit mailing list