diff --git a/t/cond.t b/t/cond.t index 51cd92c..107dac1 100644 --- a/t/cond.t +++ b/t/cond.t @@ -1,5 +1,6 @@ -(expect "cond" 2 - (cond ((> 1 2) 10) - (nil 20) - ((zerop 0) 2) - (t 10))) +(expect "cond" + (equal 'ok + (cond ((> 1 2) 'fail) + (nil 'fail) + ((zerop 0) 'ok) + (t 'fail))))