diff --git a/grapefruit-ui.cabal b/grapefruit-ui.cabal
--- a/grapefruit-ui.cabal
+++ b/grapefruit-ui.cabal
@@ -1,5 +1,5 @@
 Name:          grapefruit-ui
-Version:       0.1.0.6
+Version:       0.1.0.7
 Cabal-Version: >= 1.8
 Build-Type:    Simple
 License:       BSD3
@@ -10,7 +10,7 @@
 Maintainer:    wolfgang-it@jeltsch.info
 Stability:     provisional
 Homepage:      https://grapefruit-project.org/
-Package-URL:   https://hackage.haskell.org/package/grapefruit-ui-0.1.0.6/grapefruit-ui-0.1.0.6.tar.gz
+Package-URL:   https://hackage.haskell.org/package/grapefruit-ui-0.1.0.7/grapefruit-ui-0.1.0.7.tar.gz
 Synopsis:      Declarative user interface programming
 Description:   Grapefruit is a library for Functional Reactive Programming (FRP)
                with a focus on user interfaces. FRP makes it possible to
@@ -25,7 +25,7 @@
                only backend is one based on GTK+. This is provided by the
                grapefruit-ui-gtk package.
 Category:      FRP, Reactivity, GUI, User Interfaces
-Tested-With:   GHC == 8.0.1
+Tested-With:   GHC == 7.10.3, GHC == 8.0.1
 
 Source-Repository head
     Type:     darcs
@@ -34,7 +34,7 @@
 Source-Repository this
     Type:     darcs
     Location: http://hub.darcs.net/jeltsch/grapefruit
-    Tag:      grapefruit-0.1.0.6
+    Tag:      grapefruit-0.1.0.7
 
 Library
     Build-Depends:   arrows             >= 0.2   && < 0.5,
diff --git a/src/Internal/UICircuit.hs b/src/Internal/UICircuit.hs
--- a/src/Internal/UICircuit.hs
+++ b/src/Internal/UICircuit.hs
@@ -77,7 +77,10 @@
 
     -- |Converts an ordinary circuit into a user interface circuit that contains no items.
     fromCircuit :: Circuit era i o -> UICircuit item uiBackend era i o
-    fromCircuit = liftReader >>> UICircuit
+    fromCircuit = liftReader >>> UICircuit where
+
+        -- custom definition of liftReader for working around a GHC 7.10.3 bug
+        liftReader circuit = ReaderArrow (arr fst >>> circuit)
 
     {-|
         Runs a user interface circuit.
diff --git a/src/Internal/UIItem.hs b/src/Internal/UIItem.hs
--- a/src/Internal/UIItem.hs
+++ b/src/Internal/UIItem.hs
@@ -102,6 +102,9 @@
                     _          <- putSetup                  -< Setup.fromIO $ showItem nativeItem
                     returnA -< o
 
+        -- custom definition of liftReader for working around a GHC 7.10.3 bug
+        liftReader circuit = ReaderArrow (arr fst >>> circuit)
+
     -- * Bricks
     {-|
         A brick is an era-independent item with a comfortable record-based interface.