# This harness is for testing builtin support. Each test has two files:
|
# This harness is for testing builtin support. Each test has two files:
|
#
|
#
|
# - foo.c defines the main testing function, main_test().
|
# - foo.c defines the main testing function, main_test().
|
# - foo-lib.c implements the library functions that foo.c is testing.
|
# - foo-lib.c implements the library functions that foo.c is testing.
|
#
|
#
|
# The functions in foo-lib.c will often want to abort on certain inputs.
|
# The functions in foo-lib.c will often want to abort on certain inputs.
|
# They can use the global variable inside_main to see whether they are
|
# They can use the global variable inside_main to see whether they are
|
# being called from the test program or part of the common runtime.
|
# being called from the test program or part of the common runtime.
|
#
|
#
|
# In many cases, the library functions will behave as normal at -O0
|
# In many cases, the library functions will behave as normal at -O0
|
# and abort when optimisation is enabled. Such implementations should
|
# and abort when optimisation is enabled. Such implementations should
|
# go into the lib/ directory so that they can be included by any test
|
# go into the lib/ directory so that they can be included by any test
|
# that needs them. They shouldn't call any external functions in case
|
# that needs them. They shouldn't call any external functions in case
|
# those functions were overridden too.
|
# those functions were overridden too.
|
|
|
load_lib c-torture.exp
|
load_lib c-torture.exp
|
|
|
set additional_flags ""
|
set additional_flags ""
|
if [istarget "powerpc-*-darwin*"] {
|
if [istarget "powerpc-*-darwin*"] {
|
lappend additional_flags "-Wl,-multiply_defined,suppress"
|
lappend additional_flags "-Wl,-multiply_defined,suppress"
|
}
|
}
|
|
|
foreach src [lsort [find $srcdir/$subdir *.c]] {
|
foreach src [lsort [find $srcdir/$subdir *.c]] {
|
if {![string match *-lib.c $src] && [runtest_file_p $runtests $src]} {
|
if {![string match *-lib.c $src] && [runtest_file_p $runtests $src]} {
|
c-torture-execute [list $src \
|
c-torture-execute [list $src \
|
[file root $src]-lib.c \
|
[file root $src]-lib.c \
|
$srcdir/$subdir/lib/main.c] \
|
$srcdir/$subdir/lib/main.c] \
|
$additional_flags
|
$additional_flags
|
}
|
}
|
}
|
}
|
|
|