FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

2010-05-15 Michael Snyder <msnyder@vmware.com>

Browse source 
* parse.c: White space.
	* p-lang.c: White space.
	* posix-hdep.c: White space.
	* printcmd.c: White space.
	* progspace.c: White space.
	* prologue-value.c: White space.
	* psymtab.c: White space.
	* p-typeprint.c: White space.
	* p-valprint.c: White space.
This commit is contained in:
Michael Snyder 2010-05-16 01:27:02 +00:00
parent 5cc80db34d
commit ad3bbd48b6
10 changed files with 85 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

4
gdb/p-typeprint.c
View file

@ -301,6 +301,7 @@ static void
pascal_print_func_args (struct type *type, struct ui_file *stream)
{
int i, len = TYPE_NFIELDS (type);
if (len)
{
fprintf_filtered (stream, "(");
@ -439,8 +440,8 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
s_none, s_public, s_private, s_protected
}
section_type;
QUIT;
QUIT;
wrap_here (" ");
if (type == NULL)
{
@ -764,6 +765,7 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
case TYPE_CODE_RANGE:
{
struct type *target = TYPE_TARGET_TYPE (type);
print_type_scalar (target, TYPE_LOW_BOUND (type), stream);
fputs_filtered ("..", stream);
print_type_scalar (target, TYPE_HIGH_BOUND (type), stream);