summaryrefslogtreecommitdiff
path: root/test-suite/tests/r7rs.test
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/tests/r7rs.test')
-rw-r--r--test-suite/tests/r7rs.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/tests/r7rs.test b/test-suite/tests/r7rs.test
index 0914f0c5e..1cc8cd31e 100644
--- a/test-suite/tests/r7rs.test
+++ b/test-suite/tests/r7rs.test
@@ -2171,7 +2171,7 @@
(let ((out (open-output-string))
(x (list 1)))
(set-cdr! x x)
- (write x out)
+ (write-shared x out)
(get-output-string out))
;; labels not guaranteed to be 0 indexed, spacing may differ
'("#0=(1 . #0#)" "#1=(1 . #1#)"))