diff --git a/ghc/compiler/rename/ParseIface.y b/ghc/compiler/rename/ParseIface.y index 4cf9211aae210780cc3d7314e078059641a1d3d4..bcf592d070a6dde2d631a5c4f6b62c137d87af41 100644 --- a/ghc/compiler/rename/ParseIface.y +++ b/ghc/compiler/rename/ParseIface.y @@ -682,7 +682,7 @@ ccall_string :: { FAST_STRING } ------------------------------------------------------------------------ scc :: { CostCentre } : '__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, cc_is_dupd = $6, cc_is_caf = $7 } }