X-Git-Url: http://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/090f5235db47c11457de1d032271d7c01dd7d0b9..eda9528293fbc32857a5856a30ebd6585b281215:/testsuite.at

diff --git a/testsuite.at b/testsuite.at
index 30b1be6..9533e66 100644
--- a/testsuite.at
+++ b/testsuite.at
@@ -46,7 +46,7 @@ m4_divert_pop([PREPARE_TESTS])
 
 m4_define([TEST_NEED_PROGRAM], [AT_KEYWORDS([$1])dnl
 AT_CHECK([for arg in $check_PROGRAMS; do
-test x"${arg##*/}" != x"$1$EXEEXT" || exit 0
+progexe="$1$EXEEXT"; case $arg in "$progexe"|*/"$progexe") exit 0 ;; esac
 done
 exit 77])])