clsql/tests tests.lisp,1.1,1.2

Update of /pubcvs/clsql/tests
In directory boa.b9.com:/tmp/cvs-serv2105/tests

Modified Files:
	tests.lisp 
Log Message:
Auto commit for Debian build

Index: tests.lisp
===================================================================
RCS file: /pubcvs/clsql/tests/tests.lisp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** tests.lisp	2 May 2003 03:08:58 -0000	1.1
--- tests.lisp	2 May 2003 03:17:41 -0000	1.2
***************
*** 221,225 ****
    (clsql:execute-command "DROP TABLE test_clsql" :database db))
  
! (defun do-test ()
      (let ((specs (read-specs)))
        (with-tests (:name "CLSQL")
--- 221,225 ----
    (clsql:execute-command "DROP TABLE test_clsql" :database db))
  
! (defun clsql-tests ()
      (let ((specs (read-specs)))
        (with-tests (:name "CLSQL")
***************
*** 229,234 ****
  	(pgsql-socket-table-test specs)
  	(aodbc-table-test specs)
!       )))
  
  
- (do-test)
--- 229,237 ----
  	(pgsql-socket-table-test specs)
  	(aodbc-table-test specs)
!       ))
!     t)
! 
! (deftest clsql.all (clsql-tests) t)
!