[PATCH] Re: Some type mismatches

FX Coudert fxcoudert@gmail.com
Thu May 31 17:32:00 GMT 2007


> Index: trans-array.c
> ===================================================================
> *** trans-array.c	(revision 125217)
> --- trans-array.c	(working copy)
> *************** gfc_trans_array_constructor_value (stmtb
> *** 1196,1202 ****
>   	      gfc_add_expr_to_block (&body, tmp);
>
>   	      *poffset = fold_build2 (PLUS_EXPR, gfc_array_index_type,
> ! 				      *poffset, build_int_cst (NULL_TREE, n));
>   	    }
>   	  if (!INTEGER_CST_P (*poffset))
>               {
> --- 1196,1203 ----
>   	      gfc_add_expr_to_block (&body, tmp);
>
>   	      *poffset = fold_build2 (PLUS_EXPR, gfc_array_index_type,
> ! 				      *poffset,
> ! 				      build_int_cst (gfc_array_index_type, n));
>   	    }
>   	  if (!INTEGER_CST_P (*poffset))
>               {

OK provided it bootstraps.

FX



More information about the Gcc-patches mailing list