RosettaCodeData/Task/Assertions/Common-Lisp/assertions.lisp
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

2 lines
58 B
Common Lisp

(let ((x 42))
(assert (and (integerp x) (= 42 x)) (x)))