diff options
Diffstat (limited to 'compiler/parser/Parser.y.pp')
-rw-r--r-- | compiler/parser/Parser.y.pp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/parser/Parser.y.pp b/compiler/parser/Parser.y.pp index 759d5449f9..21f8782f6f 100644 --- a/compiler/parser/Parser.y.pp +++ b/compiler/parser/Parser.y.pp @@ -1762,10 +1762,10 @@ dbinds :: { Located [LIPBind RdrName] } -- | {- empty -} { [] } dbind :: { LIPBind RdrName } -dbind : ipvar '=' exp { LL (IPBind (unLoc $1) $3) } +dbind : ipvar '=' exp { LL (IPBind (Left (unLoc $1)) $3) } -ipvar :: { Located (IPName RdrName) } - : IPDUPVARID { L1 (IPName (mkUnqual varName (getIPDUPVARID $1))) } +ipvar :: { Located HsIPName } + : IPDUPVARID { L1 (HsIPName (getIPDUPVARID $1)) } ----------------------------------------------------------------------------- -- Warnings and deprecations |