[Gcl-devel] clocc ansi tests

[John Jorgensen]

I know Paul Dietz is running an ansi test suite, but would it also be
useful to run the clocc ansi tests and post some of the errors? 

Below is a patch for the CVS clocc ansi tests Makefile that allows one to
run "make gcl" and go through the test. I also had to patch tests.lisp so
that the tests would complete. In the process, I uncommented the tests
skipped for akcl since those tests do run under gcl. The clos and
conditions tests also run with this patch. Note that the tests that I skip
are; excepsit, section18-errors, streamslong, and type due to segfaults or
problems with conditions.



--- Makefile.old        2002-10-15 09:43:43.000000000 -0400
+++ Makefile    2002-10-15 08:51:55.000000000 -0400
@@ -1,4 +1,5 @@
 CLISP=clisp -ansi -norc
+GCL=gcl
 CMUCL_SAFE=/usr/lib/cmucl/lisp-safe.core
 CMUCL_NORMAL=/usr/lib/cmucl/lisp-normal.core
 CMUCL_SMALL=/usr/lib/cmucl/lisp-small.core
@@ -8,13 +9,13 @@
 MV=mv -f
 MKDIR=mkdir -p
 
-all: cmucl-normal cmucl-safe cmucl-small sbcl clisp
+all: cmucl-normal cmucl-safe cmucl-small sbcl clisp gcl
        echo ok
 
-.PHONY: clisp sbcl cmucl-normal cmucl-safe cmucl-small clean
+.PHONY: clisp sbcl cmucl-normal cmucl-safe cmucl-small gcl clean
 
 clean:
-       $(RM) -rf clisp sbcl cmucl-normal cmucl-small cmucl-safe
+       $(RM) -rf clisp sbcl cmucl-normal cmucl-small cmucl-safe gcl
 
 PRE_TEST=$(MKDIR) $@ ; \
        $(RM) *.erg $@/*;
--- tests.lisp.old      2002-10-15 09:46:33.000000000 -0400
+++ tests.lisp  2002-10-15 09:51:06.000000000 -0400
@@ -196,15 +196,15 @@
   (mapc #'run-test
        '(
          "symboltest"
-         #-akcl "alltest"
+         "alltest"
          "array"
          "backquot"
-         #-akcl "characters"
-         #+(or CLISP ALLEGRO CMU SBCL)"clos"
+         "characters"
+         #+(or CLISP ALLEGRO CMU SBCL GCL)"clos"
          "cmucl-bugs"
-         #+(or CLISP ALLEGRO CMU SBCL) "conditions"
+         #+(or CLISP ALLEGRO CMU SBCL GCL) "conditions"
          "eval20"
-         "excepsit"
+         #-gcl "excepsit"
          "format"
          #+xcl "hash"
          "hashlong"
@@ -233,7 +233,7 @@
          "section15"
          "section16"
          "section17"
-         "section18-errors"
+         #-gcl "section18-errors"
          "section18"
          "section19"
          "section2"
@@ -250,11 +250,11 @@
          "setf"
          "steele7"
          #-allegro "streams"
-         "streamslong"
+         #-gcl "streamslong"
          "strings"
-         #-akcl "symbol10"
+         "symbol10"
          "symbols"
-         "type"
+         #-gcl "type"
          #+(or sbcl cmu)
          "unix-tests"
          ))