[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