slime/bin/tests/modules.slime

;; (define-module math
;;   :exports
;;   (pi tau pow sqrt)

;;   (define pi 3.1415)
;;   (define tau (* 2 pi))
;;   (define (pow a b) (** a b))
;;   (define (sqrt a) (** a 0.5)))

;; (assert (= math::pi 3.1415))
;; (assert (= math::tau (* 2 math::tau)))

(1 2 3)