2023-05-07 10:11:11 -04:00
|
|
|
;; not ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
(assert-false (not '()))
|
|
|
|
|
(assert-false (not #true))
|
|
|
|
|
(assert-true (not #false))
|
|
|
|
|
;(assert-false (not #\n))
|
|
|
|
|
(assert-false (not 'foo))
|
|
|
|
|
(assert-false (not "foo"))
|
|
|
|
|
(assert-false (not 123))
|
|
|
|
|
(assert-false (not (cons 123 456)))
|
