On Sat, Feb 17, 2024 at 04:05:16PM +0100, Harald Anlauf wrote:
> > +program pr113503
> > + implicit none
> > + type :: T
> > + character(len=:), allocatable :: u
> > + end type
> > + character(len=20) :: us(1) = 'foobar'
> > + type(T) :: x
> > + x = T(u = trim (us(1))) ! { dg-bogus "is used uninitialized" }
> ^^^^ tab here not allowed in Fortran
>
> My newsreader shows a tab here, giving a warning when running the test.
> Also, applying your patch on top of r14-9045 I do not see the
> uninitialized warning, which could have been fixed by r14-8947.
> Please recheck and adjust accordingly.
I certainly see if I apply just the testsuite part of the patch to current
trunk
make check-gfortran RUNTESTFLAGS='--target_board=unix\{-m32,-m64\}
dg.exp=pr113503*.f90'
...
FAIL: gfortran.dg/pr113503_1.f90 -O (test for bogus messages, line 12)
FAIL: gfortran.dg/pr113503_2.f90 -O (internal compiler error: in
gimplify_var_or_parm_decl, at gimplify.cc:3280)
FAIL: gfortran.dg/pr113503_2.f90 -O (test for excess errors)
=== gfortran Summary for unix/-m32 ===
# of expected passes 1
# of unexpected failures 3
...
FAIL: gfortran.dg/pr113503_1.f90 -O (test for bogus messages, line 12)
FAIL: gfortran.dg/pr113503_2.f90 -O (internal compiler error: in
gimplify_var_or_parm_decl, at gimplify.cc:3280)
FAIL: gfortran.dg/pr113503_2.f90 -O (test for excess errors)
=== gfortran Summary for unix/-m64 ===
# of expected passes 1
# of unexpected failures 3
and that is all gone after I apply the trans-expr.cc patch as well and
make before the above command.
I have replaced the tab with a space, but from what I can see, there is no
warning/error with the options it is compiled, warning with -Wtabs or -Wall
and error with -pedantic-errors, but those options aren't used.
Thanks.
Jakub
