]> git.ipfire.org Git - thirdparty/gcc.git/commit - gcc/fortran/trans-decl.c
projects / thirdparty / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 8297c70) | patch
PR fortran/71687
authorjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 1 Jul 2016 20:52:54 +0000 (20:52 +0000)
committerjakub <jakub@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 1 Jul 2016 20:52:54 +0000 (20:52 +0000)
commit267f3c67a03dbbf1acd43ae14d1972fd6850d026
treea3ddb9cca844feca67466281ebedca4796fe9577tree | snapshot
parent8297c70b855b1d10412db9b17ffe3af62d94e85bcommit | diff
PR fortran/71687
* f95-lang.c (struct binding_level): Add reversed field.
(clear_binding_level): Adjust initializer.
(getdecls): If reversed is clear, set it and nreverse the names
chain before returning it.
(poplevel): Use getdecls.
* trans-decl.c (gfc_generate_function_code, gfc_process_block_locals):
Use nreverse to pushdecl decls in the declaration order.

* gfortran.dg/gomp/pr71687.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@237926 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog diff | blob | blame | history
gcc/fortran/f95-lang.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/gomp/pr71687.f90 [new file with mode: 0644] blob
Mirror of https://gcc.gnu.org/git/gcc.git