summaryrefslogtreecommitdiff
path: root/compiler/vectorise
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2015-01-08 15:54:39 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2015-01-08 15:57:39 +0000
commit9564bb8c84cbc0397a414e946cc8c28801f0fbe7 (patch)
treee9f3793a9ebd81b9c0961391c02122d85ea7de30 /compiler/vectorise
parent43e5a2216494004d2073a472af13239d004f2ed6 (diff)
downloadhaskell-9564bb8c84cbc0397a414e946cc8c28801f0fbe7.tar.gz
Improve HsBang
Provoked by questions from Johan - Improve comments, fix misleading stuff - Add commented synonyms for HsSrcBang, HsImplBang, and use them throughout - Rename HsUserBang to HsSrcBang - Rename dataConStrictMarks to dataConSrcBangs dataConRepBangs to dataConImplBangs This renaming affects Haddock in a trivial way, hence submodule update
Diffstat (limited to 'compiler/vectorise')
-rw-r--r--compiler/vectorise/Vectorise/Type/TyConDecl.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/vectorise/Vectorise/Type/TyConDecl.hs b/compiler/vectorise/Vectorise/Type/TyConDecl.hs
index 37a07f710d..7b4d5aaad0 100644
--- a/compiler/vectorise/Vectorise/Type/TyConDecl.hs
+++ b/compiler/vectorise/Vectorise/Type/TyConDecl.hs
@@ -177,7 +177,7 @@ vectDataCon dc
; liftDs $ buildDataCon fam_envs
name'
(dataConIsInfix dc) -- infix if the original is
- (dataConStrictMarks dc) -- strictness as original constructor
+ (dataConSrcBangs dc) -- strictness as original constructor
[] -- no labelled fields for now
univ_tvs -- universally quantified vars
[] -- no existential tvs for now