[PATCH] Fix type mismatch in fortran generated comparison

[Richard Guenther]

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
  	{