[MLton-commit] r7230

[Matthew Fluet]

Fix syntax error introduced in r7227.
----------------------------------------------------------------------

U   mlton/trunk/basis-library/integer/int-inf.sml

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

Modified: mlton/trunk/basis-library/integer/int-inf.sml
===================================================================
--- mlton/trunk/basis-library/integer/int-inf.sml	2009-09-17 15:34:19 UTC (rev 7229)
+++ mlton/trunk/basis-library/integer/int-inf.sml	2009-09-17 19:09:12 UTC (rev 7230)
@@ -242,7 +242,7 @@
                     : (int, 'a) reader =
             let
                fun reader (s: 'a): (int * 'a) option =
-                  let val s = StringCvt.skipWS cread s
+                  let val s = StringCvt.skipWS cread s in
                   case cread s of
                      NONE => NONE
                    | SOME (ch, s') =>