#! /home/gene/bin/lisp-script
;;; -*- Lisp -*-
;;;
;;; $Header: /home/gene/library/website/docsrc/lisp-heap/RCS/test0000.sh,v 395.1 2008/04/20 17:25:55 gene Exp $
;;;

(format t "Content-type: text/plain~%~%")

(load "test.lisp")
(format t "~&~A~&" (if (check *tests*) "good" "bad"))

;;; --- end of file ---