* runtest: Terminate with an error if expect cannot be found.

	* TODO: Update.

1 files changed, 6 insertions, 1 deletions

diff --git a/runtest b/runtest
index 5ce6abb..417e4f9 100755
--- a/runtest
+++ b/runtest
@@ -116,7 +116,12 @@ if [ x"$DEJAGNULIBS" != x ] ; then
     fi
 fi
 if [ x"$runpath" = x ] ; then
-    echo "ERROR: runtest.exp does not exist."
+    echo "ERROR: runtest.exp does not exist"
+    exit 1
+fi
+
+if ! type $expectbin >/dev/null 2>/dev/null ; then
+    echo "ERROR: unable to find expect on the PATH"
     exit 1
 fi