diff --git a/ansi-tests/beyond-ansi/load-ba.lsp b/ansi-tests/beyond-ansi/load-ba.lsp
new file mode 100644
index 0000000000000000000000000000000000000000..96a4e6fa3698842adfac72c8285f0dc55ba7aa0c
--- /dev/null
+++ b/ansi-tests/beyond-ansi/load-ba.lsp
@@ -0,0 +1,18 @@
+;-*- Mode:     Lisp -*-
+;;;; Author:   Paul Dietz
+;;;; Created:  Wed Jun  8 06:52:59 2005
+;;;; Contains: Load beyond-ansi tests
+
+(let ((*default-pathname-defaults* (pathname *load-pathname*)))
+  (let ((*default-pathname-defaults*
+	 (merge-pathnames (make-pathname :directory '(:relative :up)))))
+    (load "gclload1.lsp"))
+  (load "ba-test-package.lsp")
+  (compile-and-load "ba-aux.lsp")
+  (load "errors-eval-compile.lsp")
+  (load "errors-types-and-class.lsp")
+  (load "errors-data-and-control-flow-1.lsp")
+  (load "errors-data-and-control-flow-2.lsp")
+  (in-package :ba-test)
+  )
+
diff --git a/ansi-tests/beyond-ansi/makefile b/ansi-tests/beyond-ansi/makefile
index db83f8b7ee3ddec89c639911ef0b4cf422f5d2d7..d9d2a87e07fb73b50baa6614e5636e105cb08efc 100644
--- a/ansi-tests/beyond-ansi/makefile
+++ b/ansi-tests/beyond-ansi/makefile
@@ -1,3 +1,6 @@
+test:
+	echo "(load \"load-ba.lsp\") (in-package :ba-test) (rt:do-tests)" | $(LISP) | tee test.out
+
 clean:
 	@rm -f test.out *.cls *.fasl *.o *.so *~ *.fn *.x86f *.fasl *.ufsl *.abcl *.fas *.lib \#*\#
 	@rm -f gazonk* out.class