RosettaCodeData/Task/Assertions/Common-Lisp/assertions.lisp

3 lines
58 B
Common Lisp
Raw Permalink Normal View History

2013-04-10 16:57:12 -07:00
(let ((x 42))
(assert (and (integerp x) (= 42 x)) (x)))