[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