These just fix inconsistent/unusual style to avoid noise when grepping
and also people picking up bad habits when they see it (as similar
mistakes can be harmful).
gcc/testsuite/ChangeLog:
* c-c++-common/goacc/pr69916.c: Fix unusual whitespace in dg-*.
* g++.old-deja/g++.abi/vtable2.C: Ditto.
* g++.old-deja/g++.bugs/900330_02.C: Ditto.
* g++.old-deja/g++.bugs/900406_02.C: Ditto.
* g++.old-deja/g++.bugs/900519_13.C: Ditto.
* g++.old-deja/g++.mike/p9068.C: Ditto.
* gcc.dg/
20040203-1.c: Ditto.
* gcc.dg/980502-1.c: Ditto.
* gcc.dg/ipa/ipa-sra-14.c: Ditto.
* gcc.dg/pr35468.c: Ditto.
* gcc.dg/pr82597.c: Ditto.
* gcc.dg/tree-ssa/phi-opt-7.c: Ditto.
* gfortran.dg/assumed_charlen_in_main.f90: Ditto.
* gfortran.dg/cray_pointers_2.f90: Ditto.
-/* { dg-additional-options "-O2" } */
+/* { dg-additional-options "-O2" } */
/* PR 69916, an loop determined to be empty sometime after omp-lower
and before oacc-device-lower can evaporate leading to no GOACC_LOOP
-// { dg-do run }
+// { dg-do run }
// { dg-options "-Wno-attribute-alias -fno-strict-aliasing" }
// Origin: Mark Mitchell <mark@codesourcery.com>
-// { dg-do assemble }
+// { dg-do assemble }
// g++ 1.37.1 bug 900330_02
// The C++ Reference Manual says in section 13.1:
-// { dg-do run }
+// { dg-do run }
// g++ bug 900406_02
// g++ fails to correctly parse some type specifications within casts.
-// { dg-do assemble }
+// { dg-do assemble }
// g++ 1.37.1 bug 900519_13
// If multiple inheritance creates a situation in which a given name is
-// { dg-do assemble }
+// { dg-do assemble }
// prms-id: 9068
struct ostream {
/* PR/13994; bug_cond2 was rejected on gcc up to version 3.4.x */
-/* { dg-do compile }*/
-/* { dg-options "-std=gnu89" }*/
+/* { dg-do compile } */
+/* { dg-options "-std=gnu89" } */
struct s { char c[1]; };
struct s a;
-/* { dg-do compile }*/
+/* { dg-do compile } */
/* { dg-options "-O2" } */
char *const f(void)
/* { dg-do run } */
-/* { dg-options "-O2 -fipa-sra -fdump-ipa-sra" } */
+/* { dg-options "-O2 -fipa-sra -fdump-ipa-sra" } */
/* Check of a transitive recursive structure split. */
/* PR tree-optimization/35468 */
-/* { dg-do compile }*/
+/* { dg-do compile } */
/* { dg-options "-O2 -fno-tree-dce" } */
char *const f(void)
/* PR rtl-optimization/82597 */
-/* { dg-do compile }*/
+/* { dg-do compile } */
/* { dg-options "-O2 -funroll-loops" } */
int pb;
}
/* There should be no ifs as this is converted into `(t != 0) & (c != 0)`.
-/* { dg-final { scan-tree-dump-not "if" "optimized" } }*/
+/* { dg-final { scan-tree-dump-not "if" "optimized" } } */
/* { dg-final { scan-tree-dump-times "\[^\r\n\]*_\[0-9\]* = c_\[0-9\]*.D. != 0" 1 "optimized" } } */
/* { dg-final { scan-tree-dump-times "\[^\r\n\]*_\[0-9\]* = t_\[0-9\]*.D. != 0" 1 "optimized" } } */
program test
character(len=*), parameter :: foo = 'test' ! Parameters must work.
character(len=4) :: bar = foo
- character(len=*) :: foobar = 'This should fail' ! { dg-error "must be a dummy" }
+ character(len=*) :: foobar = 'This should fail' ! { dg-error "must be a dummy" }
print *, bar
call poobar ()
end
! Using two spaces between dg-do and run is a hack to keep gfortran-dg-runtest
! from cycling through optimization options for this expensive test.
-! { dg-do run }
+! { dg-do run }
! { dg-options "-O3 -fcray-pointer -fbounds-check -fno-inline" }
! { dg-timeout-factor 4 }
!