diff --git a/choice.cabal b/choice.cabal
--- a/choice.cabal
+++ b/choice.cabal
@@ -1,5 +1,5 @@
 name:                choice
-version:             0.2.0
+version:             0.2.1
 synopsis:            A solution to boolean blindness.
 description:         Please see README.md.
 homepage:            https://github.com/mboes/choice#readme
diff --git a/src/Data/Choice.hs b/src/Data/Choice.hs
--- a/src/Data/Choice.hs
+++ b/src/Data/Choice.hs
@@ -77,7 +77,10 @@
 -- | A synonym for 'Data.Proxy.Proxy'.
 data Label (a :: Symbol) = Label deriving (Eq, Ord, Show)
 
-#if MIN_VERSION_base(4,9,0)
+#if MIN_VERSION_base(4,10,0)
+instance x ~ x' => IsLabel x (Label x') where
+  fromLabel = Label
+#elif MIN_VERSION_base(4,9,0)
 instance x ~ x' => IsLabel x (Label x') where
   fromLabel _ = Label
 #endif