diff --git a/CHANGES b/CHANGES
index 8401275cc..2a5c9d169 100644
--- a/CHANGES
+++ b/CHANGES
@@ -21,6 +21,7 @@
   * Lwt.pick and Lwt.choose select preferentially failed promises as per
   documentation (#856, #874, Raman Varabets)
   * Use the WSA_FLAG_NO_HANDLE_INHERIT on Windows when creating sockets with WSASocket if the cloexec (non-inheritable) parameter is true. Fixes a Windows problem where a child process would inherit a supposedly non-inheritable socket. (#910, Antonin Décimo)
+  * Fix macOS/arm64 tests which have a 16k page. (#932, Kate Deplaix)
 
 ====== Deprecations ======
 
diff --git a/test/unix/test_lwt_bytes.ml b/test/unix/test_lwt_bytes.ml
index 5b68b7774..0bc62d866 100644
--- a/test/unix/test_lwt_bytes.ml
+++ b/test/unix/test_lwt_bytes.ml
@@ -774,7 +774,7 @@ let suite = suite "lwt_bytes" [
     end;
 
     test "page_size" begin fun () ->
-      let sizes = [4096; 65536] in
+      let sizes = [4096; 16384; 65536] in
       Lwt.return (List.mem Lwt_bytes.page_size sizes)
     end;