diff options
Diffstat (limited to 'compiler/ghci/RtClosureInspect.hs')
| -rw-r--r-- | compiler/ghci/RtClosureInspect.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/compiler/ghci/RtClosureInspect.hs b/compiler/ghci/RtClosureInspect.hs index e6d703b743..2dca546291 100644 --- a/compiler/ghci/RtClosureInspect.hs +++ b/compiler/ghci/RtClosureInspect.hs @@ -1275,10 +1275,6 @@ quantifyType ty = ( filter isTyVar $ where (_tvs, rho) = tcSplitForAllTys ty -unlessM :: Monad m => m Bool -> m () -> m () -unlessM condM acc = condM >>= \c -> unless c acc - - -- Strict application of f at index i appArr :: Ix i => (e -> a) -> Array i e -> Int -> a appArr f a@(Array _ _ _ ptrs#) i@(I# i#) |