aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--robust_test.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/robust_test.scm b/robust_test.scm
index bc327ea..6dd4abf 100644
--- a/robust_test.scm
+++ b/robust_test.scm
@@ -223,3 +223,9 @@ src
(equal? #(1 2 '()) #(1 2 '(1)))
(equal? #(1 2 '(1)) #(1 2 '(1)))
+
+(define x '(1 . 1))
+(set-cdr! x x)
+(list x)
+x
+(cons x x)