Minilisp.pm/t/cond.t
MadMaurice cf9f90c19b Fix cond.t
cond.t was not actually using equal but cond works anyway.
2021-04-08 22:10:58 +02:00

6 lines
175 B
Raku

(expect "cond"
(equal 'ok
(cond ((> 1 2) 'fail)
(nil 'fail)
((zerop 0) 'ok)
(t 'fail))))