diff options
Diffstat (limited to 'gdb/p-lang.c')
| -rw-r--r-- | gdb/p-lang.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/p-lang.c b/gdb/p-lang.c index c768d1b..0db99a4 100644 --- a/gdb/p-lang.c +++ b/gdb/p-lang.c @@ -101,7 +101,7 @@ is_pascal_string_type (struct type *type,int *length_pos, struct type **char_type, char **arrayname) { - if (TYPE_CODE (type) == TYPE_CODE_STRUCT) + if ((type != NULL) && (TYPE_CODE (type) == TYPE_CODE_STRUCT)) { /* Old Borland type pascal strings from Free Pascal Compiler. */ /* Two fields: length and st. */ |