RosettaCodeData/Task/Assertions/Emacs-Lisp/assertions.l

4 lines
77 B
Common Lisp

(require 'cl)
(let ((x 41))
(assert (= x 42) t "the answer is not right"))