diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,3 +1,9 @@
+0.8.3
+===
+
+- GHC 9.14.1 support
+- relaxed dependency bounds via allow-newer for GHC 9.14 compatibility
+
 0.8.2
 ===
 
diff --git a/chart-svg.cabal b/chart-svg.cabal
--- a/chart-svg.cabal
+++ b/chart-svg.cabal
@@ -1,6 +1,6 @@
 cabal-version: 3.0
 name: chart-svg
-version: 0.8.2.1
+version: 0.8.3.0
 license: BSD-3-Clause
 license-file: LICENSE
 copyright: Tony Day (c) 2017
@@ -31,9 +31,9 @@
 
 build-type: Simple
 tested-with:
-  ghc ==9.8.4
-  ghc ==9.10.2
+  ghc ==9.10.3
   ghc ==9.12.2
+  ghc ==9.14.1
 
 extra-doc-files:
   ChangeLog.md
diff --git a/src/Data/Path.hs b/src/Data/Path.hs
--- a/src/Data/Path.hs
+++ b/src/Data/Path.hs
@@ -489,6 +489,7 @@
   where
     begin :: (Point Double, Rect Double)
     begin = (pointPath x, singleton (pointPath x))
+    step (start', r) a@(ArcP _ p) = (pointPath a, bool (pathBox start' a <> r) r (p == start'))
     step (start', r) a = (pointPath a, pathBox start' a <> r)
 
 -- | Bounding box for a path info, start and end Points.