Mark retry# as returning bottom.
Mark retry# as returning bottom.

This change helps the simplifier eliminate unreachable code, since
retry# technically doesn't return.

This closes ticket #8091.

Authored-by: Patrick Palka <cbb7353e6d953ef360baf960c122346276c6e320@parcs.ath.cx>
Signed-off-by: Austin Seipp <48c905ac3851f382b914247d97dd93273d5ff555@pobox.com>

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