diff --git a/src/Data/Int/Int24.hs b/src/Data/Int/Int24.hs
--- a/src/Data/Int/Int24.hs
+++ b/src/Data/Int/Int24.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE MagicHash, NoImplicitPrelude, BangPatterns #-}
+{-# LANGUAGE MagicHash, NoImplicitPrelude, BangPatterns, CPP #-}
 
 -----------------------------------------------------------------------------
 -- |
@@ -36,6 +36,14 @@
 import GHC.Ptr
 import GHC.Err
 
+#if __GLASGOW_HASKELL__ >= 702
+#define TOINT integerToInt
+#else
+#define TOINT toInt#
+#endif
+
+ghcver = __GLASGOW_HASKELL__
+
 ------------------------------------------------------------------------
 -- type Int24
 ------------------------------------------------------------------------
@@ -72,7 +80,7 @@
     signum x | x > 0       = 1
     signum 0               = 0
     signum _               = -1
-    fromInteger i          = I24# (narrow24Int# (toInt# i))
+    fromInteger i          = I24# (narrow24Int# (TOINT i))
 
 instance Real Int24 where
     toRational x = toInteger x % 1
diff --git a/word24.cabal b/word24.cabal
--- a/word24.cabal
+++ b/word24.cabal
@@ -1,5 +1,5 @@
 name:		word24
-version:        1.0.1
+version:        1.0.2
 synopsis:       24-bit word and int types for GHC
 description:	24-bit Word and Int data types.
 category:       Data
@@ -8,7 +8,7 @@
 license:	BSD3
 license-file:	LICENSE
 homepage:       http://www.tiresiaspress.us/haskell/word24
-tested-with:    GHC == 6.12.3, GHC == 7.0.4
+tested-with:    GHC == 6.12.3, GHC == 7.0.4, GHC == 7.2.1
 stability:	stable
 
 cabal-version:  >= 1.6