[PATCH] Support TYPE_CODE_(BIT)STRING in pascal_type_print_base
Michael Snyder
msnyder@redhat.com
Thu May 2 11:06:00 GMT 2002
Pierre Muller wrote:
>
> This patch is here mainly to avoid getting error
> reports for GPC string types.
This seems completely reasonable. Approved.
>
> 2002-05-02 Pierre Muller <muller@ics.u-strasbg.fr>
>
> * p-typeprint.c (pascal_type_print_base): Add support
> for TYPE_CODE_STRING and TYPE_CODE_BITSTRING.
>
> Index: p-typeprint.c
> ===================================================================
> RCS file: /cvs/src/src/gdb/p-typeprint.c,v
> retrieving revision 1.8
> diff -u -p -r1.8 p-typeprint.c
> --- p-typeprint.c 20 Jan 2002 19:42:04 -0000 1.8
> +++ p-typeprint.c 2 May 2002 11:28:23 -0000
> @@ -788,6 +788,14 @@ pascal_type_print_base (struct type *typ
> show - 1, level);
> break;
>
> + case TYPE_CODE_BITSTRING:
> + fputs_filtered ("BitString", stream);
> + break;
> +
> + case TYPE_CODE_STRING:
> + fputs_filtered ("String", stream);
> + break;
> +
> default:
> /* Handle types not explicitly handled by the other cases,
> such as fundamental types. For these, just print whatever
>
> Pierre Muller
> Institut Charles Sadron
> 6,rue Boussingault
> F 67083 STRASBOURG CEDEX (France)
> mailto:muller@ics.u-strasbg.fr
> Phone : (33)-3-88-41-40-07 Fax : (33)-3-88-41-40-99
More information about the Gdb-patches
mailing list