procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

libstdc++-v3-dg.exp (libstdc++-v3-list-sourcefiles): New function.

Browse source 
2002-03-11  Phil Edwards  <pme@gcc.gnu.org>

	* testsuite/lib/libstdc++-v3-dg.exp (libstdc++-v3-list-sourcefiles):
	New function.  Build the list of tests to run in testsuite_files.
	* testsuite/libstdc++-v3.dg/dg.exp:  Use it.

From-SVN: r50598
This commit is contained in:
Phil Edwards 2002-03-11 21:11:07 +00:00
parent 72c9b0629d
commit abd3d6007c
3 changed files with 43 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
libstdc++-v3/ChangeLog
View file

@ -1,3 +1,9 @@
2002-03-11 Phil Edwards <pme@gcc.gnu.org>
* testsuite/lib/libstdc++-v3-dg.exp (libstdc++-v3-list-sourcefiles):
New function. Build the list of tests to run in testsuite_files.
* testsuite/libstdc++-v3.dg/dg.exp: Use it.
2002-03-11 Phil Edwards <pme@gcc.gnu.org>
* testsuite/21_strings/capacity.cc: Only explicitly instantiate on

35
libstdc++-v3/testsuite/lib/libstdc++-v3-dg.exp
View file

@ -176,3 +176,38 @@ proc libstdc++-v3_target_compile { source dest type options } {
return [target_compile $source $dest $type $options]
}
# A bit sloppy... Returns a list of source files (full pathnames) to
# compile. We mimic the mkcheck script in that the first time this is run,
# all existing files are listed in "testsuite_files" in the output
# directory. Subsequent runs pull the list from that file, allowing users
# to trim the list down to problematic tests.
### This is supposed to be done via RUNTESTFLAGS, but that doesn't work.
proc libstdc++-v3-list-sourcefiles { } {
global srcdir
global outdir
set files_file "${outdir}/testsuite_files"
set sfiles ""
if { [file exists $files_file] } {
set f [open $files_file]
while { ! [eof $f] } {
set t [gets $f]
if { [string length "$t"] != 0 } {
lappend sfiles ${srcdir}/${t}
}
}
} else {
set f [open $files_file "w"]
set where_we_were [pwd]
cd $srcdir
foreach s [lsort [glob -nocomplain */*.cc]] {
lappend sfiles ${srcdir}/${s}
puts $f $s
}
cd $where_we_were
}
close $f
return $sfiles
}

5
libstdc++-v3/testsuite/libstdc++-v3.dg/dg.exp
View file

@ -1,4 +1,4 @@
# Copyright (C) 2001 Free Software Foundation, Inc.
# Copyright (C) 2001, 2002 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@ -40,8 +40,7 @@ remote_exec host ${shell-ulimit-command} "-d ${maximum-memory-usage}"
remote_exec host ${shell-ulimit-command} "-v ${maximum-memory-usage}"
# Main loop.
dg-runtest [lsort [glob -nocomplain $srcdir/*/*.cc]] \
"" $DEFAULT_CXXFLAGS
dg-runtest [libstdc++-v3-list-sourcefiles] "" $DEFAULT_CXXFLAGS
# All done.
dg-finish