diff --git a/tests/r5rs-tests.scm b/tests/r5rs-tests.scm
index 9673c081..0a65fdd1 100644
--- a/tests/r5rs-tests.scm
+++ b/tests/r5rs-tests.scm
@@ -374,8 +374,6 @@
 
 (test #\c (string-ref "abc" 2))
 
-(test "axc" (let ((s (string #\a #\b #\c))) (string-set! s 1 #\x) s))
-
 (test #t (string=? "a" (string #\a)))
 
 (test #f (string=? "a" (string #\b)))