summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2017-02-02 21:00:39 +0000
committerMatthew Pickering <matthewtpickering@gmail.com>2017-02-02 22:35:18 +0000
commit5728f4b83a06b28fc3bf75f5d13675fe5e9888c6 (patch)
tree95c78928254325919ff3b1e4c5a4280d91c0de62
parent895aa6d12ef7ea7d03b0c3ea5cfc10664cfd705a (diff)
downloadhaskell-5728f4b83a06b28fc3bf75f5d13675fe5e9888c6.tar.gz
Remove INLINE pragma on loopbreaker
-rw-r--r--compiler/deSugar/Check.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/deSugar/Check.hs b/compiler/deSugar/Check.hs
index 5fd1adfa1b..2b14739a37 100644
--- a/compiler/deSugar/Check.hs
+++ b/compiler/deSugar/Check.hs
@@ -1202,7 +1202,6 @@ Main functions are:
runMany :: (ValVec -> PmM PartialResult) -> (Uncovered -> PmM PartialResult)
runMany _ [] = return mempty
runMany pm (m:ms) = mappend <$> pm m <*> runMany pm ms
-{-# INLINE runMany #-}
-- | Generate the initial uncovered set. It initializes the
-- delta with all term and type constraints in scope.