23 lines
443 B
Plaintext
23 lines
443 B
Plaintext
|
# cpp-test.exp 2002/12
|
||
|
|
# to test cpp-test
|
||
|
|
# imported from dg.exp of GNU C
|
||
|
|
|
||
|
|
# Load support procs.
|
||
|
|
load_lib gcc-dg.exp
|
||
|
|
|
||
|
|
# If a testcase doesn't have special options, use these.
|
||
|
|
global DEFAULT_CFLAGS
|
||
|
|
if ![info exists DEFAULT_CFLAGS] then {
|
||
|
|
set DEFAULT_CFLAGS " -ansi -pedantic-errors"
|
||
|
|
}
|
||
|
|
|
||
|
|
# Initialize `dg'.
|
||
|
|
dg-init
|
||
|
|
|
||
|
|
# Main loop.
|
||
|
|
dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.\[cS\]]] \
|
||
|
|
"" $DEFAULT_CFLAGS
|
||
|
|
|
||
|
|
# All done.
|
||
|
|
dg-finish
|