[project @ 1999-07-07 15:27:27 by simonmar] - charge 1 for a case expression
[project @ 1999-07-07 15:27:27 by simonmar]
- charge 1 for a case expression

- give a discount of opt_UF_ScrutConDiscount each time a constructor
  is scrutinised

(previously a case expression was not charged for at all, and the
discount for a scrutinised constructor was (opt_UF_ScrutConDiscount *
tyconFamilySize).  In 4.02, a case expression was also charged
tyconFamilySize to balance the discount, but this had the disadvantage
of charging for alternatives which may not be present in the actual
case expression).

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