Skip to content
Snippets Groups Projects
Commit c3a20f9d authored by Simon Marlow's avatar Simon Marlow
Browse files

[project @ 1999-03-26 15:17:45 by simonm] 

Fix for parsing __scc expressions.
parent 2cb4ece7
No related merge requests found
Hide whitespace changes
Inline Side-by-side
ghc/compiler/rename/ParseIface.y
+ 1
− 1
View file @ c3a20f9d
...@@ -682,7 +682,7 @@ ccall_string :: { FAST_STRING } ...@@ -682,7 +682,7 @@ ccall_string :: { FAST_STRING }
------------------------------------------------------------------------ ------------------------------------------------------------------------
scc :: { CostCentre } scc :: { CostCentre }
: '__sccC' '{' mod_name STRING '}' { AllCafsCC $3 $4 } : '__sccC' '{' mod_name STRING '}' { AllCafsCC $3 $4 }
| '__scc' '(' cc_name mod_name STRING cc_dup cc_caf '}' | '__scc' '{' cc_name mod_name STRING cc_dup cc_caf '}'
{ NormalCC { cc_name = $3, cc_mod = $4, cc_grp = $5, { NormalCC { cc_name = $3, cc_mod = $4, cc_grp = $5,
cc_is_dupd = $6, cc_is_caf = $7 } } cc_is_dupd = $6, cc_is_caf = $7 } }
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment