diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,8 @@
+## 1.0.6
+
+- Support GHC-9.12.1
+- Fix a small bug QuarterOfYear instance
+
 ## 1.0.5
 
 - Support GHC-8.6.5...9.10.1
diff --git a/binary-instances.cabal b/binary-instances.cabal
--- a/binary-instances.cabal
+++ b/binary-instances.cabal
@@ -1,6 +1,6 @@
 cabal-version:      2.2
 name:               binary-instances
-version:            1.0.5
+version:            1.0.6
 synopsis:           Orphan instances for binary
 description:
   `binary-instances` defines orphan instances for types in some popular packages.
@@ -20,9 +20,10 @@
    || ==9.0.2
    || ==9.2.8
    || ==9.4.8
-   || ==9.6.5
-   || ==9.8.2
+   || ==9.6.6
+   || ==9.8.4
    || ==9.10.1
+   || ==9.12.2
 
 extra-source-files: CHANGELOG.md
 
@@ -34,18 +35,18 @@
   default-language: Haskell2010
   hs-source-dirs:   src
   build-depends:
-    , base    >=4.6.0.1 && <4.21
+    , base    >=4.6.0.1 && <4.22
     , binary  >=0.5.1.1 && <0.8.10
     , text    >=1.2.3.0 && <1.3    || >=2.0 && <2.2
 
   build-depends:
     , case-insensitive  >=1.2.1.0 && <1.2.2
-    , tagged            >=0.8.8   && <0.8.9
+    , tagged            >=0.8.8   && <0.8.10
 
   build-depends:
     , aeson                    ^>=2.2.2.0
     , binary-orphans           ^>=1.0.5
-    , hashable                 ^>=1.4.4.0
+    , hashable                 ^>=1.4.4.0  || ^>=1.5.0.0
     , primitive                ^>=0.9.0.0
     , scientific               ^>=0.3.8.0
     , time-compat              ^>=1.9.7
@@ -86,7 +87,7 @@
     , scientific
     , tagged
     , tasty                 ^>=1.5
-    , tasty-quickcheck      ^>=0.10.3
+    , tasty-quickcheck      ^>=0.10.3 || ^>=0.11
     , text
     , time-compat
     , unordered-containers
diff --git a/src/Data/Binary/Instances/Time.hs b/src/Data/Binary/Instances/Time.hs
--- a/src/Data/Binary/Instances/Time.hs
+++ b/src/Data/Binary/Instances/Time.hs
@@ -86,7 +86,7 @@
             4 -> Time.Thursday
             5 -> Time.Friday
             6 -> Time.Saturday
-            _ -> error "panic: get @DayOfWeek"
+            j -> error $ "panic: get @DayOfWeek: " ++ show (i, j)
 
 instance Binary Time.Month where
     put (Time.MkMonth m) = put m
@@ -104,9 +104,9 @@
 
     get = do
         i <- get
-        return $ case mod (i :: Word8) 7 of
+        return $ case mod (i :: Word8) 4 of
             1 -> Time.Q1
             2 -> Time.Q2
             3 -> Time.Q3
-            4 -> Time.Q4
-            _ -> error "panic: get @DayOfWeek"
+            0 -> Time.Q4
+            j -> error $ "panic: get @QuarterOfYear: " ++ show (i, j)