re GNATS gcj/97 (Internal compiler error)

Thu Nov 11 01:57:14 1999  Alexandre Petit-Bianco  <apbianco@cygnus.com>

        * parse.y (lookup_method_invoke): Use lang_printable_name to
 	reliably build the type name during error report. Fixes PR gcj/97.

From-SVN: r30739

gcc/java/ChangeLog

@@ -31,6 +31,11 @@ Wed Nov 17 21:09:28 1999  Alexandre Petit-Bianco  <apbianco@cygnus.com>
 	* class.c (layout_class): Always convert TYPE_SIZE_UNIT to
  	int_type_node: that's what `_Jv_AllocObject' expects.
 
+Thu Nov 11 01:57:14 1999  Alexandre Petit-Bianco  <apbianco@cygnus.com>
+
+        * parse.y (lookup_method_invoke): Use lang_printable_name to
+ 	reliably build the type name during error report. Fixes PR gcj/97.
+
 1999-11-09  Tom Tromey  <tromey@cygnus.com>
 
 	* jcf-path.c: Include <sys/stat.h>.

gcc/java/parse.y

@@ -7561,6 +7561,7 @@ lookup_method_invoke (lc, cl, class, name, arg_list)
   tree atl = end_params_node;		/* Arg Type List */
   tree method, signature, list, node;
   const char *candidates;		/* Used for error report */
+  char *dup;
 
   /* Fix the arguments */
   for (node = arg_list; node; node = TREE_CHAIN (node))
@@ -7610,14 +7611,13 @@ lookup_method_invoke (lc, cl, class, name, arg_list)
   method = make_node (FUNCTION_TYPE);
   TYPE_ARG_TYPES (method) = atl;
   signature = build_java_argument_signature (method);
-  parse_error_context (cl, "Can't find %s `%s(%s)' in class `%s'%s",
+  dup = strdup (lang_printable_name (class, 0));
+  parse_error_context (cl, "Can't find %s `%s(%s)' in type `%s'%s",
 		       (lc ? "constructor" : "method"),
-		       (lc ? 
-			IDENTIFIER_POINTER (DECL_NAME (TYPE_NAME (class))) :
-			IDENTIFIER_POINTER (name)),
-		       IDENTIFIER_POINTER (signature),
-		       IDENTIFIER_POINTER (DECL_NAME (TYPE_NAME (class))),
+		       (lc ? dup : IDENTIFIER_POINTER (name)),
+		       IDENTIFIER_POINTER (signature), dup,
 		       (candidates ? candidates : ""));
+  free (dup);
   return NULL_TREE;
 }