;; This program should ideally become very terse when compiled since everything ;; is constant in it, which means we won't necessarily get a runnable program ;; from chiklisp compilation. ;; ;; This is used as one test for --test-deinline. (mod () (include *standard-cl-22*) (include utility_macros.clib) (defun-inline test-me (X) (* 3 X)) (assert (= (test-me 5) 15) (= (test-me 0) 0) () ) )