67 if (msym.minsym == NULL)
71 if (msym.minsym != NULL)
77 if (msym.minsym != NULL)
99 int *length_size,
int *string_pos,
100 struct type **char_type,
101 const char **arrayname)
186 struct ui_file *stream,
int quoter);
219 const gdb_byte *
string,
unsigned int length,
220 const char *
encoding,
int force_ellipses,
225 unsigned int things_printed = 0;
237 if ((!force_ellipses) && length > 0
248 for (i = 0; i < length && things_printed < options->
print_max; ++i)
255 unsigned long int current_char;
272 byte_order) == current_char)
307 if (force_ellipses || i < length)
446 default_make_symbol_completion_list,
ULONGEST extract_unsigned_integer(const gdb_byte *, int, enum bfd_endian)
unsigned int repeat_count_threshold
struct type * builtin_long_double
#define TYPE_FIELD_NAME(thistype, n)
struct type * builtin_unsigned_int
struct type * builtin_double_complex
#define GDBARCH_OBSTACK_CALLOC(GDBARCH, NR, TYPE)
static const char GPC_MAIN_PROGRAM_NAME_1[]
const struct builtin_type * builtin_type(struct gdbarch *gdbarch)
void pascal_error(char *)
struct value * default_read_var_value(struct symbol *var, struct frame_info *frame)
static const char GPC_P_INITIALIZE[]
struct type * string_char_type
struct type * builtin_complex
int is_pascal_string_type(struct type *type, int *length_pos, int *length_size, int *string_pos, struct type **char_type, const char **arrayname)
const char * pascal_main_name(void)
#define TYPE_FIELD_TYPE(thistype, n)
void add_language(const struct language_defn *lang)
struct type * builtin_short
const struct op_print pascal_op_print_tab[]
char * default_word_break_characters(void)
int pascal_parse(struct parser_state *par_state)
struct type * check_typedef(struct type *type)
struct type * builtin_unsigned_long
struct type * bool_type_default
void null_post_parser(struct expression **exp, int void_context_p)
#define PRINT_LITERAL_FORM(c)
static void pascal_one_char(int, struct ui_file *, int *)
void fprintf_filtered(struct ui_file *stream, const char *format,...)
void fputs_filtered(const char *linebuffer, struct ui_file *stream)
const char * bool_type_symbol
int default_pass_by_reference(struct type *type)
enum bfd_endian gdbarch_byte_order(struct gdbarch *gdbarch)
struct type * basic_lookup_transparent_type(const char *name)
static void pascal_language_arch_info(struct gdbarch *gdbarch, struct language_arch_info *lai)
struct gdbarch * get_type_arch(const struct type *type)
void iterate_over_symbols(const struct block *block, const char *name, const domain_enum domain, symbol_found_callback_ftype *callback, void *data)
struct type * builtin_long
void pascal_value_print(struct value *, struct ui_file *, const struct value_print_options *)
void pascal_printstr(struct ui_file *stream, struct type *type, const gdb_byte *string, unsigned int length, const char *encoding, int force_ellipses, const struct value_print_options *options)
void default_print_array_index(struct value *index_value, struct ui_file *stream, const struct value_print_options *options)
struct type * builtin_unsigned_char
struct type * builtin_bool
struct type * builtin_unsigned_long_long
struct type * builtin_signed_char
#define TYPE_FIELD_BITPOS(thistype, n)
void pascal_val_print(struct type *, const gdb_byte *, int, CORE_ADDR, struct ui_file *, int, const struct value *, const struct value_print_options *)
struct type * builtin_unsigned_short
void pascal_printchar(int c, struct type *type, struct ui_file *stream)
struct type * builtin_char
void _initialize_pascal_language(void)
#define TYPE_TARGET_TYPE(thistype)
struct type * builtin_double
void default_get_string(struct value *value, gdb_byte **buffer, int *length, struct type **char_type, const char **charset)
#define TYPE_CODE(thistype)
#define default_varobj_ops
void pascal_print_type(struct type *, const char *, struct ui_file *, int, int, const struct type_print_options *)
const struct exp_descriptor exp_descriptor_standard
#define TYPE_NFIELDS(thistype)
struct type * builtin_long_long
void pascal_print_typedef(struct type *, struct symbol *, struct ui_file *)
static const char GPC_MAIN_PROGRAM_NAME_2[]
struct symbol * basic_lookup_symbol_nonlocal(const struct language_defn *langdef, const char *name, const struct block *block, const domain_enum domain)
#define TYPE_LENGTH(thistype)
struct type ** primitive_type_vector
struct bound_minimal_symbol lookup_minimal_symbol(const char *name, const char *sfile, struct objfile *objf)
struct type * builtin_void
static void pascal_emit_char(int c, struct type *type, struct ui_file *stream, int quoter)
struct type * builtin_float
struct type * builtin_int