4cca3ac9ed
builtin_type_CORE_ADDR, builtin_type_char, builtin_type_short, builtin_type_int, builtin_type_long, builtin_type_signed_char, builtin_type_unsigned_char, builtin_type_unsigned_short, builtin_type_unsigned_int, builtin_type_unsigned_long, builtin_type_float, builtin_type_double, builtin_type_long_double, builtin_type_complex, builtin_type_double_complex, builtin_type_string, builtin_type_bool, builtin_type_long_long, builtin_type_unsigned_long_long): Remove macros. (builtin_type_f_character, builtin_type_f_integer, builtin_type_f_integer_s2, builtin_type_f_logical, builtin_type_f_logical_s1, builtin_type_f_logical_s2, builtin_type_f_real, builtin_type_f_real_s8, builtin_type_f_real_s16, builtin_type_f_complex_s8, builtin_type_f_complex_s16, builtin_type_f_complex_s32): Likewise. (builtin_type_m2_char, builtin_type_m2_int, builtin_type_m2_card, builtin_type_m2_real, builtin_type_m2_bool): Likewise. (struct builtin_f_type, builtin_f_type): Move to f-lang.h. (struct builtin_m2_type, builtin_m2_type): Move to m2-lang.h. * f-lang.h (struct builtin_f_type, builtin_f_type): Move here. * m2-lang.h (struct builtin_m2_type, builtin_m2_type): Move here.
52 lines
1.7 KiB
C
52 lines
1.7 KiB
C
/* Modula 2 language support definitions for GDB, the GNU debugger.
|
|
|
|
Copyright (C) 1992, 1998, 2000, 2005, 2007, 2008
|
|
Free Software Foundation, Inc.
|
|
|
|
This file is part of GDB.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
|
extern int m2_parse (void); /* Defined in m2-exp.y */
|
|
|
|
extern void m2_error (char *); /* Defined in m2-exp.y */
|
|
|
|
/* Defined in m2-typeprint.c */
|
|
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_is_unbounded_array (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);
|
|
|
|
/* Modula-2 types */
|
|
|
|
struct builtin_m2_type
|
|
{
|
|
struct type *builtin_char;
|
|
struct type *builtin_int;
|
|
struct type *builtin_card;
|
|
struct type *builtin_real;
|
|
struct type *builtin_bool;
|
|
};
|
|
|
|
/* Return the Modula-2 type table for the specified architecture. */
|
|
extern const struct builtin_m2_type *builtin_m2_type (struct gdbarch *gdbarch);
|
|
|