1
0
mirror of https://github.com/samba-team/samba.git synced 2025-11-06 08:23:50 +03:00
Files
samba-mirror/source/script/tests/test_pidl.sh
2007-10-10 14:17:56 -05:00

21 lines
349 B
Bash
Executable File

#!/bin/sh
if [ ! -n "$PERL" ]
then
PERL=perl
fi
incdir=`dirname $0`
. $incdir/test_functions.sh
failed=0
if $PERL -e 'eval require Test::More;' > /dev/null 2>&1; then
for f in pidl/tests/*.pl; do
testit "$f" $PERL $f || failed=`expr $failed + 1`
done
else
echo "Skipping pidl tests - Test::More not installed"
fi
testok $0 $failed