Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
tree: 6f3e01486d
Fetching contributors…

Cannot retrieve contributors at this time

20 lines (15 sloc) 0.419 kB
(test "let works"
:valueof (let x 3 (+ x 1))
:should be 4)
(test "let destructures"
:valueof (let (a . b) (cons 3 4) (+ a b))
:should be 7)
(test "pair works"
:valueof (pair '(1 2 3 4 5))
:should be '((1 2) (3 4) (5)))
(test "withs works"
:valueof (withs (x 3 y '(1 2 3)) (list x @y))
:should be '(3 1 2 3))
(test "w/nils works"
:valueof (w/nils (x y z) (list x y z))
:should be '(nil nil nil))
Jump to Line
Something went wrong with that request. Please try again.