diff --git a/Data/Heap.hs b/Data/Heap.hs
--- a/Data/Heap.hs
+++ b/Data/Heap.hs
@@ -81,7 +81,6 @@
 	foldMap f (Tree _ x l r) = foldMap f l `mappend` f x `mappend` foldMap f r
 
 instance (HeapPolicy p a, Read a) => Read (Heap p a) where
-#ifndef __HADDOCK__
 #ifdef __GLASGOW_HASKELL__
 	readPrec = parens $ prec 10 $ do
 		Ident "fromList" <- lexP
@@ -93,7 +92,6 @@
 		("fromList", s) <- lex r
 		(xs, t) <- reads s
 		return (fromList xs, t)
-#endif
 #endif
 
 -- |
diff --git a/heap.cabal b/heap.cabal
--- a/heap.cabal
+++ b/heap.cabal
@@ -1,5 +1,5 @@
 Name:          heap
-Version:       0.2.1
+Version:       0.2.2
 Stability:     beta
 Category:      Data
 Synopsis:      Heaps in Haskell
@@ -16,3 +16,4 @@
   Build-Depends:   base
   Exposed-Modules: Data.Heap
   ghc-options:     -O2 -Wall
+  Extensions:      CPP