diff options
| author | Gaius Mulley <gaius@glam.ac.uk> | 2006-05-13 15:46:38 +0000 |
|---|---|---|
| committer | Gaius Mulley <gaius@glam.ac.uk> | 2006-05-13 15:46:38 +0000 |
| commit | 72019c9cbc1405cb0ecfab5d57a66279a45c19c5 (patch) | |
| tree | 3a0de2f116ae273c53484e3d28af93cd339e2b95 /gdb/m2-lang.h | |
| parent | 34addd0f72d6ef37bf70f8772509495cd2d733a8 (diff) | |
2006-05-13 Gaius Mulley <gaius@glam.ac.uk>
* gdb/m2-lang.h: added function extern prototypes for m2_is_long_set
and get_long_set_bounds.
* gm2/m2-typeprint.c: This file has been completely
replaced to reflect the Modula-2 syntax rather than call the
c_print_type function.
(m2_print_type): walk the Modula-2 type tree.
(m2_type_name): added.
(m2_range): added.
(m2_typedef): added.
(m2_array): added.
(m2_pointer): added.
(m2_ref): added.
(m2_unknown): added.
(m2_union): added.
(m2_procedure): added.
(m2_print_bounds): added.
(m2_short_set): added.
(m2_is_long_set): added.
(m2_get_discrete_bounds): added.
(m2_is_long_set_of_type): added.
(m2_long_set): added.
(m2_record_fields): added.
(m2_enum): added.
* gdb/dwarf2read.c: added ability to detect the language Modula-2
and handle SET and CHAR types.
(read_set_type): added.
(process_die): call read_set_type.
(read_base_type): modifed signed/unsigned char handling for Modula-2.
(set_cu_language): added Modula-2 case clause.
* gdb/m2-valprint.c: complete replacement so that Modula-2 values are
printed rather than call the C language routines.
(print_function_pointer_address): added.
(get_long_set_bounds): added.
(m2_print_long_set): added.
(print_unpacked_pointer): added.
(print_variable_at_address): added.
(m2_val_print): replaced.
Diffstat (limited to 'gdb/m2-lang.h')
| -rw-r--r-- | gdb/m2-lang.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gdb/m2-lang.h b/gdb/m2-lang.h index a57cef066a..294707a434 100644 --- a/gdb/m2-lang.h +++ b/gdb/m2-lang.h @@ -27,6 +27,11 @@ extern void m2_error (char *); /* Defined in m2-exp.y */ extern void m2_print_type (struct type *, char *, struct ui_file *, int, int); +extern int m2_is_long_set (struct type *type); + extern int m2_val_print (struct type *, const gdb_byte *, int, CORE_ADDR, struct ui_file *, int, int, int, enum val_prettyprint); + +extern int get_long_set_bounds (struct type *type, LONGEST *low, + LONGEST *high); |