diff --git a/hmpfr.cabal b/hmpfr.cabal
--- a/hmpfr.cabal
+++ b/hmpfr.cabal
@@ -1,5 +1,5 @@
 name:                hmpfr
-version:             0.4.0.1
+version:             0.4.0.2
 synopsis:            Haskell binding to the MPFR library
 description:
   Haskell binding to the MPFR library.
@@ -71,7 +71,6 @@
 
                        Data.Number.MPFR.Mutable
 
-  build-tools:         hsc2hs
   GHC-options:         -Wall -fno-warn-orphans
   hs-source-dirs:      src
   include-dirs:        cbits
diff --git a/src/Data/Number/MPFR/Mutable/Arithmetic.hs b/src/Data/Number/MPFR/Mutable/Arithmetic.hs
--- a/src/Data/Number/MPFR/Mutable/Arithmetic.hs
+++ b/src/Data/Number/MPFR/Mutable/Arithmetic.hs
@@ -20,7 +20,7 @@
 
 import Control.Monad.ST(ST)
 
-import Data.Word(Word)
+-- import Data.Word(Word)
 
 add :: MMPFR s -> MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 add = withMutableMPFRBA mpfr_add
@@ -65,11 +65,11 @@
 muli = withMutableMPFR1 mpfr_mul_si
 
 muld :: MMPFR s -> MMPFR s -> Double -> RoundMode -> ST s Int
-muld = withMutableMPFRd mpfr_mul_d 
-     
+muld = withMutableMPFRd mpfr_mul_d
+
 sqr ::  MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 sqr = withMutableMPFRS mpfr_sqr
-      
+
 div :: MMPFR s -> MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 div = withMutableMPFRBA mpfr_div
 
@@ -93,19 +93,19 @@
 
 sqrt ::  MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 sqrt = withMutableMPFRS mpfr_sqrt
-      
+
 sqrtw :: MMPFR s -> Word -> RoundMode -> ST s Int
 sqrtw = withMutableMPFRUI mpfr_sqrt_ui
 
 recSqrt ::  MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 recSqrt = withMutableMPFRS mpfr_rec_sqrt
- 
+
 cbrt ::  MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 cbrt = withMutableMPFRS mpfr_cbrt
-      
+
 root :: MMPFR s -> MMPFR s -> Word -> RoundMode -> ST s Int
 root = withMutableMPFR1 mpfr_root
-      
+
 pow :: MMPFR s -> MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 pow = withMutableMPFRBA mpfr_pow
 
@@ -118,9 +118,9 @@
 wpow :: MMPFR s -> Word -> MMPFR s -> RoundMode -> ST s Int
 wpow = withMutableMPFR2 mpfr_ui_pow
 
---wpoww       :: RoundMode -> Precision -> Word -> Word -> MPFR 
+--wpoww       :: RoundMode -> Precision -> Word -> Word -> MPFR
 --wpoww r p d = fst . wpoww_ r p d
-   
+
 neg ::  MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 neg = withMutableMPFRS mpfr_neg
 
@@ -141,4 +141,3 @@
 
 div2i :: MMPFR s -> MMPFR s -> Int -> RoundMode -> ST s Int
 div2i = withMutableMPFR1 mpfr_div_2si
-      
diff --git a/src/Data/Number/MPFR/Mutable/Special.hs b/src/Data/Number/MPFR/Mutable/Special.hs
--- a/src/Data/Number/MPFR/Mutable/Special.hs
+++ b/src/Data/Number/MPFR/Mutable/Special.hs
@@ -18,7 +18,7 @@
 
 import Control.Monad.ST(ST)
 
-import Data.Word(Word)
+-- import Data.Word(Word)
 
 log :: MMPFR s -> MMPFR s -> RoundMode -> ST s Int
 log = withMutableMPFRS mpfr_log
@@ -124,7 +124,7 @@
 
 {- TODO
 lgamma       :: RoundMode -> Precision -> MPFR -> (MPFR, Int)
-lgamma r p d = case lgamma_ r p d of 
+lgamma r p d = case lgamma_ r p d of
                  (a, b, _) -> (a,b)
 -}