Fortran: Fix PR 47485.
[gcc.git] / gcc / testsuite / g++.dg / gcov / gcov-19.C
blob3f898cfae4b4224b5c1a13208236286852400f5b
1 /* { dg-options "-fprofile-arcs -ftest-coverage" } */
2 /* { dg-do run { target native } } */
4 /* Filtering on the function base name generally works well, because it becomes
5    an unadultered part of the symbol.  */
7 template <typename T>
9 fn1 (T x)
11   /* fst */
12   return x;
15 template <typename T>
17 fn2 (T x)
19   /* snd */
20   return 2 * x;
23 int
24 main ()
26   fn1 (2);
27   fn1 (2.0);
28   fn1 (2.0f);
30   fn2 (2);
31   fn2 (2.0);
32   fn2 (2.0f);
35 /* { dg-final { run-gcov { filters { fn1 } { fn2 } } { --include=fn1 gcov-19.C } } } */