diff options
| author | David Waern <davve@dtek.chalmers.se> | 2007-11-06 09:37:14 +0000 |
|---|---|---|
| committer | David Waern <davve@dtek.chalmers.se> | 2007-11-06 09:37:14 +0000 |
| commit | 7979ad1f2db293ed15109b94e0b898d96e124517 (patch) | |
| tree | e9e0ee2715eeb43164a11c765f45ac9c498bdd7b /src/Haddock/Interface/AttachInstances.hs | |
| parent | e05c48731b6af1a8c71c0f379cf16c7079b93fa3 (diff) | |
Wibble
Diffstat (limited to 'src/Haddock/Interface/AttachInstances.hs')
| -rw-r--r-- | src/Haddock/Interface/AttachInstances.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Interface/AttachInstances.hs b/src/Haddock/Interface/AttachInstances.hs index f5140401..227de68a 100644 --- a/src/Haddock/Interface/AttachInstances.hs +++ b/src/Haddock/Interface/AttachInstances.hs @@ -117,7 +117,7 @@ toHsInstHead (_, preds, cls, ts) = (map toHsPred preds, className cls, map toHsT -------------------------------------------------------------------------------- -toHsPred :: PredType -> HsPred Name +toHsPred :: PredType -> HsPred Name toHsPred (ClassP cls ts) = HsClassP (className cls) (map toLHsType ts) toHsPred (IParam n t) = HsIParam n (toLHsType t) |