projects
/
deliverable
/
binutils-gdb.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Make the assembler generate an error if there is an attempt to define a section with...
[deliverable/binutils-gdb.git]
/
gdb
/
p-typeprint.c
diff --git
a/gdb/p-typeprint.c
b/gdb/p-typeprint.c
index 349bbd6aa4f84bc882a657a62f18ddfb66c01983..3b8d3be22a3aaf8038c1f5bf5d4c469daa1dc435 100644
(file)
--- a/
gdb/p-typeprint.c
+++ b/
gdb/p-typeprint.c
@@
-1,5
+1,5
@@
/* Support for printing Pascal types for GDB, the GNU debugger.
/* Support for printing Pascal types for GDB, the GNU debugger.
- Copyright (C) 2000-20
18
Free Software Foundation, Inc.
+ Copyright (C) 2000-20
20
Free Software Foundation, Inc.
This file is part of GDB.
This file is part of GDB.
@@
-32,6
+32,7
@@
#include "typeprint.h"
#include "gdb-demangle.h"
#include <ctype.h>
#include "typeprint.h"
#include "gdb-demangle.h"
#include <ctype.h>
+#include "cli/cli-style.h"
static void pascal_type_print_varspec_suffix (struct type *, struct ui_file *,
int, int, int,
static void pascal_type_print_varspec_suffix (struct type *, struct ui_file *,
int, int, int,
@@
-98,9
+99,9
@@
pascal_print_typedef (struct type *type, struct symbol *new_symbol,
{
type = check_typedef (type);
fprintf_filtered (stream, "type ");
{
type = check_typedef (type);
fprintf_filtered (stream, "type ");
- fprintf_filtered (stream, "%s = ",
SYMBOL_PRINT_NAME (new_symbol
));
+ fprintf_filtered (stream, "%s = ",
new_symbol->print_name (
));
type_print (type, "", stream, 0);
type_print (type, "", stream, 0);
- fprintf_filtered (stream, ";
\n
");
+ fprintf_filtered (stream, ";");
}
/* If TYPE is a derived type, then print out derivation information.
}
/* If TYPE is a derived type, then print out derivation information.
@@
-470,7
+471,7
@@
pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
wrap_here (" ");
if (type == NULL)
{
wrap_here (" ");
if (type == NULL)
{
- fputs_
filtered ("<type unknown>"
, stream);
+ fputs_
styled ("<type unknown>", metadata_style.style ()
, stream);
return;
}
return;
}
@@
-827,8
+828,9
@@
pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
{
/* At least for dump_symtab, it is important that this not be
an error (). */
{
/* At least for dump_symtab, it is important that this not be
an error (). */
- fprintf_filtered (stream, "<invalid unnamed pascal type code %d>",
- TYPE_CODE (type));
+ fprintf_styled (stream, metadata_style.style (),
+ "<invalid unnamed pascal type code %d>",
+ TYPE_CODE (type));
}
break;
}
}
break;
}
This page took
0.024117 seconds
and
4
git commands to generate.