Merge branch 'master' into release

This commit is contained in:
Daniel Gröber 2014-09-17 23:39:55 +02:00
commit 7665d500d2

View File

@ -174,7 +174,7 @@ getSignatureFromHE file lineNo colNo = do
dHeadTyVars (HE.DHParen _ r) = dHeadTyVars r dHeadTyVars (HE.DHParen _ r) = dHeadTyVars r
#else #else
dHeadTyVars :: HE.DeclHead l -> (HE.Name l, [HE.TyVarBind l]) dHeadTyVars :: HE.DeclHead l -> (HE.Name l, [HE.TyVarBind l])
dHeadTyVars (DHead _ n tys) = (n, tys) dHeadTyVars (HE.DHead _ n tys) = (n, tys)
#endif #endif
---------------------------------------------------------------- ----------------------------------------------------------------