Minor improvements in the really-pretty-ad-hoc test scripts for the

tglsfdc · tglsfdc · commit 943178fec51a · 2005-04-01T19:32:51.000Z
PL languages.
diff --git a/src/pl/plperl/test/runtest b/src/pl/plperl/test/runtest
@@ -9,10 +9,10 @@ dropdb $DBNAME
 sleep 1
 
 echo "**** Create test database $DBNAME ****"
-createdb $DBNAME
+createdb $DBNAME || exit 1
 
 echo "**** Create procedural language plperl ****"
-createlang plperl $DBNAME
+createlang plperl $DBNAME || exit 1
 
 echo "**** Running test queries ****"
 psql -q -n -e $DBNAME <test_queries.sql > test.out 2>&1
diff --git a/src/pl/plpython/test.sh b/src/pl/plpython/test.sh
@@ -7,6 +7,8 @@ dropdb $DBNAME > test.log 2>&1
 # drop failure is ok...
 echo " Done. ***"
 
+sleep 1
+
 echo -n "*** Create $DBNAME."
 if createdb $DBNAME >> test.log 2>&1 ; then
   echo " Done. ***"
diff --git a/src/pl/tcl/test/runtest b/src/pl/tcl/test/runtest
@@ -9,10 +9,10 @@ dropdb $DBNAME
 sleep 1
 
 echo "**** Create test database $DBNAME ****"
-createdb $DBNAME
+createdb $DBNAME || exit 1
 
 echo "**** Create procedural language pltcl ****"
-createlang pltcl $DBNAME
+createlang pltcl $DBNAME || exit 1
 
 echo "**** Create tables, functions and triggers ****"
 psql -q -n $DBNAME <test_setup.sql
