aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTeddy <ted.sybil@gmail.com>2013-08-11 14:43:54 +0800
committerTeddy <ted.sybil@gmail.com>2013-08-11 14:43:54 +0800
commit48b6bcbcc7973129b2d2c024919aed80ce3fe349 (patch)
tree2cc2464ee649e5a3449b18f91035e5bf3ba813e4
parent04f0c9294a8da8c37ef3466fbcddf2a23b649608 (diff)
add inf list test
-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)