2005-01-09 Paul Brook <paul@codesourcery.com>
commit0626976e4c4cca4075a9d482b0483e717d77a930
authorpbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 9 Jan 2005 22:57:45 +0000 (9 22:57 +0000)
committerpbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 9 Jan 2005 22:57:45 +0000 (9 22:57 +0000)
treec22196ec02502cd35005a6f2c53a95eb645eafdb
parentf564e6eb34c3bde114309c0d3ee3b6cd38f12376
2005-01-09  Paul Brook  <paul@codesourcery.com>

PR fortran/17675
* trans-common.c (current_common, current_offset): Remove.
(create_common): Add head argument.
(align_segment): New function.
(apply_segment_offset): New function.
(translate_common): Merge code from new_segment.  Handle alignment.
(new_segment): Remove.
(finish_equivalences): Ensure proper alignment.
testsuite/
* gfortran.dg/common_2.f90: New file.
* gfortran.dg/common_3.f90: New file.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@93122 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-common.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/common_2.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/common_3.f90 [new file with mode: 0644]