diff options
Diffstat (limited to 'compiler/GHC/Builtin/PrimOps.hs')
| -rw-r--r-- | compiler/GHC/Builtin/PrimOps.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Builtin/PrimOps.hs b/compiler/GHC/Builtin/PrimOps.hs index 86c3894f06..a4bd412c37 100644 --- a/compiler/GHC/Builtin/PrimOps.hs +++ b/compiler/GHC/Builtin/PrimOps.hs @@ -453,7 +453,7 @@ Duplicate YES NO just look at Control.Monad.ST.Lazy.Imp.strictToLazy! We get something like this p = case readMutVar# s v of - (# s', r #) -> (S# s', r) + (# s', r #) -> (State# s', r) s' = case p of (s', r) -> s' r = case p of (s', r) -> r |