diff --git a/tests/syscalls.scm b/tests/syscalls.scm
index 92e02f3303..1934704375 100644
--- a/tests/syscalls.scm
+++ b/tests/syscalls.scm
@@ -456,7 +456,7 @@
   (eof-object? (read-utmpx (%make-void-port "r"))))
 
 (unless (access? "/var/run/utmpx" O_RDONLY)
-  (tes-skip 1))
+  (test-skip 1))
 (test-assert "read-utmpx"
   (let ((result (call-with-input-file "/var/run/utmpx" read-utmpx)))
     (or (utmpx? result) (eof-object? result))))