11 lines
302 B
Scheme
11 lines
302 B
Scheme
(begin
|
|
(displayln "--- TEST: not --------------------------------------------------")
|
|
(displayln (not '()))
|
|
(displayln (not #true))
|
|
(displayln (not #false))
|
|
;(displayln (not #\n))
|
|
(displayln (not 'foo))
|
|
(displayln (not "foo"))
|
|
(displayln (not 123))
|
|
(displayln (not (cons 123 456)))
|
|
)
|