[deliverable/binutils-gdb.git] / gdb / jv-typeprint.c

/* Support for printing Java types for GDB, the GNU debugger.
   Copyright (C) 1997-2016 Free Software Foundation, Inc.

   This file is part of GDB.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */


#include "defs.h"
#include "symtab.h"
#include "gdbtypes.h"
#include "value.h"
#include "demangle.h"
#include "gdb-demangle.h"
#include "jv-lang.h"
#include "typeprint.h"
#include "c-lang.h"
#include "cp-abi.h"
#include "cp-support.h"

/* Local functions */

static void java_type_print_base (struct type * type,
				  struct ui_file *stream, int show,
				  int level,
				  const struct type_print_options *flags);

static void
java_type_print_derivation_info (struct ui_file *stream, struct type *type)
{
  const char *name;
  int i;
  int n_bases;
  int prev;

  n_bases = TYPE_N_BASECLASSES (type);

  for (i = 0, prev = 0; i < n_bases; i++)
    {
      int kind;

      kind = BASETYPE_VIA_VIRTUAL (type, i) ? 'I' : 'E';

      fputs_filtered (kind == prev ? ", "
		      : kind == 'I' ? " implements "
		      : " extends ",
		      stream);
      prev = kind;
      name = type_name_no_tag (TYPE_BASECLASS (type, i));

      fprintf_filtered (stream, "%s", name ? name : "(null)");
    }

  if (i > 0)
    fputs_filtered (" ", stream);
}

/* Print the name of the type (or the ultimate pointer target,
   function value or array element), or the description of a
   structure or union.

   SHOW positive means print details about the type (e.g. enum values),
   and print structure elements passing SHOW - 1 for show.
   SHOW negative means just print the type name or struct tag if there is one.
   If there is no name, print something sensible but concise like
   "struct {...}".
   SHOW zero means just print the type name or struct tag if there is one.
   If there is no name, print something sensible but not as concise like
   "struct {int x; int y;}".

   LEVEL is the number of spaces to indent by.
   We increase it for some recursive calls.  */

static void
java_type_print_base (struct type *type, struct ui_file *stream, int show,
		      int level, const struct type_print_options *flags)
{
  int i;
  int len;
  char *mangled_name;
  char *demangled_name;

  QUIT;
  wrap_here ("    ");

  if (type == NULL)
    {
      fputs_filtered ("<type unknown>", stream);
      return;
    }

  /* When SHOW is zero or less, and there is a valid type name, then always
     just print the type name directly from the type.  */

  if (show <= 0
      && TYPE_NAME (type) != NULL)
    {
      fputs_filtered (TYPE_NAME (type), stream);
      return;
    }

  type = check_typedef (type);

  switch (TYPE_CODE (type))
    {
    case TYPE_CODE_PTR:
      java_type_print_base (TYPE_TARGET_TYPE (type), stream, show, level,
			    flags);
      break;

    case TYPE_CODE_STRUCT:
      if (TYPE_TAG_NAME (type) != NULL && TYPE_TAG_NAME (type)[0] == '[')
	{			/* array type */
	  char *name = java_demangle_type_signature (TYPE_TAG_NAME (type));

	  fputs_filtered (name, stream);
	  xfree (name);
	  break;
	}

      if (show >= 0)
	fprintf_filtered (stream, "class ");

      if (TYPE_TAG_NAME (type) != NULL)
	{
	  fputs_filtered (TYPE_TAG_NAME (type), stream);
	  if (show > 0)
	    fputs_filtered (" ", stream);
	}

      wrap_here ("    ");

      if (show < 0)
	{
	  /* If we just printed a tag name, no need to print anything else.  */
	  if (TYPE_TAG_NAME (type) == NULL)
	    fprintf_filtered (stream, "{...}");
	}
      else if (show > 0 || TYPE_TAG_NAME (type) == NULL)
	{
	  java_type_print_derivation_info (stream, type);

	  fprintf_filtered (stream, "{\n");
	  if ((TYPE_NFIELDS (type) == 0) && (TYPE_NFN_FIELDS (type) == 0))
	    {
	      if (TYPE_STUB (type))
		fprintfi_filtered (level + 4, stream, "<incomplete type>\n");
	      else
		fprintfi_filtered (level + 4, stream, "<no data fields>\n");
	    }

	  /* If there is a base class for this type,
	     do not print the field that it occupies.  */

	  len = TYPE_NFIELDS (type);
	  for (i = TYPE_N_BASECLASSES (type); i < len; i++)
	    {
	      QUIT;
	      /* Don't print out virtual function table.  */
	      if (startswith (TYPE_FIELD_NAME (type, i), "_vptr")
		  && is_cplus_marker ((TYPE_FIELD_NAME (type, i))[5]))
		continue;

	      /* Don't print the dummy field "class".  */
	      if (startswith (TYPE_FIELD_NAME (type, i), "class"))
		continue;

	      print_spaces_filtered (level + 4, stream);

	      if (HAVE_CPLUS_STRUCT (type))
		{
		  if (TYPE_FIELD_PROTECTED (type, i))
		    fprintf_filtered (stream, "protected ");
		  else if (TYPE_FIELD_PRIVATE (type, i))
		    fprintf_filtered (stream, "private ");
		  else
		    fprintf_filtered (stream, "public ");
		}

	      if (field_is_static (&TYPE_FIELD (type, i)))
		fprintf_filtered (stream, "static ");

	      java_print_type (TYPE_FIELD_TYPE (type, i),
			       TYPE_FIELD_NAME (type, i),
			       stream, show - 1, level + 4, flags);

	      fprintf_filtered (stream, ";\n");
	    }

	  /* If there are both fields and methods, put a space between.  */
	  len = TYPE_NFN_FIELDS (type);
	  if (len)
	    fprintf_filtered (stream, "\n");

	  /* Print out the methods.  */

	  for (i = 0; i < len; i++)
	    {
	      struct fn_field *f;
	      int j;
	      const char *method_name;
	      const char *name;
	      int is_constructor;
	      int n_overloads;

	      f = TYPE_FN_FIELDLIST1 (type, i);
	      n_overloads = TYPE_FN_FIELDLIST_LENGTH (type, i);
	      method_name = TYPE_FN_FIELDLIST_NAME (type, i);
	      name = type_name_no_tag (type);
	      is_constructor = name && strcmp (method_name, name) == 0;

	      for (j = 0; j < n_overloads; j++)
		{
		  const char *real_physname;
		  const char *p;
		  char *physname;
		  int is_full_physname_constructor;

		  real_physname = TYPE_FN_FIELD_PHYSNAME (f, j);

		  /* The physname will contain the return type
		     after the final closing parenthesis.  Strip it off.  */
		  p = strrchr (real_physname, ')');
		  gdb_assert (p != NULL);
		  ++p;   /* Keep the trailing ')'.  */
		  physname = (char *) alloca (p - real_physname + 1);
		  memcpy (physname, real_physname, p - real_physname);
		  physname[p - real_physname] = '\0';

		  is_full_physname_constructor
                    = (TYPE_FN_FIELD_CONSTRUCTOR (f, j)
		       || is_constructor_name (physname)
                       || is_destructor_name (physname));

		  QUIT;

		  print_spaces_filtered (level + 4, stream);

		  if (TYPE_FN_FIELD_PROTECTED (f, j))
		    fprintf_filtered (stream, "protected ");
		  else if (TYPE_FN_FIELD_PRIVATE (f, j))
		    fprintf_filtered (stream, "private ");
		  else if (TYPE_FN_FIELD_PUBLIC (f, j))
		    fprintf_filtered (stream, "public ");

		  if (TYPE_FN_FIELD_ABSTRACT (f, j))
		    fprintf_filtered (stream, "abstract ");
		  if (TYPE_FN_FIELD_STATIC (f, j))
		    fprintf_filtered (stream, "static ");
		  if (TYPE_FN_FIELD_FINAL (f, j))
		    fprintf_filtered (stream, "final ");
		  if (TYPE_FN_FIELD_SYNCHRONIZED (f, j))
		    fprintf_filtered (stream, "synchronized ");
		  if (TYPE_FN_FIELD_NATIVE (f, j))
		    fprintf_filtered (stream, "native ");

		  if (TYPE_TARGET_TYPE (TYPE_FN_FIELD_TYPE (f, j)) == 0)
		    {
		      /* Keep GDB from crashing here.  */
		      fprintf_filtered (stream, "<undefined type> %s;\n",
					TYPE_FN_FIELD_PHYSNAME (f, j));
		      break;
		    }
		  else if (!is_constructor && !is_full_physname_constructor)
		    {
		      type_print (TYPE_TARGET_TYPE (TYPE_FN_FIELD_TYPE (f, j)),
				  "", stream, -1);
		      fputs_filtered (" ", stream);
		    }

		  if (TYPE_FN_FIELD_STUB (f, j))
		    /* Build something we can demangle.  */
		    mangled_name = gdb_mangle_name (type, i, j);
		  else
		    mangled_name = physname;

		  demangled_name =
		    gdb_demangle (mangled_name,
				  DMGL_ANSI | DMGL_PARAMS | DMGL_JAVA);

		  if (demangled_name == NULL)
		    demangled_name = xstrdup (mangled_name);

		  {
		    char *demangled_no_class;
		    char *ptr;

		    ptr = demangled_no_class = demangled_name;

		    while (1)
		      {
			char c;

			c = *ptr++;

			if (c == 0 || c == '(')
			  break;
			if (c == '.')
			  demangled_no_class = ptr;
		      }

		    fputs_filtered (demangled_no_class, stream);
		    xfree (demangled_name);
		  }

		  if (TYPE_FN_FIELD_STUB (f, j))
		    xfree (mangled_name);

		  fprintf_filtered (stream, ";\n");
		}
	    }

	  fprintfi_filtered (level, stream, "}");
	}
      break;

    default:
      c_type_print_base (type, stream, show, level, flags);
    }
}

/* LEVEL is the depth to indent lines by.  */

void
java_print_type (struct type *type, const char *varstring,
		 struct ui_file *stream, int show, int level,
		 const struct type_print_options *flags)
{
  int demangled_args;

  java_type_print_base (type, stream, show, level, flags);

  if (varstring != NULL && *varstring != '\0')
    {
      fputs_filtered (" ", stream);
      fputs_filtered (varstring, stream);
    }

  /* For demangled function names, we have the arglist as part of the name,
     so don't print an additional pair of ()'s.  */

  demangled_args = varstring != NULL && strchr (varstring, '(') != NULL;
  c_type_print_varspec_suffix (type, stream, show, 0, demangled_args, flags);
}
Commit	Line	Data
c906108c	1	/* Support for printing Java types for GDB, the GNU debugger.
618f726f	2	Copyright (C) 1997-2016 Free Software Foundation, Inc.
c906108c	3
c5aa993b	4	This file is part of GDB.
c906108c	5
c5aa993b JM	6	This program is free software; you can redistribute it and/or modify
c5aa993b JM	7	it under the terms of the GNU General Public License as published by
a9762ec7	8	the Free Software Foundation; either version 3 of the License, or
c5aa993b	9	(at your option) any later version.
c906108c	10
c5aa993b JM	11	This program is distributed in the hope that it will be useful,
	12	but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	GNU General Public License for more details.
c906108c	15
c5aa993b	16	You should have received a copy of the GNU General Public License
a9762ec7	17	along with this program. If not, see <http://www.gnu.org/licenses/>. */
c906108c SS	18
	19
	20	#include "defs.h"
	21	#include "symtab.h"
	22	#include "gdbtypes.h"
	23	#include "value.h"
	24	#include "demangle.h"
50f182aa	25	#include "gdb-demangle.h"
c906108c	26	#include "jv-lang.h"
c906108c	27	#include "typeprint.h"
7a292a7a	28	#include "c-lang.h"
015a42b4	29	#include "cp-abi.h"
8de20a37	30	#include "cp-support.h"
c906108c	31
392a587b JM	32	/* Local functions */
392a587b JM	33
d9fcf2fb JM	34	static void java_type_print_base (struct type * type,
d9fcf2fb JM	35	struct ui_file *stream, int show,
79d43c61 TT	36	int level,
79d43c61 TT	37	const struct type_print_options *flags);
392a587b	38
c906108c	39	static void
fba45db2	40	java_type_print_derivation_info (struct ui_file stream, struct type type)
c906108c	41	{
0d5cff50	42	const char *name;
c906108c SS	43	int i;
	44	int n_bases;
	45	int prev;
	46
	47	n_bases = TYPE_N_BASECLASSES (type);
	48
	49	for (i = 0, prev = 0; i < n_bases; i++)
	50	{
	51	int kind;
	52
c5aa993b	53	kind = BASETYPE_VIA_VIRTUAL (type, i) ? 'I' : 'E';
c906108c SS	54
	55	fputs_filtered (kind == prev ? ", "
	56	: kind == 'I' ? " implements "
	57	: " extends ",
	58	stream);
	59	prev = kind;
	60	name = type_name_no_tag (TYPE_BASECLASS (type, i));
	61
	62	fprintf_filtered (stream, "%s", name ? name : "(null)");
	63	}
	64
	65	if (i > 0)
	66	fputs_filtered (" ", stream);
	67	}
	68
	69	/* Print the name of the type (or the ultimate pointer target,
	70	function value or array element), or the description of a
	71	structure or union.
	72
	73	SHOW positive means print details about the type (e.g. enum values),
	74	and print structure elements passing SHOW - 1 for show.
	75	SHOW negative means just print the type name or struct tag if there is one.
	76	If there is no name, print something sensible but concise like
	77	"struct {...}".
	78	SHOW zero means just print the type name or struct tag if there is one.
	79	If there is no name, print something sensible but not as concise like
	80	"struct {int x; int y;}".
	81
	82	LEVEL is the number of spaces to indent by.
	83	We increase it for some recursive calls. */
	84
392a587b	85	static void
fba45db2	86	java_type_print_base (struct type type, struct ui_file stream, int show,
79d43c61	87	int level, const struct type_print_options *flags)
c906108c	88	{
52f0bd74 AC	89	int i;
52f0bd74 AC	90	int len;
c906108c SS	91	char *mangled_name;
c906108c SS	92	char *demangled_name;
c906108c	93
e0881a8e	94	QUIT;
c906108c SS	95	wrap_here (" ");
	96
	97	if (type == NULL)
	98	{
	99	fputs_filtered ("<type unknown>", stream);
	100	return;
	101	}
	102
	103	/* When SHOW is zero or less, and there is a valid type name, then always
	104	just print the type name directly from the type. */
	105
	106	if (show <= 0
	107	&& TYPE_NAME (type) != NULL)
	108	{
	109	fputs_filtered (TYPE_NAME (type), stream);
	110	return;
	111	}
	112
f168693b	113	type = check_typedef (type);
c906108c SS	114
	115	switch (TYPE_CODE (type))
	116	{
	117	case TYPE_CODE_PTR:
79d43c61 TT	118	java_type_print_base (TYPE_TARGET_TYPE (type), stream, show, level,
79d43c61 TT	119	flags);
c906108c SS	120	break;
	121
	122	case TYPE_CODE_STRUCT:
	123	if (TYPE_TAG_NAME (type) != NULL && TYPE_TAG_NAME (type)[0] == '[')
	124	{ /* array type */
	125	char *name = java_demangle_type_signature (TYPE_TAG_NAME (type));
e0881a8e	126
c906108c	127	fputs_filtered (name, stream);
b8c9b27d	128	xfree (name);
c906108c SS	129	break;
	130	}
	131
	132	if (show >= 0)
	133	fprintf_filtered (stream, "class ");
	134
	135	if (TYPE_TAG_NAME (type) != NULL)
	136	{
	137	fputs_filtered (TYPE_TAG_NAME (type), stream);
	138	if (show > 0)
	139	fputs_filtered (" ", stream);
	140	}
	141
	142	wrap_here (" ");
	143
	144	if (show < 0)
	145	{
	146	/* If we just printed a tag name, no need to print anything else. */
	147	if (TYPE_TAG_NAME (type) == NULL)
	148	fprintf_filtered (stream, "{...}");
	149	}
	150	else if (show > 0 \|\| TYPE_TAG_NAME (type) == NULL)
	151	{
	152	java_type_print_derivation_info (stream, type);
c5aa993b	153
c906108c SS	154	fprintf_filtered (stream, "{\n");
c906108c SS	155	if ((TYPE_NFIELDS (type) == 0) && (TYPE_NFN_FIELDS (type) == 0))
7a292a7a	156	{
74a9bb82	157	if (TYPE_STUB (type))
7a292a7a SS	158	fprintfi_filtered (level + 4, stream, "<incomplete type>\n");
	159	else
	160	fprintfi_filtered (level + 4, stream, "<no data fields>\n");
	161	}
c906108c SS	162
	163	/* If there is a base class for this type,
	164	do not print the field that it occupies. */
	165
	166	len = TYPE_NFIELDS (type);
	167	for (i = TYPE_N_BASECLASSES (type); i < len; i++)
	168	{
	169	QUIT;
	170	/* Don't print out virtual function table. */
61012eef	171	if (startswith (TYPE_FIELD_NAME (type, i), "_vptr")
c906108c SS	172	&& is_cplus_marker ((TYPE_FIELD_NAME (type, i))[5]))
	173	continue;
	174
1777feb0	175	/* Don't print the dummy field "class". */
61012eef	176	if (startswith (TYPE_FIELD_NAME (type, i), "class"))
c906108c SS	177	continue;
	178
	179	print_spaces_filtered (level + 4, stream);
	180
	181	if (HAVE_CPLUS_STRUCT (type))
7a292a7a SS	182	{
	183	if (TYPE_FIELD_PROTECTED (type, i))
	184	fprintf_filtered (stream, "protected ");
	185	else if (TYPE_FIELD_PRIVATE (type, i))
	186	fprintf_filtered (stream, "private ");
	187	else
	188	fprintf_filtered (stream, "public ");
	189	}
c906108c	190
d6a843b5	191	if (field_is_static (&TYPE_FIELD (type, i)))
c906108c SS	192	fprintf_filtered (stream, "static ");
	193
	194	java_print_type (TYPE_FIELD_TYPE (type, i),
	195	TYPE_FIELD_NAME (type, i),
79d43c61	196	stream, show - 1, level + 4, flags);
c906108c SS	197
	198	fprintf_filtered (stream, ";\n");
	199	}
	200
1777feb0	201	/* If there are both fields and methods, put a space between. */
c906108c SS	202	len = TYPE_NFN_FIELDS (type);
c906108c SS	203	if (len)
c5aa993b	204	fprintf_filtered (stream, "\n");
c906108c	205
1777feb0	206	/* Print out the methods. */
c906108c SS	207
	208	for (i = 0; i < len; i++)
	209	{
	210	struct fn_field *f;
	211	int j;
0d5cff50 DE	212	const char *method_name;
0d5cff50 DE	213	const char *name;
c906108c SS	214	int is_constructor;
	215	int n_overloads;
	216
	217	f = TYPE_FN_FIELDLIST1 (type, i);
	218	n_overloads = TYPE_FN_FIELDLIST_LENGTH (type, i);
	219	method_name = TYPE_FN_FIELDLIST_NAME (type, i);
	220	name = type_name_no_tag (type);
762f08a3	221	is_constructor = name && strcmp (method_name, name) == 0;
c906108c SS	222
	223	for (j = 0; j < n_overloads; j++)
	224	{
1d06ead6	225	const char *real_physname;
e6a959d6 PA	226	const char *p;
e6a959d6 PA	227	char *physname;
c906108c SS	228	int is_full_physname_constructor;
c906108c SS	229
86ffb506 KS	230	real_physname = TYPE_FN_FIELD_PHYSNAME (f, j);
	231
	232	/* The physname will contain the return type
	233	after the final closing parenthesis. Strip it off. */
	234	p = strrchr (real_physname, ')');
	235	gdb_assert (p != NULL);
	236	++p; /* Keep the trailing ')'. */
224c3ddb	237	physname = (char *) alloca (p - real_physname + 1);
86ffb506 KS	238	memcpy (physname, real_physname, p - real_physname);
86ffb506 KS	239	physname[p - real_physname] = '\0';
c906108c	240
015a42b4	241	is_full_physname_constructor
7d27a96d TT	242	= (TYPE_FN_FIELD_CONSTRUCTOR (f, j)
7d27a96d TT	243	\|\| is_constructor_name (physname)
015a42b4	244	\|\| is_destructor_name (physname));
c906108c SS	245
	246	QUIT;
	247
	248	print_spaces_filtered (level + 4, stream);
	249
	250	if (TYPE_FN_FIELD_PROTECTED (f, j))
	251	fprintf_filtered (stream, "protected ");
	252	else if (TYPE_FN_FIELD_PRIVATE (f, j))
	253	fprintf_filtered (stream, "private ");
	254	else if (TYPE_FN_FIELD_PUBLIC (f, j))
	255	fprintf_filtered (stream, "public ");
	256
	257	if (TYPE_FN_FIELD_ABSTRACT (f, j))
	258	fprintf_filtered (stream, "abstract ");
	259	if (TYPE_FN_FIELD_STATIC (f, j))
	260	fprintf_filtered (stream, "static ");
	261	if (TYPE_FN_FIELD_FINAL (f, j))
	262	fprintf_filtered (stream, "final ");
	263	if (TYPE_FN_FIELD_SYNCHRONIZED (f, j))
	264	fprintf_filtered (stream, "synchronized ");
	265	if (TYPE_FN_FIELD_NATIVE (f, j))
	266	fprintf_filtered (stream, "native ");
	267
	268	if (TYPE_TARGET_TYPE (TYPE_FN_FIELD_TYPE (f, j)) == 0)
	269	{
	270	/* Keep GDB from crashing here. */
	271	fprintf_filtered (stream, "<undefined type> %s;\n",
c5aa993b	272	TYPE_FN_FIELD_PHYSNAME (f, j));
c906108c SS	273	break;
	274	}
	275	else if (!is_constructor && !is_full_physname_constructor)
	276	{
	277	type_print (TYPE_TARGET_TYPE (TYPE_FN_FIELD_TYPE (f, j)),
	278	"", stream, -1);
	279	fputs_filtered (" ", stream);
	280	}
	281
	282	if (TYPE_FN_FIELD_STUB (f, j))
	283	/* Build something we can demangle. */
	284	mangled_name = gdb_mangle_name (type, i, j);
	285	else
86ffb506	286	mangled_name = physname;
c906108c SS	287
c906108c SS	288	demangled_name =
8de20a37 TT	289	gdb_demangle (mangled_name,
8de20a37 TT	290	DMGL_ANSI \| DMGL_PARAMS \| DMGL_JAVA);
c906108c SS	291
c906108c SS	292	if (demangled_name == NULL)
c2d11a7d	293	demangled_name = xstrdup (mangled_name);
c906108c SS	294
	295	{
	296	char *demangled_no_class;
	297	char *ptr;
	298
	299	ptr = demangled_no_class = demangled_name;
	300
	301	while (1)
	302	{
	303	char c;
	304
	305	c = *ptr++;
	306
	307	if (c == 0 \|\| c == '(')
	308	break;
	309	if (c == '.')
	310	demangled_no_class = ptr;
	311	}
	312
	313	fputs_filtered (demangled_no_class, stream);
b8c9b27d	314	xfree (demangled_name);
c906108c SS	315	}
	316
	317	if (TYPE_FN_FIELD_STUB (f, j))
b8c9b27d	318	xfree (mangled_name);
c906108c SS	319
	320	fprintf_filtered (stream, ";\n");
	321	}
	322	}
	323
	324	fprintfi_filtered (level, stream, "}");
	325	}
	326	break;
	327
c5aa993b	328	default:
79d43c61	329	c_type_print_base (type, stream, show, level, flags);
c906108c SS	330	}
	331	}
	332
	333	/* LEVEL is the depth to indent lines by. */
	334
	335	void
25b524e8	336	java_print_type (struct type type, const char varstring,
79d43c61 TT	337	struct ui_file *stream, int show, int level,
79d43c61 TT	338	const struct type_print_options *flags)
c906108c SS	339	{
	340	int demangled_args;
	341
79d43c61	342	java_type_print_base (type, stream, show, level, flags);
c906108c SS	343
	344	if (varstring != NULL && *varstring != '\0')
	345	{
	346	fputs_filtered (" ", stream);
	347	fputs_filtered (varstring, stream);
	348	}
	349
	350	/* For demangled function names, we have the arglist as part of the name,
1777feb0	351	so don't print an additional pair of ()'s. */
c906108c	352
dc5000e7	353	demangled_args = varstring != NULL && strchr (varstring, '(') != NULL;
79d43c61	354	c_type_print_varspec_suffix (type, stream, show, 0, demangled_args, flags);
c906108c	355	}