diff options
author | Michael Matz <matz@suse.de> | 2009-08-19 10:17:33 +0000 |
---|---|---|
committer | Michael Matz <matz@gcc.gnu.org> | 2009-08-19 10:17:33 +0000 |
commit | 10174ddf5d0e0e2293e54ebc14f9c49a9983de98 (patch) | |
tree | b794f6439d5a67d4ade17d342bf5bd2bff70ce2f /gcc/fortran/trans.h | |
parent | 693d54f279d5c1d8694f47a6bcbf6718c618a1fe (diff) | |
download | gcc-10174ddf5d0e0e2293e54ebc14f9c49a9983de98.zip gcc-10174ddf5d0e0e2293e54ebc14f9c49a9983de98.tar.gz gcc-10174ddf5d0e0e2293e54ebc14f9c49a9983de98.tar.bz2 |
tree-ssa-structalias.c (create_variable_info_for): Also mark first field in a struct.
* tree-ssa-structalias.c (create_variable_info_for): Also mark
first field in a struct.
(intra_create_variable_infos): Don't deal with flag_argument_noalias.
fortran/
* trans-expr.c (gfc_conv_substring): Don't evaluate casted decl early,
change order of length calculation to (end - start) + 1.
(gfc_get_interface_mapping_array): Adjust call to
gfc_get_nodesc_array_type.
* trans-array.c (gfc_trans_create_temp_array,
gfc_build_constant_array_constructor, gfc_conv_expr_descriptor): Ditto.
* trans-stmt.c (gfc_trans_pointer_assign_need_temp): Ditto.
* trans.c (gfc_add_modify): Assignment between base type and nontarget
type are equal enough.
(gfc_call_malloc): Use prvoid_type_node for return value of
__builtin_malloc.
(gfc_allocate_with_status): Ditto.
* trans-types.c (gfc_array_descriptor_base): Double size of this array.
(gfc_init_types): Build prvoid_type_node.
(gfc_build_array_type): New bool parameter "restricted".
(gfc_get_nodesc_array_type): Ditto, build restrict qualified pointers,
if it's true.
(gfc_get_array_descriptor_base): Ditto.
(gfc_get_array_type_bounds): Ditto.
(gfc_sym_type): Use symbol attributes to feed calls to above functions.
(gfc_get_derived_type): Ditto.
* trans.h (struct lang_type): Add nontarget_type member.
* trans-types.h (prvoid_type_node): Declare.
(gfc_get_array_type_bounds, gfc_get_nodesc_array_type): Declare new
parameter.
* trans-decl.c (gfc_finish_var_decl): Give scalars that can't be
aliased a type with a different alias set than the base type.
(gfc_build_dummy_array_decl): Adjust call to gfc_get_nodesc_array_type.
testsuite/
* gfortran.dg/vect/vect-gems.f90: New test.
* gcc.dg/tree-ssa/alias-1.c: Remove, it checks something broken.
From-SVN: r150934
Diffstat (limited to 'gcc/fortran/trans.h')
-rw-r--r-- | gcc/fortran/trans.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/trans.h b/gcc/fortran/trans.h index 4469023..643f28b 100644 --- a/gcc/fortran/trans.h +++ b/gcc/fortran/trans.h @@ -629,6 +629,7 @@ struct GTY(()) lang_type { tree dataptr_type; tree span; tree base_decl[2]; + tree nontarget_type; }; struct GTY(()) lang_decl { |