Workaround failed constant-folding for zeroBits
Workaround failed constant-folding for zeroBits

For some reason GHC fails to constant fold `zeroBits :: Int` and
`zeroBits :: Integer`; `ghc -show-iface` shows

  $fBitsInt_$czeroBits :: GHC.Types.Int
     {- Strictness: m,
        Unfolding: (GHC.Types.I# (GHC.Prim.andI# 1 (GHC.Prim.notI# 1))) -}

Otoh, constant-folding works as expected, reducing `zeroBits` to 0 constant
for the other integer-types (= {Word,Int}{8,16,32,64}` and `Word`). So this
quickfix is actually just treating the symptom rather than the cause.

Signed-off-by: Herbert Valerio Riedel <202fbcf3c00694524024feb79f3bb8fc1c4e4f9c@gnu.org>

vTurbine/ghc,gcampax/ghc,tibbe/ghc,fmthoma/ghc,frantisekfarka/ghc-dsi,wxwxwwxxx/ghc,forked-upstream-packages-for-ghcjs/ghc,nathyong/microghc-ghc,ml9951/ghc,bitemyapp/ghc,sgillespie/ghc,spacekitteh/smcghc,jstolarek/ghc,mcschroeder/ghc,elieux/ghc,nushio3/ghc,elieux/ghc,mcschroeder/ghc,urbanslug/ghc,sdiehl/ghc,vikraman/ghc,da-x/ghc,da-x/ghc,TomMD/ghc,acowley/ghc,tjakway/ghcjvm,gcampax/ghc,snoyberg/ghc,anton-dessiatov/ghc,acowley/ghc,ml9951/ghc,ml9951/ghc,nkaretnikov/ghc,TomMD/ghc,olsner/ghc,da-x/ghc,nushio3/ghc,gcampax/ghc,forked-upstream-packages-for-ghcjs/ghc,frantisekfarka/ghc-dsi,oldmanmike/ghc,sgillespie/ghc,ryantm/ghc,olsner/ghc,snoyberg/ghc,nathyong/microghc-ghc,christiaanb/ghc,shlevy/ghc,lukexi/ghc,oldmanmike/ghc,da-x/ghc,ghc-android/ghc,gcampax/ghc,siddhanathan/ghc,acowley/ghc,urbanslug/ghc,ml9951/ghc,olsner/ghc,acowley/ghc,spacekitteh/smcghc,bitemyapp/ghc,urbanslug/ghc,mcschroeder/ghc,tjakway/ghcjvm,AlexanderPankiv/ghc,gridaphobe/ghc,christiaanb/ghc,green-haskell/ghc,sgillespie/ghc,TomMD/ghc,spacekitteh/smcghc,ml9951/ghc,snoyberg/ghc,ghc-android/ghc,fmthoma/ghc,gridaphobe/ghc,oldmanmike/ghc,GaloisInc/halvm-ghc,mettekou/ghc,nushio3/ghc,nkaretnikov/ghc,wxwxwwxxx/ghc,tibbe/ghc,tjakway/ghcjvm,mcschroeder/ghc,urbanslug/ghc,nushio3/ghc,vTurbine/ghc,ezyang/ghc,AlexanderPankiv/ghc,sdiehl/ghc,anton-dessiatov/ghc,green-haskell/ghc,spacekitteh/smcghc,elieux/ghc,ghc-android/ghc,olsner/ghc,snoyberg/ghc,green-haskell/ghc,tjakway/ghcjvm,sdiehl/ghc,ghc-android/ghc,nushio3/ghc,ezyang/ghc,holzensp/ghc,snoyberg/ghc,GaloisInc/halvm-ghc,urbanslug/ghc,siddhanathan/ghc,mfine/ghc,green-haskell/ghc,gridaphobe/ghc,sdiehl/ghc,fmthoma/ghc,mettekou/ghc,tjakway/ghcjvm,AlexanderPankiv/ghc,gridaphobe/ghc,holzensp/ghc,ezyang/ghc,christiaanb/ghc,siddhanathan/ghc,tibbe/ghc,da-x/ghc,tjakway/ghcjvm,elieux/ghc,bitemyapp/ghc,elieux/ghc,holzensp/ghc,GaloisInc/halvm-ghc,nathyong/microghc-ghc,green-haskell/ghc,elieux/ghc,nushio3/ghc,nathyong/microghc-ghc,wxwxwwxxx/ghc,mcschroeder/ghc,elieux/ghc,holzensp/ghc,anton-dessiatov/ghc,oldmanmike/ghc,frantisekfarka/ghc-dsi,acowley/ghc,ml9951/ghc,GaloisInc/halvm-ghc,wxwxwwxxx/ghc,mettekou/ghc,fmthoma/ghc,mettekou/ghc,snoyberg/ghc,tjakway/ghcjvm,anton-dessiatov/ghc,GaloisInc/halvm-ghc,nathyong/microghc-ghc,AlexanderPankiv/ghc,frantisekfarka/ghc-dsi,sgillespie/ghc,oldmanmike/ghc,sgillespie/ghc,forked-upstream-packages-for-ghcjs/ghc,ryantm/ghc,TomMD/ghc,siddhanathan/ghc,ml9951/ghc,fmthoma/ghc,forked-upstream-packages-for-ghcjs/ghc,mfine/ghc,fmthoma/ghc,nathyong/microghc-ghc,bitemyapp/ghc,GaloisInc/halvm-ghc,nkaretnikov/ghc,nathyong/microghc-ghc,lukexi/ghc,tibbe/ghc,ghc-android/ghc,ghc-android/ghc,oldmanmike/ghc,nkaretnikov/ghc,ezyang/ghc,siddhanathan/ghc,vikraman/ghc,shlevy/ghc,nushio3/ghc,ghc-android/ghc,urbanslug/ghc,mfine/ghc,urbanslug/ghc,vikraman/ghc,mettekou/ghc,olsner/ghc,ezyang/ghc,wxwxwwxxx/ghc,gcampax/ghc,lukexi/ghc,forked-upstream-packages-for-ghcjs/ghc,acowley/ghc,sgillespie/ghc,TomMD/ghc,sdiehl/ghc,vikraman/ghc,ezyang/ghc,tibbe/ghc,vTurbine/ghc,sgillespie/ghc,AlexanderPankiv/ghc,lukexi/ghc,nkaretnikov/ghc,wxwxwwxxx/ghc,vTurbine/ghc,fmthoma/ghc,TomMD/ghc,christiaanb/ghc,da-x/ghc,vikraman/ghc,nkaretnikov/ghc,ryantm/ghc,vikraman/ghc,mcschroeder/ghc,jstolarek/ghc,siddhanathan/ghc,gridaphobe/ghc,gcampax/ghc,anton-dessiatov/ghc,christiaanb/ghc,siddhanathan/ghc,anton-dessiatov/ghc,nkaretnikov/ghc,forked-upstream-packages-for-ghcjs/ghc,frantisekfarka/ghc-dsi,vTurbine/ghc,snoyberg/ghc,vTurbine/ghc,sdiehl/ghc,christiaanb/ghc,shlevy/ghc,mettekou/ghc,bitemyapp/ghc,shlevy/ghc,olsner/ghc,ezyang/ghc,gridaphobe/ghc,oldmanmike/ghc,mettekou/ghc,ryantm/ghc,vTurbine/ghc,da-x/ghc,christiaanb/ghc,mfine/ghc,mcschroeder/ghc,holzensp/ghc,gcampax/ghc,vikraman/ghc,wxwxwwxxx/ghc,acowley/ghc,jstolarek/ghc,anton-dessiatov/ghc,gridaphobe/ghc,AlexanderPankiv/ghc,mfine/ghc,shlevy/ghc,shlevy/ghc,GaloisInc/halvm-ghc,TomMD/ghc,jstolarek/ghc,spacekitteh/smcghc,jstolarek/ghc,forked-upstream-packages-for-ghcjs/ghc,AlexanderPankiv/ghc,ryantm/ghc,mfine/ghc,shlevy/ghc,sdiehl/ghc,lukexi/ghc,ml9951/ghc,mfine/ghc,olsner/ghc