diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2011-10-21 16:37:43 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2011-10-21 16:37:43 +0100 |
| commit | 8f3f41787c2ec4ee5ce4f488580a0480abf2d3c5 (patch) | |
| tree | afa75a91a29f3584b6b8c3fb489c59d91915db7f /compiler/hsSyn | |
| parent | 6d5dfbf750320dd7bd0fea8e2965935fcedbe15e (diff) | |
| download | haskell-8f3f41787c2ec4ee5ce4f488580a0480abf2d3c5.tar.gz | |
Refactor the way in which type (and other) signatures are renamed
This was a trickier change than I had anticipated, but I think
it's considerably tidier now.
Fixes Trac #5533.
Diffstat (limited to 'compiler/hsSyn')
| -rw-r--r-- | compiler/hsSyn/HsBinds.lhs | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/compiler/hsSyn/HsBinds.lhs b/compiler/hsSyn/HsBinds.lhs index 7bc74e295b..7a5cd3b95a 100644 --- a/compiler/hsSyn/HsBinds.lhs +++ b/compiler/hsSyn/HsBinds.lhs @@ -727,25 +727,6 @@ isDefaultMethod (SpecPrags {}) = False \end{code} \begin{code} -okBindSig :: Sig a -> Bool -okBindSig _ = True - -okHsBootSig :: Sig a -> Bool -okHsBootSig (TypeSig _ _) = True -okHsBootSig (GenericSig _ _) = False -okHsBootSig (FixSig _) = True -okHsBootSig _ = False - -okClsDclSig :: Sig a -> Bool -okClsDclSig (SpecInstSig _) = False -okClsDclSig _ = True -- All others OK - -okInstDclSig :: Sig a -> Bool -okInstDclSig (TypeSig _ _) = False -okInstDclSig (GenericSig _ _) = False -okInstDclSig (FixSig _) = False -okInstDclSig _ = True - isFixityLSig :: LSig name -> Bool isFixityLSig (L _ (FixSig {})) = True isFixityLSig _ = False |