[commit: ghc] wip/T14677: No need to inline nullary functions [ci skip] (e6eb60f)

git at git.haskell.org git at git.haskell.org
Sun Mar 31 15:08:18 UTC 2019


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/T14677
Link       : http://ghc.haskell.org/trac/ghc/changeset/e6eb60f1fd3f011e6dc46fd552cf213998ad38cb/ghc

>---------------------------------------------------------------

commit e6eb60f1fd3f011e6dc46fd552cf213998ad38cb
Author: Gabor Greif <ggreif at gmail.com>
Date:   Tue Jan 8 17:06:18 2019 +0100

    No need to inline nullary functions [ci skip]


>---------------------------------------------------------------

e6eb60f1fd3f011e6dc46fd552cf213998ad38cb
 libraries/base/GHC/Event/Internal.hs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/libraries/base/GHC/Event/Internal.hs b/libraries/base/GHC/Event/Internal.hs
index 5778c6f..57cb293 100644
--- a/libraries/base/GHC/Event/Internal.hs
+++ b/libraries/base/GHC/Event/Internal.hs
@@ -44,22 +44,18 @@ newtype Event = Event Int
 
 evtNothing :: Event
 evtNothing = Event 0
-{-# INLINE evtNothing #-}
 
 -- | Data is available to be read.
 evtRead :: Event
 evtRead = Event 1
-{-# INLINE evtRead #-}
 
 -- | The file descriptor is ready to accept a write.
 evtWrite :: Event
 evtWrite = Event 2
-{-# INLINE evtWrite #-}
 
 -- | Another thread closed the file descriptor.
 evtClose :: Event
 evtClose = Event 4
-{-# INLINE evtClose #-}
 
 eventIs :: Event -> Event -> Bool
 eventIs (Event a) (Event b) = a .&. b /= 0



More information about the ghc-commits mailing list