mirror of
https://github.com/teo3300/rust-mal.git
synced 2026-01-12 01:05:32 +01:00
10 lines
189 B
Plaintext
10 lines
189 B
Plaintext
; list?
|
|
(assert (list? (list 1 2 3)))
|
|
(assert (not (list? 1)))
|
|
|
|
; empty?
|
|
(assert (empty? ()))
|
|
(assert (empty? (list)))
|
|
(assert (not (empty? '(1 2 3))))
|
|
(assert (not (empty? (list 1 2 3))))
|