original commit: cc3bf431ae5fd8a90b83eda136ddba0bc56e6206
This commit is contained in:
Matthew Flatt 2000-06-01 13:41:40 +00:00
parent 29ed9b2ea4
commit e695059b02

View File

@ -425,7 +425,11 @@
[x 10])
(sequence
(set! x 5)))))
(syntax-test '(let ([x 10])
(unit
(import x)
(export)
(set! x 5))))
; Especially for zodiac:
(test '(b c 10 b a (c a b) (c b a) (c . c) (a) #t