From: Arnaud Charlet <charlet@gcc.gnu.org>
Date: Tue, 13 Jan 2004 11:48:46 +0000 (+0100)
Subject: Add extra checks.
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=0115e4700b7956d1a125fe88114989cc173e293e;p=platform%2Fupstream%2Fgcc.git

Add extra checks.

From-SVN: r75801
---

diff --git a/gcc/testsuite/ada/acats/run_all.sh b/gcc/testsuite/ada/acats/run_all.sh
index 78d6071..d11c6d7 100755
--- a/gcc/testsuite/ada/acats/run_all.sh
+++ b/gcc/testsuite/ada/acats/run_all.sh
@@ -191,8 +191,15 @@ for chapter in $chapters; do
          extraflags="$extraflags -gnatE"
       fi
       test=$dir/tests/$chapter/$i
-      mkdir $test
-      cd $test
+      mkdir $test && cd $test >> $dir/acats.log 2>&1
+
+      if [ $? -ne 0 ]; then
+         display "FAIL:	$i"
+         failed="${failed}${i} "
+         clean_dir
+         continue
+      fi
+
       target_gnatchop -c -w `ls ${test}*.a ${test}*.ada ${test}*.adt ${test}*.am ${test}*.dep 2> /dev/null` >> $dir/acats.log 2>&1
       ls ${i}?.adb > ${i}.lst 2> /dev/null
       ls ${i}*m.adb >> ${i}.lst 2> /dev/null