[usocket-cvs] r74 - in usocket/trunk: . test

ehuelsmann at common-lisp.net ehuelsmann at common-lisp.net
Sat Feb 11 09:20:56 UTC 2006


Author: ehuelsmann
Date: Sat Feb 11 03:20:56 2006
New Revision: 74

Added:
   usocket/trunk/test/usocket.asd   (contents, props changed)
Modified:
   usocket/trunk/run-usocket-tests.sh
   usocket/trunk/test/   (props changed)
Log:
Rearrange and extend test scripts.

Modified: usocket/trunk/run-usocket-tests.sh
==============================================================================
--- usocket/trunk/run-usocket-tests.sh	(original)
+++ usocket/trunk/run-usocket-tests.sh	Sat Feb 11 03:20:56 2006
@@ -8,15 +8,34 @@
 # I need to figure out how to setup ASDF with the other lisps
 # I have installed: cmucl, ABCL, clisp, allegro and lispworks
 
-for my_lisp in sbcl ; do
+cd `dirname $0`/test
+
+if test -z "$1" ; then
+  lisps="sbcl clisp $HOME/src/acl/acl70_trial/alisp"
+else
+  lisps=$1
+fi
+
+for my_lisp in $lisps ; do
+
+# *.fasl are used by both sbcl and allegro,
+# so remove them to prevent choking either
+
+args=
+if test "`basename $my_lisp`" == "alisp" ; then
+  args=-batch
+fi
 
 echo "
-(require 'usocket-test)
+#-sbcl (load \"asdf.lisp\")
+
+(asdf:operate #-sbcl 'asdf:load-source-op
+              #+sbcl 'asdf:load-op :usocket-test)
 
 (usocket-test:do-tests)
 
-(quit)
-" | $my_lisp
+#-allegro (quit)
+" | $my_lisp $args
 
 echo "Above test results for $my_lisp."
 

Added: usocket/trunk/test/usocket.asd
==============================================================================
--- (empty file)
+++ usocket/trunk/test/usocket.asd	Sat Feb 11 03:20:56 2006
@@ -0,0 +1 @@
+link ../usocket.asd
\ No newline at end of file



More information about the usocket-cvs mailing list