https://gcc.gnu.org/bugzilla/show_bug.cgi?id=67939

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fort...@t-online.de> 
---
$ echo $LANG
de_DE.UTF-8
$ echo $LC_ALL

$ cat z3.f90
program p
   character(8) :: x
   data x(3:1) /'abc'/
end


$ gfortran -g -O0 z3.f90
z3.f90:3:17:

    data x(3:1) /'abc'/
                 1
Warning: Initialization string starting at (1) was truncated to fit the
variable (-1/3)
f951: malloc.c:2369: sysmalloc: Assertion `(old_top == (((mbinptr) (((char *)
&((av)->bins[((1) - 1) * 2])) - __builtin_offsetof (struct malloc_chunk, fd))))
&& old_size == 0) || ((unsigned long) (old_size) >= (unsigned
long)((((__builtin_offsetof (struct ...

Reply via email to