RosettaCodeData/Task/Assertions/Scheme/assertions.ss

3 lines
54 B
Scheme

(let ((x 42))
(assert (and (integer? x) (= x 42))))