diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2021-04-07 19:45:47 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-04-29 17:26:43 -0400 |
| commit | e50d06752e2113615814d2c9cf8965cca394302b (patch) | |
| tree | a264e4dbbb635221bc9c9f608495a5f63af3ead2 /libraries | |
| parent | 8d069477b77614e3360dff8bf0221fba5ae99cf8 (diff) | |
| download | haskell-e50d06752e2113615814d2c9cf8965cca394302b.tar.gz | |
Allow divInt#/modInt# to inline (#18067)
Diffstat (limited to 'libraries')
| -rw-r--r-- | libraries/ghc-prim/GHC/Classes.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/ghc-prim/GHC/Classes.hs b/libraries/ghc-prim/GHC/Classes.hs index 55d77c9ed5..d0641f874c 100644 --- a/libraries/ghc-prim/GHC/Classes.hs +++ b/libraries/ghc-prim/GHC/Classes.hs @@ -540,8 +540,8 @@ not False = True -- put them -- These functions have built-in rules. -{-# NOINLINE divInt# #-} -{-# NOINLINE modInt# #-} +{-# INLINE [0] divInt# #-} +{-# INLINE [0] modInt# #-} divInt# :: Int# -> Int# -> Int# x# `divInt#` y# = ((x# +# bias#) `quotInt#` y#) -# hard# |