/* Language independent support for printing types for GDB, the GNU debugger.
Copyright (C) 1986, 1988, 1989, 1991, 1992, 1993, 1994, 1995, 1998, 1999,
- 2000, 2001, 2003, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+ 2000, 2001, 2003, 2006, 2007, 2008, 2009, 2010, 2011
+ Free Software Foundation, Inc.
This file is part of GDB.
/* Print a description of a type in the format of a
typedef for the current language.
- NEW is the new name for a type TYPE. */
+ NEW is the new name for a type TYPE. */
void
typedef_print (struct type *type, struct symbol *new, struct ui_file *stream)
type_to_string (struct type *type)
{
char *s = NULL;
- long dummy;
struct ui_file *stb;
struct cleanup *old_chain;
volatile struct gdb_exception except;
TRY_CATCH (except, RETURN_MASK_ALL)
{
type_print (type, "", stb, -1);
- s = ui_file_xstrdup (stb, &dummy);
+ s = ui_file_xstrdup (stb, NULL);
}
if (except.reason < 0)
s = NULL;
old_chain = make_cleanup (free_current_contents, &expr);
if (expr->elts[0].opcode == OP_TYPE)
{
- /* The user expression names a type directly, just use that type. */
+ /* The user expression names a type directly, just use that type. */
type = expr->elts[1].type;
}
else
{
/* The user expression may name a type indirectly by naming an
- object of that type. Find that indirectly named type. */
+ object of that type. Find that indirectly named type. */
val = evaluate_type (expr);
type = value_type (val);
}