diff options
| author | simonmar <unknown> | 1999-12-09 16:45:57 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 1999-12-09 16:45:57 +0000 |
| commit | 49cc29372fb3081ae7a2ff63351a91656bb9d8e2 (patch) | |
| tree | df5228553ffe922cfdfe149ab3d4fa8f52b62a8f | |
| parent | b7c838d72825624f2d8ff43ad7f91b14a35bd3fb (diff) | |
| download | haskell-49cc29372fb3081ae7a2ff63351a91656bb9d8e2.tar.gz | |
[project @ 1999-12-09 16:45:57 by simonmar]
allow certain keywords as scc labels.
| -rw-r--r-- | ghc/compiler/rename/ParseIface.y | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ghc/compiler/rename/ParseIface.y b/ghc/compiler/rename/ParseIface.y index f8943492f5..7661607f43 100644 --- a/ghc/compiler/rename/ParseIface.y +++ b/ghc/compiler/rename/ParseIface.y @@ -469,7 +469,6 @@ mod_name :: { ModuleName } --------------------------------------------------- var_fs :: { EncodedFS } : VARID { $1 } - | VARSYM { $1 } | '!' { SLIT("!") } | 'as' { SLIT("as") } | 'qualified' { SLIT("qualified") } @@ -793,7 +792,7 @@ scc :: { CostCentre } cc_name :: { EncodedFS } : CONID { $1 } - | VARID { $1 } + | var_fs { $1 } cc_dup :: { IsDupdCC } cc_dup : { OriginalCC } |