gcc/testsuite:
PR ada/18302 * ada/acats/run_all.sh (target_run): Use run_test.exp to execute commands. * ada/acats/run_test.exp: New file. gcc/ada: PR ada/18302 * gcc-interface/Make-lang.in (check-acats): Export rootme, EXPECT. Co-Authored-By: James A. Morrison <phython@gcc.gnu.org> From-SVN: r151614
This commit is contained in:
parent
0e6748ab2c
commit
1382ae05e3
5 changed files with 29 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2009-09-10 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
||||
|
||||
PR ada/18302
|
||||
* gcc-interface/Make-lang.in (check-acats): Export rootme, EXPECT.
|
||||
|
||||
2009-09-08 Eric Botcazou <ebotcazou@adacore.com>
|
||||
|
||||
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Array_Subtype>: Tidy
|
||||
|
|
|
@ -841,6 +841,8 @@ check_acats_targets = $(patsubst %,check-acats%, 0 1 2)
|
|||
|
||||
check-acats:
|
||||
@test -d $(ACATSDIR) || mkdir -p $(ACATSDIR); \
|
||||
rootme=`${PWD_COMMAND}`; export rootme; \
|
||||
EXPECT=$(EXPECT); export EXPECT; \
|
||||
if [ -z "$(CHAPTERS)" ] && [ "$(filter -j, $(MFLAGS))" = "-j" ]; \
|
||||
then \
|
||||
$(MAKE) $(check_acats_targets); \
|
||||
|
|
|
@ -1,3 +1,11 @@
|
|||
2009-09-10 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
||||
James A. Morrison <phython@gcc.gnu.org>
|
||||
|
||||
PR ada/18302
|
||||
* ada/acats/run_all.sh (target_run): Use run_test.exp to execute
|
||||
commands.
|
||||
* ada/acats/run_test.exp: New file.
|
||||
|
||||
2009-09-10 Uros Bizjak <ubizjak@gmail.com>
|
||||
|
||||
Revert:
|
||||
|
|
|
@ -13,7 +13,7 @@ gccflags="-O2"
|
|||
gnatflags="-gnatws"
|
||||
|
||||
target_run () {
|
||||
$*
|
||||
eval $EXPECT -f $testdir/run_test.exp $*
|
||||
}
|
||||
|
||||
# End of customization section.
|
||||
|
|
13
gcc/testsuite/ada/acats/run_test.exp
Normal file
13
gcc/testsuite/ada/acats/run_test.exp
Normal file
|
@ -0,0 +1,13 @@
|
|||
#!/usr/bin/expect -f
|
||||
|
||||
if {[info exists env(DEJAGNU_TIMEOUT)]} {
|
||||
set timeout $env(DEJAGNU_TIMEOUT)
|
||||
} else {
|
||||
set timeout 300
|
||||
}
|
||||
|
||||
spawn -noecho $argv
|
||||
expect timeout {
|
||||
send_user "Program timed out.\n"
|
||||
exit 1
|
||||
}
|
Loading…
Add table
Reference in a new issue