defpackage.lisp

   1 ;;;-*- Mode: Lisp; Syntax: ANSI-Common-Lisp -*-
   2
   3 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   4 ;;; Packages
   5 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   6
   7 (common-lisp:defpackage #:lisp-unit
   8   (:use #:common-lisp)
   9   (:export #:define-test #:run-all-tests #:run-tests
  10            #:assert-eq #:assert-eql #:assert-equal #:assert-equalp
  11            #:assert-error #:assert-expands #:assert-false
  12            #:assert-equality #:assert-prints #:assert-true
  13            #:get-test-code #:get-tests
  14            #:remove-all-tests #:remove-tests
  15            #:logically-equal #:set-equal
  16            #:use-debugger
  17            #:with-test-listener
  18            ;; Floating point predicates and assertions
  19            #:*epsilon* #:*significant-figures*
  20            #:float-equal #:assert-float-equal
  21            #:complex-equal #:assert-complex-equal
  22            #:number-equal #:assert-number-equal
  23            #:sigfig-equal #:assert-sigfig-equal
  24            #:array-equal #:assert-array-equal
  25            #:numerical-equal #:assert-numerical-equal
  26            ;; Floating point diagnostic functions
  27            #:float-error #:float-error-epsilon
  28            #:complex-error #:complex-error-epsilon
  29            #:number-error #:number-error-epsilon
  30            #:sequence-error #:array-error))
  31
  32 (pushnew :lisp-unit common-lisp:*features*)