diff options
| author | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-23 15:14:36 +0000 |
|---|---|---|
| committer | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-23 15:14:36 +0000 |
| commit | ead624501c67fcfbe42d3f32951f647f83d16ed6 (patch) | |
| tree | f8205786cc8a2cd8c9046a78ba52ff069a490726 /gcc/fortran/expr.c | |
| parent | b21711eb91a9f2cc0017fc8e09e68e62d13c02ef (diff) | |
| download | ppe42-gcc-ead624501c67fcfbe42d3f32951f647f83d16ed6.tar.gz ppe42-gcc-ead624501c67fcfbe42d3f32951f647f83d16ed6.zip | |
* gfortran.h (struct gfc_symbol): Add equiv_built.
* trans-common.c: Change int to HOST_WIDE_INT. Capitalize error
messages.
(current_length): Remove.
(add_segments): New function.
(build_equiv_decl): Create initialized common blocks.
(build_common_decl): Always add decl to bindings.
(create_common): Create initializers.
(find_segment_info): Reformat to match coding conventions.
(new_condition): Use add_segments.
(add_condition, find_equivalence, add_equivalences): Move iteration
inside functions. Only process each segment once.
(new_segment, finish_equivalences, translate_common): Simplify.
testsuite/
* gfortran.fortran-torture/execute/common_init_1.f90: New test.
* gfortran.fortran-torture/execute/equiv_init.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@82165 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/expr.c')
0 files changed, 0 insertions, 0 deletions
