Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alex D
GHC
Commits
7a86f584
Commit
7a86f584
authored
Jul 31, 2016
by
Joachim Breitner
Browse files
Comments only: Refer to actually existing Notes
parent
613d7455
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/stranal/DmdAnal.hs
View file @
7a86f584
...
...
@@ -67,8 +67,9 @@ dmdAnalTopBind sigs (NonRec id rhs)
(
_
,
_
,
_
,
rhs1
)
=
dmdAnalRhsLetDown
TopLevel
Nothing
sigs
id
rhs
(
sig
,
_
,
id2
,
rhs2
)
=
dmdAnalRhsLetDown
TopLevel
Nothing
(
nonVirgin
sigs
)
id
rhs1
-- Do two passes to improve CPR information
-- See comments with ignore_cpr_info in mk_sig_ty
-- and with extendSigsWithLam
-- See Note [CPR for thunks]
-- See Note [Optimistic CPR in the "virgin" case]
-- See Note [Initial CPR for strict binders]
dmdAnalTopBind
sigs
(
Rec
pairs
)
=
(
sigs'
,
Rec
pairs'
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment