diff options
| author | Richard Eisenberg <eir@cis.upenn.edu> | 2013-07-24 13:15:59 +0100 |
|---|---|---|
| committer | Richard Eisenberg <eir@cis.upenn.edu> | 2013-07-24 13:15:59 +0100 |
| commit | 9f356e8b53b3770293c8fd4e91fe1a2b40e42dee (patch) | |
| tree | e28278de3969c9a21f212dc6a3dd603798f4bbaa /src/Haddock/Convert.hs | |
| parent | e2c419b7b581d72f49f2336025af2092127a9776 (diff) | |
Remove (error "synifyKind") to use WithinType, to allow haddock to process base.
Diffstat (limited to 'src/Haddock/Convert.hs')
| -rw-r--r-- | src/Haddock/Convert.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Convert.hs b/src/Haddock/Convert.hs index d3bda268..0f7e5b9c 100644 --- a/src/Haddock/Convert.hs +++ b/src/Haddock/Convert.hs @@ -353,7 +353,7 @@ synifyTyLit (NumTyLit n) = HsNumTy n synifyTyLit (StrTyLit s) = HsStrTy s synifyKindSig :: Kind -> LHsKind Name -synifyKindSig k = synifyType (error "synifyKind") k +synifyKindSig k = synifyType WithinType k synifyInstHead :: ([TyVar], [PredType], Class, [Type]) -> ([HsType Name], Name, [HsType Name]) |