This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
[PATCH] Fix type mismatch in fortran generated comparison
- From: Richard Guenther <rguenther at suse dot de>
- To: gcc-patches at gcc dot gnu dot org
- Cc: fortran at gcc dot gnu dot org
- Date: Tue, 27 Feb 2007 15:29:21 +0100 (CET)
- Subject: [PATCH] Fix type mismatch in fortran generated comparison
Bootstrapped and tested on x86_64-unknown-linux-gnu, committed as obvious.
Richard.
2007-02-27 Richard Guenther <rguenther@suse.de>
* trans-array.c (structure_alloc_comps): Use correct type
for null pointer constant.
Index: fortran/trans-array.c
===================================================================
*** fortran/trans-array.c (revision 122329)
--- fortran/trans-array.c (working copy)
*************** structure_alloc_comps (gfc_symbol * der_
*** 4990,4996 ****
null_cond = gfc_conv_descriptor_data_get (decl);
null_cond = build2 (NE_EXPR, boolean_type_node, null_cond,
! build_int_cst (TREE_TYPE (tmp), 0));
}
else
{
--- 4990,4996 ----
null_cond = gfc_conv_descriptor_data_get (decl);
null_cond = build2 (NE_EXPR, boolean_type_node, null_cond,
! build_int_cst (TREE_TYPE (null_cond), 0));
}
else
{