Desugar bang patterns correctly (fixes Trac #7649)
Desugar bang patterns correctly (fixes Trac #7649)

We were discarding a bang around a view pattern, which is
utterly wrong

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