diff --git a/CHANGELOG.markdown b/CHANGELOG.markdown
--- a/CHANGELOG.markdown
+++ b/CHANGELOG.markdown
@@ -1,3 +1,7 @@
+0.10.0.1
+--------
+* Improved the stability and portability of the `doctest` test suite
+
 0.10
 ----
 * `(**)` is now much more accurately defined.
diff --git a/HLint.hs b/HLint.hs
new file mode 100644
--- /dev/null
+++ b/HLint.hs
@@ -0,0 +1,1 @@
+ignore "Use camelCase"
diff --git a/log-domain.cabal b/log-domain.cabal
--- a/log-domain.cabal
+++ b/log-domain.cabal
@@ -1,6 +1,6 @@
 name:          log-domain
 category:      Numeric
-version:       0.10
+version:       0.10.0.1
 license:       BSD3
 cabal-version: >= 1.8
 license-file:  LICENSE
@@ -25,6 +25,7 @@
   AUTHORS.markdown
   README.markdown
   CHANGELOG.markdown
+  HLint.hs
 
 source-repository head
   type: git
diff --git a/src/Numeric/Log.hs b/src/Numeric/Log.hs
--- a/src/Numeric/Log.hs
+++ b/src/Numeric/Log.hs
@@ -56,6 +56,8 @@
 
 {-# ANN module "HLint: ignore Eta reduce" #-}
 
+-- $setup
+-- >>> let Exp x ~= Exp y = abs ((exp x-exp y) / exp x) < 0.01
 
 -- | @Log@-domain @Float@ and @Double@ values.
 newtype Log a = Exp { ln :: a } deriving (Eq,Ord,Data,Typeable,Generic)
@@ -191,18 +193,17 @@
 
 -- | Handle subtraction.
 --
--- >>> 3 - 1 :: Log Double
--- 2.0000000000000004
+-- >>> (3 - 1 :: Log Double) ~= 2
+-- True
 --
 -- >>> 1 - 3 :: Log Double
 -- NaN
 -- 
--- >>> 3 - 2 :: Log Float
--- 1.0
+-- >>> (3 - 2 :: Log Float) ~= 1
+-- True
 --
 -- >>> 1 - 3 :: Log Float
 -- NaN
---
 
 instance (Precise a, RealFloat a) => Num (Log a) where
   Exp a * Exp b
@@ -320,13 +321,13 @@
 -- While for small quantities the naive sum accumulates error,
 --
 -- >>> let xs = Prelude.replicate 40000 (Exp 1e-4) :: [Log Float]
--- >>> Prelude.sum xs
--- 40001.3
+-- >>> Prelude.sum xs ~= 4.00e4
+-- True
 --
 -- This sum gives a more accurate result,
 --
--- >>> Numeric.Log.sum xs
--- 40004.01
+-- >>> Numeric.Log.sum xs ~= 4.00e4
+-- True
 --
 -- /NB:/ This does require two passes over the data.
 sum :: (RealFloat a, Ord a, Precise a, Foldable f) => f (Log a) -> Log a