mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
12 lines
146 B
Common Lisp
12 lines
146 B
Common Lisp
;; test the use of #cond to evaluate goos expressions at compile time
|
|
|
|
(#cond
|
|
((> 2 (+ 2 1))
|
|
1
|
|
(invalid-code)
|
|
)
|
|
|
|
((< 2 (+ 1 2))
|
|
3
|
|
)
|
|
) |