From c6cd93f4a1c9cc4c7ffa297efef85581cde6a447 Mon Sep 17 00:00:00 2001
From: Sven Panne <svenpanne@gmail.com>
Date: Wed, 21 Mar 2018 15:10:38 +0100
Subject: [PATCH] Check for 'base' version, not for GHC version.

---
 src/Data/StateVar.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Data/StateVar.hs b/src/Data/StateVar.hs
index 06ac307..b4c581f 100644
--- a/src/Data/StateVar.hs
+++ b/src/Data/StateVar.hs
@@ -238,7 +238,7 @@ instance Storable a => HasUpdate (Ptr a) a a where
 
 instance HasUpdate (IORef a) a a where
   r $~ f  = liftIO $ atomicModifyIORef r $ \a -> (f a,())
-#if __GLASGOW_HASKELL__ >= 706
+#if MIN_VERSION_base(4,6,0)
   r $~! f = liftIO $ atomicModifyIORef' r $ \a -> (f a,())
 #else
   r $~! f = liftIO $ do