This website requires JavaScript.
Explore
Help
Sign In
madmaurice
/
Minilisp.pm
Watch
1
Star
1
Fork
You've already forked Minilisp.pm
0
Code
Issues
Pull requests
Projects
Releases
Wiki
Activity
0cbc43927d
Minilisp.pm
/
t
/
cond.t
7 lines
175 B
Perl
Raw
Normal View
History
Unescape
Escape
Fix cond.t cond.t was not actually using equal but cond works anyway.
2021-04-08 22:10:58 +02:00
(
expect
"cond"
(
equal
'
ok
(
cond
(
(
>
1
2
)
'
fail
)
(
nil
'
fail
)
(
(
zerop
0
)
'
ok
)
(
t
'
fail
)
)
)
)
Reference in a new issue
Copy permalink