load.lsp 912 Bytes
Newer Older
1 2 3 4
;;; Tests of conditions
(compile-and-load "ANSI-TESTS:AUX;types-aux.lsp")
(compile-and-load "ANSI-TESTS:AUX;define-condition-aux.lsp")

5 6 7 8 9
(in-package #:cl-test)

(let ((*default-pathname-defaults*
       (make-pathname
        :directory (pathname-directory *load-pathname*))))
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
  (load "condition.lsp")
  (load "cell-error-name.lsp")
  (load "assert.lsp")
  (load "error.lsp")
  (load "cerror.lsp")
  (load "check-type.lsp")
  (load "warn.lsp")
  (load "invoke-debugger.lsp")
  (load "handler-bind.lsp")
  (load "handler-case.lsp")
  (load "ignore-errors.lsp")
  (load "define-condition.lsp")
  (load "compute-restarts.lsp")
  (load "restart-bind.lsp")
  (load "restart-case.lsp")
  (load "with-condition-restarts.lsp")
  (load "with-simple-restart.lsp")
  (load "abort.lsp")
  (load "muffle-warning.lsp")
  (load "continue.lsp")
  (load "store-value.lsp")
  (load "use-value.lsp")
  (load "make-condition.lsp")
)