[project @ 1997-10-06 17:30:16 by sof]
authorsof <unknown>
Mon, 6 Oct 1997 17:30:16 +0000 (17:30 +0000)
committersof <unknown>
Mon, 6 Oct 1997 17:30:16 +0000 (17:30 +0000)
Avoid unnecessary module dependency (PrelBase.$)

ghc/lib/ghc/UnsafeST.lhs

index 4a9c705..f185990 100644 (file)
@@ -26,11 +26,11 @@ import GHC
 
 
 unsafeInterleaveST :: ST s a -> ST s a
-unsafeInterleaveST (ST m) = ST $ \ s ->
+unsafeInterleaveST (ST m) = ST ( \ s ->
     let
        (r, new_s) = m s
     in
-    (r, s)
+    (r, s))
 
 unsafePerformPrimIO    :: PrimIO a -> a
        -- We give a fresh definition here.  There are no