Simplify code slightly; no change in behaviour
Simplify code slightly; no change in behaviour

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