diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2019-10-27 10:16:16 -0400 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2019-10-27 10:16:16 -0400 |
| commit | 25991b19d75a5ddda29ee8d4815a162ed7a96ba2 (patch) | |
| tree | 4eddac2f8fe25d98cb62e9e3b84e9ee16021e506 /haddock-api/src/Haddock/Backends | |
| parent | 08b5533323201342b96987379c374be53ca7541a (diff) | |
| parent | fad111e9d3de1a2e86837d3e6f72fe0cf2f6c0ac (diff) | |
Merge pull request #1105 from sgraf812/wip/flexible-outputable
Refactor for OutputableBndrId changes
Diffstat (limited to 'haddock-api/src/Haddock/Backends')
| -rw-r--r-- | haddock-api/src/Haddock/Backends/Hoogle.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/haddock-api/src/Haddock/Backends/Hoogle.hs b/haddock-api/src/Haddock/Backends/Hoogle.hs index 9298f262..b76d14b5 100644 --- a/haddock-api/src/Haddock/Backends/Hoogle.hs +++ b/haddock-api/src/Haddock/Backends/Hoogle.hs @@ -86,8 +86,8 @@ dropHsDocTy = f f (HsDocTy _ a _) = f $ unL a f x = x -outHsType :: (a ~ GhcPass p, OutputableBndrId a) - => DynFlags -> HsType a -> String +outHsType :: (OutputableBndrId p) + => DynFlags -> HsType (GhcPass p) -> String outHsType dflags = out dflags . reparenType . dropHsDocTy |