Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alex D
GHC
Commits
f770022b
Commit
f770022b
authored
Jul 05, 2007
by
Michael D. Adams
Browse files
Fixed a bug in the CPS pass
parent
fdc0fa55
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/cmm/CmmCPSGen.hs
View file @
f770022b
...
...
@@ -168,7 +168,7 @@ continuationToProc (max_stack, update_frame_size, formats) stack_use uniques
else
case
lookup
(
mkReturnPtLabel
$
getUnique
next
)
formats
of
Nothing
->
[
CmmBranch
next
]
Just
cont_format
->
pack_continuation
Fals
e
curr_format
cont_format
++
pack_continuation
Tru
e
curr_format
cont_format
++
tail_call
(
curr_stack
-
cont_stack
)
(
CmmLit
$
CmmLabel
$
mkReturnPtLabel
$
getUnique
next
)
arguments
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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