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