A bit of refactoring, plus a sanity check
A bit of refactoring, plus a sanity check

Check that a bottoming rhs does indeed get exposed with bottoming strictness
Almost all the changed lines reflect some refactoring of tidyTopIdInfo.

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