aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorDavid Waern <david.waern@gmail.com>2009-07-06 23:01:35 +0000
committerDavid Waern <david.waern@gmail.com>2009-07-06 23:01:35 +0000
commitefa855c879246fb3869a1c957181f623d43cb265 (patch)
tree2d119b0821b33b73866217b002a79dec3174b081 /src
parent072a7318aaab784c4981cb4357a70f228b0136fd (diff)
Follow HsRecTy change with an #if __GLASGOW_HASKEL__ >= 611
Diffstat (limited to 'src')
-rw-r--r--src/Haddock/Backends/Html.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Haddock/Backends/Html.hs b/src/Haddock/Backends/Html.hs
index 9ad8f9da..410dd6b3 100644
--- a/src/Haddock/Backends/Html.hs
+++ b/src/Haddock/Backends/Html.hs
@@ -1542,7 +1542,9 @@ ppr_mono_ty _ (HsPArrTy ty) u = pabrackets (ppr_mono_lty pREC_TOP
ppr_mono_ty _ (HsPredTy p) u = parens (ppPred u p)
ppr_mono_ty _ (HsNumTy n) _ = toHtml (show n) -- generics only
ppr_mono_ty _ (HsSpliceTy _) _ = error "ppr_mono_ty-haddock"
+#if __GLASGOW_HASKELL__ >= 611
ppr_mono_ty _ (HsRecTy _) _ = error "ppr_mono_ty HsRecTy"
+#endif
ppr_mono_ty ctxt_prec (HsAppTy fun_ty arg_ty) unicode
= maybeParen ctxt_prec pREC_CON $