[MLton-commit] r6363
Vesa Karvonen
vesak at mlton.org
Thu Jan 31 08:44:22 PST 2008
Whitespace cleanup.
----------------------------------------------------------------------
U mltonlib/trunk/com/ssh/async/unstable/detail/async.sml
----------------------------------------------------------------------
Modified: mltonlib/trunk/com/ssh/async/unstable/detail/async.sml
===================================================================
--- mltonlib/trunk/com/ssh/async/unstable/detail/async.sml 2008-01-31 12:59:08 UTC (rev 6362)
+++ mltonlib/trunk/com/ssh/async/unstable/detail/async.sml 2008-01-31 16:44:21 UTC (rev 6363)
@@ -195,7 +195,7 @@
fun send (T st) v = let
val ost = !st
val nst = IVar.new ()
- in
+ in
st := nst ; IVar.fill ost (N (v, nst))
end
end
More information about the MLton-commit
mailing list