--- gforth/testall	2003/08/08 05:56:37	1.14
+++ gforth/testall	2008/10/25 17:18:42	1.17
@@ -1,4 +1,4 @@
-#! /usr/local/bin/bash
+#! /bin/bash
 #test dist on all MACHINES given in MACHINES
 #usage: MACHINES="..." testall dirs/gforth-version.tar.gz
 if test $# = 0; then
@@ -6,23 +6,19 @@ if test $# = 0; then
   exit 1
 fi
 test "x$MACHINES" != x || 
-MACHINES="pcs d0 mips aertl@fpr.zserv.tuwien.ac.at \
-b1 b2 b3 b4 struppi c2 \
-samhain.ifs.tuwien.ac.at calis aertl@mail.zserv.tuwien.ac.at \
-rlwinm.ifs.tuwien.ac.at fmadd.ifs.tuwien.ac.at lfsux.ifs.tuwien.ac.at \
-s4addq.ifs.tuwien.ac.at \
-128.130.204.24 128.130.204.25 128.130.204.26 \
-cdbook c2.complang.tuwien.ac.at"
-#taken out: hpws03.infosys.tuwien.ac.at aertl@fbma.tuwien.ac.at w4.infosys.tuwien.ac.at jupiter aertl@stat.zserv.tuwien.ac.at 
+MACHINES="mips a5 a7 b2 b3 c1 c4 c6 c7 c8 t1000 iyonix ppc64"
 SSH_PROTOCOL=-oProtocol=1,2
 for i in $MACHINES
 do
-#    echo; echo $i
-#    /usr/bin/ssh $SSH_PROTOCOL -x $i echo ok
+  if true; then
+    echo; echo $i
+    /usr/bin/ssh $SSH_PROTOCOL -x $i echo ok
+  else
     ( ssh $SSH_PROTOCOL -q -x $i "test -d xxxgforthtest||mkdir xxxgforthtest; cd xxxgforthtest; test -d $i||mkdir $i; rm -rf $i/*" >$i 2>&1; \
       scp $SSH_PROTOCOL -p -q $1 ../testdist $i:xxxgforthtest/$i >>$i 2>&1; \
       ssh $SSH_PROTOCOL -q -x $i "cd xxxgforthtest/$i; ./testdist `basename $1`" >>$i 2>&1; \
       echo "$i done" "`tail -1 $i`") &
+  fi
 done
 wait
 echo all done