diff options
author | Jason Molenda <jmolenda@apple.com> | 1999-07-19 23:30:11 +0000 |
---|---|---|
committer | Jason Molenda <jmolenda@apple.com> | 1999-07-19 23:30:11 +0000 |
commit | adf40b2e16832f7382ee79e498d43a70ad22e305 (patch) | |
tree | 933de2a465a4003b9016471a466079459693ae3e /gdb/gdbtypes.c | |
parent | dc9e099fc0eced486ae2b49455c9da113c11f4ff (diff) | |
download | fsf-binutils-gdb-adf40b2e16832f7382ee79e498d43a70ad22e305.zip fsf-binutils-gdb-adf40b2e16832f7382ee79e498d43a70ad22e305.tar.gz fsf-binutils-gdb-adf40b2e16832f7382ee79e498d43a70ad22e305.tar.bz2 |
import gdb-1999-07-19 snapshot
Diffstat (limited to 'gdb/gdbtypes.c')
-rw-r--r-- | gdb/gdbtypes.c | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/gdb/gdbtypes.c b/gdb/gdbtypes.c index 6e013af..dba4f34 100644 --- a/gdb/gdbtypes.c +++ b/gdb/gdbtypes.c @@ -1616,6 +1616,20 @@ can_dereference (t) && TYPE_CODE (TYPE_TARGET_TYPE (t)) != TYPE_CODE_VOID); } +int +is_integral_type (t) + struct type *t; +{ + CHECK_TYPEDEF (t); + return + ((t != NULL) + && ((TYPE_CODE(t) == TYPE_CODE_INT) + || (TYPE_CODE(t) == TYPE_CODE_ENUM) + || (TYPE_CODE(t) == TYPE_CODE_CHAR) + || (TYPE_CODE(t) == TYPE_CODE_RANGE) + || (TYPE_CODE(t) == TYPE_CODE_BOOL))); +} + /* Chill varying string and arrays are represented as follows: struct { int __var_length; ELEMENT_TYPE[MAX_SIZE] __var_data}; |