diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+## [1.0.0.1] - 2022-08-14
+
+- Compat: support GHC 9.4.1
+
 ## [1.0.0] - 2022-06-30
 
 - Breaking: Remove `Context` type, `Ki.Implicit` module, and the ability to soft-cancel a `Scope`.
diff --git a/ki.cabal b/ki.cabal
--- a/ki.cabal
+++ b/ki.cabal
@@ -11,7 +11,8 @@
 name: ki
 stability: experimental
 synopsis: A lightweight structured concurrency library
-version: 1.0.0
+-- tested-with: GHC == 9.0.2, GHC == 9.2.4, GHC == 9.4.1
+version: 1.0.0.1
 
 description:
   A lightweight structured concurrency library.
@@ -32,7 +33,7 @@
 
 common component
   build-depends:
-    base ^>= 4.12 || ^>= 4.13 || ^>= 4.14 || ^>= 4.15 || ^>= 4.16,
+    base ^>= 4.12 || ^>= 4.13 || ^>= 4.14 || ^>= 4.15 || ^>= 4.16 || ^>= 4.17,
   default-extensions:
     AllowAmbiguousTypes
     BangPatterns
diff --git a/src/Ki/Internal/Prelude.hs b/src/Ki/Internal/Prelude.hs
--- a/src/Ki/Internal/Prelude.hs
+++ b/src/Ki/Internal/Prelude.hs
@@ -49,14 +49,14 @@
 
 -- Control.Concurrent.forkIO without the dumb exception handler
 forkIO :: IO () -> IO ThreadId
-forkIO action =
+forkIO (IO action) =
   IO \s0 ->
     case fork# action s0 of
       (# s1, tid #) -> (# s1, ThreadId tid #)
 
 -- Control.Concurrent.forkOn without the dumb exception handler
 forkOn :: Int -> IO () -> IO ThreadId
-forkOn (I# cap) action =
+forkOn (I# cap) (IO action) =
   IO \s0 ->
     case forkOn# cap action s0 of
       (# s1, tid #) -> (# s1, ThreadId tid #)
diff --git a/src/Ki/Internal/Thread.hs b/src/Ki/Internal/Thread.hs
--- a/src/Ki/Internal/Thread.hs
+++ b/src/Ki/Internal/Thread.hs
@@ -108,10 +108,10 @@
 --
 -- @
 -- 'Ki.ThreadOptions'
---   { 'Ki.affinity' = Nothing
+--   { 'Ki.affinity' = 'Ki.Unbound'
 --   , 'Ki.allocationLimit' = Nothing
 --   , 'Ki.label' = ""
---   , 'Ki.maskingState' = Unmasked
+--   , 'Ki.maskingState' = 'Unmasked'
 --   }
 -- @
 defaultThreadOptions :: ThreadOptions