LWG 3035. std::allocator's constructors should be constexpr
[official-gcc.git] / gcc / testsuite / gcc.misc-tests / gcov.exp
blobdf1154dea2e6901c232c20d938dafcc4cbb66eb7
1 # Copyright (C) 1997-2018 Free Software Foundation, Inc.
3 # This program is free software; you can redistribute it and/or modify
4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation; either version 3 of the License, or
6 # (at your option) any later version.
7 #
8 # This program is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License for more details.
13 # You should have received a copy of the GNU General Public License
14 # along with GCC; see the file COPYING3. If not see
15 # <http://www.gnu.org/licenses/>.
17 # Gcov test driver.
19 # Load support procs.
20 load_lib gcc-dg.exp
21 load_lib gcov.exp
23 global GCC_UNDER_TEST
25 # For now find gcov in the same directory as $GCC_UNDER_TEST.
26 if { ![is_remote host] && [string match "*/*" [lindex $GCC_UNDER_TEST 0]] } {
27 set GCOV [file dirname [lindex $GCC_UNDER_TEST 0]]/gcov
28 } else {
29 set GCOV gcov
32 # Initialize harness.
33 dg-init
35 # Delete old .gcda files.
36 set files [glob -nocomplain gcov*.gcda]
37 if { $files != "" } {
38 eval "remote_file build delete $files"
41 # Main loop.
42 dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/gcov-*.c]] "" ""
44 dg-finish