diff options
| author | Pierre Muller <muller@sourceware.org> | 2002-08-19 12:08:07 +0000 |
|---|---|---|
| committer | Pierre Muller <muller@sourceware.org> | 2002-08-19 12:08:07 +0000 |
| commit | ed8f822aaf4a6d0614ce35522f646a784c479881 (patch) | |
| tree | 9d2247a28c8c6f818932b6e37cc68ecf0236fb3c /gdb/p-valprint.c | |
| parent | 9b949a49f872aab8f4242b54234dd3646a289b7b (diff) | |
| download | ppe42-binutils-ed8f822aaf4a6d0614ce35522f646a784c479881.tar.gz ppe42-binutils-ed8f822aaf4a6d0614ce35522f646a784c479881.zip | |
2002-08-19 Pierre Muller <muller@ics.u-strasbg.fr>
* p-valprint.c (pascal_val_print): Add support for TYPE_CODE_FLAGS.
Diffstat (limited to 'gdb/p-valprint.c')
| -rw-r--r-- | gdb/p-valprint.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c index 06a821605f..747223cb6c 100644 --- a/gdb/p-valprint.c +++ b/gdb/p-valprint.c @@ -36,6 +36,7 @@ #include "target.h" #include "annotate.h" #include "p-lang.h" +#include "c-lang.h" #include "cp-abi.h" @@ -72,6 +73,10 @@ pascal_val_print (struct type *type, char *valaddr, int embedded_offset, CHECK_TYPEDEF (type); switch (TYPE_CODE (type)) { + case TYPE_CODE_FLAGS: + return c_val_print (type, valaddr, embedded_offset, address, stream, + format, deref_ref, recurse, pretty); + case TYPE_CODE_ARRAY: if (TYPE_LENGTH (type) > 0 && TYPE_LENGTH (TYPE_TARGET_TYPE (type)) > 0) { |
