]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/decl.c
projects / thirdparty / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 68e4391) | patch
* decl.c (variable_decl): Don't share charlen structs if
authorjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 23 Aug 2007 23:25:42 +0000 (23:25 +0000)
committerjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 23 Aug 2007 23:25:42 +0000 (23:25 +0000)
commit04b61f603160099e5a9ceac1f56dfd0bac0bfd0b
tree8c453da406c283968faca7997474722567e1f1d5tree | snapshot
parent68e4391d8512890b66276266f194cde977b937aecommit | diff
* decl.c (variable_decl): Don't share charlen structs if
length == NULL.
* trans-decl.c (create_function_arglist): Assert
f->sym->ts.cl->backend_decl is NULL instead of unsharing
charlen struct here.

* gfortran.dg/assumed_charlen_sharing.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127748 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog diff | blob | blame | history
gcc/fortran/decl.c diff | blob | blame | history
gcc/fortran/trans-decl.c diff | blob | blame | history
gcc/testsuite/ChangeLog diff | blob | blame | history
gcc/testsuite/gfortran.dg/assumed_charlen_sharing.f90 [new file with mode: 0644] blob
Mirror of https://gcc.gnu.org/git/gcc.git