Remove perf TODO that does not seem to make any difference
commit541fa5d4c3fda8b81839bdd21d751512b90360fc
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateThu 1 Feb 2018, 15:27 (9 years ago)
parent8bf46da
src/Reporting/Result.hs−4
@@ -11,9 +11,6 @@ module Reporting.Result
1111 where
1212
1313
14−-- TODO try adding INLINE to warn, throw, (>>=), etc.
15−
16−
1714import qualified Data.OneOrMore as OneOrMore
1815import qualified Reporting.Warning as Warning
1916
@@ -44,7 +41,6 @@ run (Result k) =
4441-- HELPERS
4542
4643
47−{-# INLINE ok #-}
4844ok :: a -> Result i w e a
4945ok a =
5046 Result $ \i w _ good ->