From 309d3554be6c7024b2290adc3b0b43702cf7f7ce Mon Sep 17 00:00:00 2001 From: sof Date: Mon, 6 Oct 1997 17:30:16 +0000 Subject: [PATCH] [project @ 1997-10-06 17:30:16 by sof] Avoid unnecessary module dependency (PrelBase.$) --- ghc/lib/ghc/UnsafeST.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/lib/ghc/UnsafeST.lhs b/ghc/lib/ghc/UnsafeST.lhs index 4a9c705..f185990 100644 --- a/ghc/lib/ghc/UnsafeST.lhs +++ b/ghc/lib/ghc/UnsafeST.lhs @@ -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 -- 1.7.10.4