X-Git-Url: http://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/f0c1e306132c731c95969b6ef653101702d0678f..bc35d987289cb3815a2b59d99c05034cc13a8f40:/testsuite.at

diff --git a/testsuite.at b/testsuite.at
index 861d2c6..9533e66 100644
--- a/testsuite.at
+++ b/testsuite.at
@@ -13,6 +13,9 @@ AT_COPYRIGHT([Copyright © 2020-2021, 2023 Nick Bowler])
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
+m4_include([common/snippet/at-compat.at])
+m4_include([common/snippet/test-tap.at])
+
 AT_INIT
 AT_COLOR_TESTS
 
@@ -43,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])])