diff options
Diffstat (limited to 'ghc/compiler/rename/ParseIface.y')
| -rw-r--r-- | ghc/compiler/rename/ParseIface.y | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/compiler/rename/ParseIface.y b/ghc/compiler/rename/ParseIface.y index 362126453a..83450fa071 100644 --- a/ghc/compiler/rename/ParseIface.y +++ b/ghc/compiler/rename/ParseIface.y @@ -403,7 +403,7 @@ field : var_names1 '::' type { ($1, Unbanged $3) } type :: { RdrNameHsType } type : '__fuall' fuall '=>' type { mkHsUsForAllTy $2 $4 } | '__forall' forall context '=>' type - { mkHsForAllTy $2 $3 $5 } + { mkHsForAllTy (Just $2) $3 $5 } | btype '->' type { MonoFunTy $1 $3 } | btype { $1 } |