diff options
| author | Arnaud Charlet <charlet@act-europe.fr> | 2003-11-10 18:10:45 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2003-11-10 18:10:45 +0100 |
| commit | e6178121705e52b01c0e1e73b6100471cfd4b23c (patch) | |
| tree | aa90866bd736c575ff4b9e55b43f7d71e770cb65 /gcc | |
| parent | c77c5f2e385fd9e494ccd08723b72b0d304cb2d0 (diff) | |
| download | gcc-e6178121705e52b01c0e1e73b6100471cfd4b23c.zip gcc-e6178121705e52b01c0e1e73b6100471cfd4b23c.tar.gz gcc-e6178121705e52b01c0e1e73b6100471cfd4b23c.tar.bz2 | |
run_all.sh: Add handling of unsupported (tasking) tests.
* ada/acats/run_all.sh: Add handling of unsupported (tasking) tests.
Clean ups.
From-SVN: r73422
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rwxr-xr-x | gcc/testsuite/ada/acats/run_all.sh | 44 |
2 files changed, 34 insertions, 15 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index f69b0d6..f499768 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2003-11-10 Arnaud Charlet <charlet@act-europe.fr> + + * ada/acats/run_all.sh: Add handling of unsupported (tasking) tests. + Clean ups. + 2003-11-10 Waldek Hebisch <hebisch@math.uni.wroc.pl> * gcc.dg/trampoline-1.c: New test. diff --git a/gcc/testsuite/ada/acats/run_all.sh b/gcc/testsuite/ada/acats/run_all.sh index b149fd2..cc7de47 100755 --- a/gcc/testsuite/ada/acats/run_all.sh +++ b/gcc/testsuite/ada/acats/run_all.sh @@ -30,6 +30,11 @@ display () { echo "$@" >> $dir/acats.log } +log () { + echo "$@" >> $dir/acats.sum + echo "$@" >> $dir/acats.log +} + dir=`pwd` if [ "$testdir" = "" ]; then @@ -59,7 +64,7 @@ EXTERNAL_OBJECTS="" rm -f $dir/acats.sum $dir/acats.log -display " === CONFIGURATION ===" +display " === acats configuration ===" display `type gcc` display `gcc -v 2>&1` @@ -69,7 +74,7 @@ display `type gnatmake` gnatls -v >> $dir/acats.log display "" -display " === SUPPORT ===" +display " === acats support ===" display_noeol "Generating support files..." rm -rf $dir/support @@ -141,7 +146,7 @@ target_gnatmake -c -gnato -gnatE *.adb display " done." display "" -display " === ACATS tests ===" +display " === acats tests ===" if [ $# -eq 0 ]; then chapters=`cd $dir/tests; echo [a-z]*` @@ -151,6 +156,7 @@ fi glob_countn=0 glob_countok=0 +glob_countu=0 for chapter in $chapters; do display Running chapter $chapter ... @@ -166,7 +172,7 @@ for chapter in $chapters; do cut -c1-7 | sort | uniq | comm -23 - $testdir/norun.lst \ > $dir/tests/$chapter/${chapter}.lst countn=`wc -l < $dir/tests/$chapter/${chapter}.lst` - countok=0 + glob_countn=`expr $glob_countn + $countn` counti=0 for i in `cat $dir/tests/$chapter/${chapter}.lst`; do counti=`expr $counti + 1` @@ -218,23 +224,31 @@ for chapter in $chapters; do cat ${i}.log >> $dir/acats.log egrep -e '(==== |\+\+\+\+ |\!\!\!\! )' ${i}.log > /dev/null 2>&1 if [ $? -ne 0 ]; then - display "FAIL: $i" - failed="${failed}${i} " + grep 'Tasking not implemented' ${i}.log > /dev/null 2>&1 + + if [ $? -ne 0 ]; then + display "FAIL: $i" + failed="${failed}${i} " + else + log "UNSUPPORTED: $i" + glob_countn=`expr $glob_countn - 1` + glob_countu=`expr $glob_countu + 1` + fi else - echo "PASS: $i" >> $dir/acats.sum - echo "PASS: $i" >> $dir/acats.log - countok=`expr $countok + 1` + log "PASS: $i" + glob_countok=`expr $glob_countok + 1` fi clean_dir done - - glob_countok=`expr $glob_countok + $countok` - glob_countn=`expr $glob_countn + $countn` done -display " === ACATS Summary ===" -display "# of expected passes $glob_countok" -display "# of unexpected failures `expr $glob_countn - $glob_countok`" +display " === acats Summary ===" +display "# of expected passes $glob_countok" +display "# of unexpected failures `expr $glob_countn - $glob_countok`" + +if [ $glob_countu -ne 0 ]; then + display "# of unsupported tests $glob_countu" +fi if [ $glob_countok -ne $glob_countn ]; then display "*** FAILURES: $failed" |