diff options
author | Simon Peyton Jones <simonpj@microsoft.com> | 2014-12-01 14:29:30 +0000 |
---|---|---|
committer | Simon Peyton Jones <simonpj@microsoft.com> | 2014-12-01 14:29:30 +0000 |
commit | e77faaced8da576e65108d961ce9869502b62f2a (patch) | |
tree | 3399426240a48af9018eb74cc47d20a9baf6a3e2 | |
parent | e6a2050ebb6da316aecec66a6795715fbab355ca (diff) | |
download | haskell-e77faaced8da576e65108d961ce9869502b62f2a.tar.gz |
Wibble to the "instance signatures" patch
Sorry about this. I somehow failed to include this one line in my patch.
-rw-r--r-- | compiler/typecheck/TcBinds.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/typecheck/TcBinds.lhs b/compiler/typecheck/TcBinds.lhs index f2f4b1affe..f1a6463322 100644 --- a/compiler/typecheck/TcBinds.lhs +++ b/compiler/typecheck/TcBinds.lhs @@ -1371,7 +1371,7 @@ tcTySigs hs_sigs tcTySig :: LSig Name -> TcM ([TcSigInfo], [TcTyVar]) tcTySig (L _ (IdSig id)) - = do { sig <- instTcTySigFromId _ id + = do { sig <- instTcTySigFromId id ; return ([sig], []) } tcTySig (L loc (TypeSig names@(L _ name1 : _) hs_ty wcs)) = setSrcSpan loc $ |