From ee60f7f31db8897f2b078c964fe715813faee702 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Mon, 29 Oct 2007 13:19:21 +0000 Subject: [PATCH] FIX BUILD: Haddock 1.x fails to parse (Prelude..) --- Control/Category.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Control/Category.hs b/Control/Category.hs index 13fba06..c85ebd5 100644 --- a/Control/Category.hs +++ b/Control/Category.hs @@ -38,7 +38,10 @@ class Category cat where instance Category (->) where id = Prelude.id +#ifndef __HADDOCK__ +-- Haddock 1.x cannot parse this: (.) = (Prelude..) +#endif -- | Right-to-left composition (<<<) :: Category cat => cat b c -> cat a b -> cat a c -- 1.7.10.4