This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Ada] Fix type mismatch on IA-64


This fixes all the failures in the gnat.dg testsuite on IA-64.

Applied on the mainline.


2008-11-20  Eric Botcazou  <ebotcazou@adacore.com>

	* gcc-interface/utils.c (init_gigi_decls): Fix type mismatch.


-- 
Eric Botcazou
Index: gcc-interface/utils.c
===================================================================
--- gcc-interface/utils.c	(revision 141915)
+++ gcc-interface/utils.c	(working copy)
@@ -577,6 +577,7 @@ init_gigi_decls (tree long_long_float_ty
   /* Build the special descriptor type and its null node if needed.  */
   if (TARGET_VTABLE_USES_DESCRIPTORS)
     {
+      tree null_node = fold_convert (ptr_void_ftype, null_pointer_node);
       tree field_list = NULL_TREE, null_list = NULL_TREE;
       int j;
 
@@ -588,7 +589,7 @@ init_gigi_decls (tree long_long_float_ty
 					  fdesc_type_node, 0, 0, 0, 1);
 	  TREE_CHAIN (field) = field_list;
 	  field_list = field;
-	  null_list = tree_cons (field, null_pointer_node, null_list);
+	  null_list = tree_cons (field, null_node, null_list);
 	}
 
       finish_record_type (fdesc_type_node, nreverse (field_list), 0, false);

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]