This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [PATCH] fortran/36153 -- Fix complicationn due to KIND in SIZE


> The attached patch fixes the problem in PR fortran/36153.
>
> +	      if (strncmp(arg->next->name, "kind", 4) == 0)
> +		break;
> +

The patch cases an ICE (segfault) for several testcases, e.g.:
  libgomp.fortran/allocatable1.f90

$ gfortran  libgomp.fortran/allocatable4.f90

shows in valgrind:

==23517== Invalid read of size 1
==23517==    at 0x4680D7: gfc_resolve_expr (resolve.c:2311)
==23517==    by 0x46C1B2: resolve_operator (resolve.c:2921)
==23517==    by 0x4673AC: gfc_resolve_expr (resolve.c:4549)
==23517==    by 0x46C213: resolve_operator (resolve.c:2912)

Line 2311 is:
+	      if (strncmp(arg->next->name, "kind", 4) == 0)

Tobias


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]