projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
8cc74c8
)
[project @ 1997-10-06 17:30:16 by sof]
author
sof
<unknown>
Mon, 6 Oct 1997 17:30:16 +0000
(17:30 +0000)
committer
sof
<unknown>
Mon, 6 Oct 1997 17:30:16 +0000
(17:30 +0000)
Avoid unnecessary module dependency (PrelBase.$)
ghc/lib/ghc/UnsafeST.lhs
patch
|
blob
|
history
diff --git
a/ghc/lib/ghc/UnsafeST.lhs
b/ghc/lib/ghc/UnsafeST.lhs
index
4a9c705
..
f185990
100644
(file)
--- 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