diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
 ## Changelog
 
+#### 0.19.1.1 (2014-04-07)
+
+* Fix compilation on GHC 7.8
+
 ### 0.19.1 (2014-03-13)
 
 * Add Data.Char
diff --git a/fay-base.cabal b/fay-base.cabal
--- a/fay-base.cabal
+++ b/fay-base.cabal
@@ -1,5 +1,5 @@
 name:                fay-base
-version:             0.19.1
+version:             0.19.1.1
 synopsis:            The base package for Fay.
 description:         The base package for Fay.
                      This package amongst others exports Prelude and FFI which you probably want to use with Fay.
diff --git a/src/Data/Ratio.hs b/src/Data/Ratio.hs
--- a/src/Data/Ratio.hs
+++ b/src/Data/Ratio.hs
@@ -1,5 +1,7 @@
 {-# LANGUAGE NoImplicitPrelude #-}
 {-# LANGUAGE PackageImports #-}
+{-# LANGUAGE CPP #-}
+{-# LANGUAGE DeriveDataTypeable #-}
 {-# OPTIONS -w #-}
 
 module Data.Ratio where
@@ -12,9 +14,15 @@
 -- Rational
 
 data Rational = Ratio Int Int
+#ifndef FAY
+    deriving Typeable
+#endif
+
 instance Base.Show Rational
 instance Data Rational
+#ifdef FAY
 instance Typeable Rational
+#endif
 
 (%) :: Int -> Int -> Rational
 x % y = reduce (x * signum y) (abs y)