Commit 44790863 authored by pfdietz's avatar pfdietz

The feature for cmucl is :cmu, not :cmucl

parent 2c7f734d
......@@ -5,7 +5,7 @@
;; (pushnew :ansi-tests-strict-initial-element *features*)
#+allegro (run-shell-command "rm -f *.fasl")
#+cmucl (run-program "rm -f *.x86f")
#+cmu (run-program "rm -f *.x86f")
(load "gclload1.lsp")
(load "gclload2.lsp")
......@@ -24,4 +24,4 @@
(time (regression-test:do-tests))
#+allegro :exit
#+(or cmucl sbcl gcl) (quit)
#+(or cmu sbcl gcl) (quit)
......@@ -6,7 +6,7 @@
#+allegro (run-shell-command "rm -f *.fasl")
#+allegro (setq *enclose-printer-errors* nil)
#+cmucl (run-program "rm -f *.x86f")
#+cmu (run-program "rm -f *.x86f")
(load "gclload1.lsp")
(load "gclload2.lsp")
......@@ -20,7 +20,13 @@
(rt:disable-note :assume-no-gray-streams))
(in-package :cl-test)
;;; These two tests will misbehave if the tests are being
;;; invoked from a file that is being loaded, so remove them
(when *load-pathname*
(mapc #'regression-test:rem-test '(load-pathname.1 load-truename.1)))
(time (regression-test:do-tests))
#+allegro (cl-user::exit)
#+(or cmucl sbcl gcl armedbear) (cl-user::quit)
#+(or cmu sbcl gcl armedbear) (cl-user::quit)
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment