boehm.c (PROCEDURE_OBJECT_DESCRIPTOR): Set to use `build_int_2.'

2001-03-28  Hans Boehm  <boehm@acm.org>

        * boehm.c (PROCEDURE_OBJECT_DESCRIPTOR): Set to use `build_int_2.'
        (get_boehm_type_descriptor): Set type on returned value to be a
        pointer length integer.

(http://gcc.gnu.org/ml/java/2001-03/msg00444.html)

From-SVN: r41059

gcc/java/ChangeLog

@@ -4,6 +4,12 @@
 	lang_printable_name call in a scratch buffer, so it 
 	won't be clobbered by the second call.
 
+2001-03-28  Hans Boehm  <boehm@acm.org>
+
+	* boehm.c (PROCEDURE_OBJECT_DESCRIPTOR): Set to use `build_int_2.'
+	(get_boehm_type_descriptor): Set type on returned value to be a
+	pointer length integer.
+
 2001-03-28  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
 
 	* expr.c (pop_type_0): Call `concat' rather than building the
@@ -13,12 +19,6 @@
 	* parse.y (patch_method_invocation): Avoid casting away
 	const-ness.
 
-2001-03-21  Alexandre Petit-Bianco  <apbianco@redhat.com>
-
-	* parse.y (qualify_ambiguous_name): Broaden `length'
-	recognition. Help MODIFY_EXPR be resolved as expression names.
-	Fixes PR java/2066. Fixes PR java/2400.
-
 2001-03-28  Jeffrey Oldham  <oldham@codesourcery.com>
 
 	* jvgenmain.c (do_mangle_classname): End string constant with '\0'.
@@ -174,6 +174,12 @@
 	* gjavah.c (cxx_keywords): Update from the definitive list in cp/lex.c.
 	* lex.c (cxx_keywords): Likewise.
 
+2001-03-21  Alexandre Petit-Bianco  <apbianco@redhat.com>
+
+	* parse.y (qualify_ambiguous_name): Broaden `length'
+	recognition. Help MODIFY_EXPR be resolved as expression names.
+	Fixes PR java/2066. Fixes PR java/2400.
+
 2001-03-21  Bryce McKinlay  <bryce@albatross.co.nz>
 
 	* gjavah.c (process_file): Mark interface definitions with 

gcc/java/boehm.c

@@ -48,7 +48,7 @@ static void set_bit PARAMS ((unsigned HOST_WIDE_INT *,
 	    (((((env) << LOG_MAX_MARK_PROCS) | (proc_index)) << DS_TAG_BITS) \
 	    | DS_PROC)
    Here DS_PROC == 2.  */
-#define PROCEDURE_OBJECT_DESCRIPTOR integer_two_node
+#define PROCEDURE_OBJECT_DESCRIPTOR build_int_2 (2, 0)
 
 /* Treat two HOST_WIDE_INT's as a contiguous bitmap, with bit 0 being
    the least significant.  This function sets bit N in the bitmap.  */
@@ -228,5 +228,6 @@ get_boehm_type_descriptor (tree type)
   else
     value = PROCEDURE_OBJECT_DESCRIPTOR;
 
+  TREE_TYPE (value) = type_for_mode (ptr_mode, 1);
   return value;
 }