diff options
author | Krzysztof Gogolewski <krz.gogolewski@gmail.com> | 2014-09-14 14:08:35 +0200 |
---|---|---|
committer | Krzysztof Gogolewski <krz.gogolewski@gmail.com> | 2014-09-14 17:17:09 +0200 |
commit | 4023817d7c0e46db012ba2eea28022626841ca9b (patch) | |
tree | b05b5087ce50b7f40fe9ef5787fa63a6edfe3be0 /src/Haddock/Backends/Hoogle.hs | |
parent | c3a7d4701ee64f6c29b95a6bed519f6c16b9bffd (diff) |
Followup changes to addition of -fwarn-context-quantification (GHC Trac #4426)
Diffstat (limited to 'src/Haddock/Backends/Hoogle.hs')
-rw-r--r-- | src/Haddock/Backends/Hoogle.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Haddock/Backends/Hoogle.hs b/src/Haddock/Backends/Hoogle.hs index 13145298..4535ce5c 100644 --- a/src/Haddock/Backends/Hoogle.hs +++ b/src/Haddock/Backends/Hoogle.hs @@ -134,6 +134,7 @@ ppSig dflags (TypeSig names sig) prettyNames = intercalate ", " $ map (out dflags) names typ = case unL sig of HsForAllTy Explicit a b c -> HsForAllTy Implicit a b c + HsForAllTy Qualified a b c -> HsForAllTy Implicit a b c x -> x ppSig _ _ = [] |