'gfortran.dg/assumed_rank_22_aux.c' messages printed vs. DejaGnu

Print lower-case 'error: [...]' instead of upper-case 'ERROR: [...]', to not
confuse the DejaGnu log processing harness into thinking these are DejaGnu
harness ERRORs:

    Running /scratch/tschwing/build2-trusty-cs/gcc/build/submit-big/source-gcc/gcc/testsuite/gfortran.dg/dg.exp ...
    +ERROR: c_assumed num=100: x->dim[2].extent = -1 != 0
    +ERROR: c_assumed num=100: x->dim[2].extent = -1 != 0
    +ERROR: c_assumed num=100: x->dim[2].extent = -1 != 0
    +ERROR: c_assumed num=100: x->dim[2].extent = -1 != 0
    +ERROR: c_assumed num=100: x->dim[2].extent = -1 != 0
    +ERROR: c_assumed num=100: x->dim[2].extent = -1 != 0
    [...]

Fix-up for recent commit 00f6de9c69119594f7dad3bd525937c94c8200d0
"Fortran: Fix assumed-size to assumed-rank passing [PR94070]".

	gcc/testsuite/
	* gfortran.dg/assumed_rank_22_aux.c: Adjust messages printed.

diff --git a/gcc/testsuite/gfortran.dg/assumed_rank_22_aux.c b/gcc/testsuite/gfortran.dg/assumed_rank_22_aux.c
index 2fbf83d..e5fe021 100644 (file)
--- a/gcc/testsuite/gfortran.dg/assumed_rank_22_aux.c
+++ b/gcc/testsuite/gfortran.dg/assumed_rank_22_aux.c
@@ -29,7 +29,7 @@ c_assumed (CFI_cdesc_t *x, int num)
       if (x->dim[2].extent == 0)
        __builtin_printf ("c_assumed - 40 - OK\n");
       else
-       __builtin_printf ("ERROR: c_assumed num=%d: "
+       __builtin_printf ("error: c_assumed num=%d: "
                      "x->dim[2].extent = %d != 0\n",
                      num, x->dim[2].extent);
     }
@@ -44,7 +44,7 @@ c_assumed (CFI_cdesc_t *x, int num)
       if (x->dim[2].extent == 0)
        __builtin_printf ("c_assumed - 100 - OK\n");
       else
-       __builtin_printf ("ERROR: c_assumed num=%d: "
+       __builtin_printf ("error: c_assumed num=%d: "
                      "x->dim[2].extent = %d != 0\n",
                      num, x->dim[2].extent);
     }