run_all.sh: Use sync when main not found.

2005-05-05  Laurent GUERBY  <laurent@guerby.net>

       * ada/acats/run_all.sh: Use sync when main not found.

From-SVN: r113550
This commit is contained in:
Laurent GUERBY 2006-05-05 08:43:04 +00:00 committed by Laurent Guerby
parent b11382213a
commit 4b5d3f3f41
2 changed files with 17 additions and 4 deletions

View File

@ -1,3 +1,7 @@
2005-05-05 Laurent GUERBY <laurent@guerby.net>
* ada/acats/run_all.sh: Use sync when main not found.
2006-05-04 Kazu Hirata <kazu@codesourcery.com>
PR target/26765

View File

@ -64,6 +64,13 @@ clean_dir () {
rm -f "$binmain" *.o *.ali > /dev/null 2>&1
}
find_main () {
ls ${i}?.adb > ${i}.lst 2> /dev/null
ls ${i}*m.adb >> ${i}.lst 2> /dev/null
ls ${i}.adb >> ${i}.lst 2> /dev/null
main=`tail -1 ${i}.lst`
}
EXTERNAL_OBJECTS=""
# Global variable to communicate external objects to link with.
@ -230,10 +237,12 @@ for chapter in $chapters; do
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
ls ${i}.adb >> ${i}.lst 2> /dev/null
main=`tail -1 ${i}.lst`
main=""
find_main
if [ "$main" == "" ]; then
sync
find_main
fi
binmain=`echo $main | sed -e 's/\(.*\)\..*/\1/g'`
echo "BUILD $main" >> $dir/acats.log
EXTERNAL_OBJECTS=""