diff options
Diffstat (limited to 'compiler/parser/RdrHsSyn.lhs')
| -rw-r--r-- | compiler/parser/RdrHsSyn.lhs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/parser/RdrHsSyn.lhs b/compiler/parser/RdrHsSyn.lhs index 094efac789..20055e3b7d 100644 --- a/compiler/parser/RdrHsSyn.lhs +++ b/compiler/parser/RdrHsSyn.lhs @@ -726,7 +726,8 @@ checkPatBind :: LHsExpr RdrName -> P (HsBind RdrName) checkPatBind lhs (L _ grhss) = do { lhs <- checkPattern lhs - ; return (PatBind lhs grhss placeHolderType placeHolderNames) } + ; return (PatBind lhs grhss placeHolderType placeHolderNames + (Nothing,[])) } checkValSig :: LHsExpr RdrName |