2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / ada / acats / run_acats
blobe61191d46c472a07e4bdb4724f57165f0f22b9d0
1 #!/bin/sh
3 if [ "$testdir" = "" ]; then
4 echo You must use make check or make check-ada
5 exit 1
6 fi
8 # Set up environment to use the Ada compiler from the object tree
10 host_gnatmake=`type gnatmake | awk '{print $3}'`
11 ROOT=`${PWDCMD-pwd}`
12 BASE=`cd $ROOT/../../..; ${PWDCMD-pwd}`
14 PATH=$BASE:$ROOT:$PATH
15 ADA_INCLUDE_PATH=$BASE/ada/rts
16 ADA_OBJECTS_PATH=$ADA_INCLUDE_PATH
18 if [ ! -d $ADA_INCLUDE_PATH ]; then
19 echo gnatlib missing, exiting.
20 exit 1
23 if [ ! -f $BASE/gnatmake ]; then
24 echo gnattools missing, exiting.
25 exit 1
28 GCC="$BASE/xgcc -B$BASE/"
29 export PATH ADA_INCLUDE_PATH ADA_OBJECTS_PATH GCC
31 echo '#!/bin/sh' > host_gnatmake
32 echo PATH=`dirname $host_gnatmake`:'$PATH' >> host_gnatmake
33 echo unset ADA_INCLUDE_PATH ADA_OBJECTS_PATH GCC_EXEC_PREFIX >> host_gnatmake
34 echo export PATH >> host_gnatmake
35 echo exec $host_gnatmake '"$@"' >> host_gnatmake
37 chmod +x host_gnatmake
39 exec $testdir/run_all.sh "$@"