mirror of
https://github.com/bminor/binutils-gdb.git
synced 2025-12-27 17:40:49 +00:00
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.
This commit is contained in:
@@ -788,6 +788,14 @@ pascal_type_print_base (struct type *type, struct ui_file *stream, int show,
|
||||
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
|
||||
|
||||
Reference in New Issue
Block a user