GDB (xrefs)
Classes | Defines | Typedefs | Enumerations | Functions | Variables
/home/stan/gdb/src/gdb/ada-lang.c File Reference
#include "defs.h"
#include <stdio.h>
#include "gdb_string.h"
#include <ctype.h>
#include <stdarg.h>
#include "demangle.h"
#include "gdb_regex.h"
#include "frame.h"
#include "symtab.h"
#include "gdbtypes.h"
#include "gdbcmd.h"
#include "expression.h"
#include "parser-defs.h"
#include "language.h"
#include "c-lang.h"
#include "inferior.h"
#include "symfile.h"
#include "objfiles.h"
#include "breakpoint.h"
#include "gdbcore.h"
#include "hashtab.h"
#include "gdb_obstack.h"
#include "ada-lang.h"
#include "completer.h"
#include "gdb_stat.h"
#include "block.h"
#include "infcall.h"
#include "dictionary.h"
#include "exceptions.h"
#include "annotate.h"
#include "valprint.h"
#include "source.h"
#include "observer.h"
#include "vec.h"
#include "stack.h"
#include "gdb_vecs.h"
#include "typeprint.h"
#include "psymtab.h"
#include "value.h"
#include "mi/mi-common.h"
#include "arch-utils.h"
#include "cli/cli-utils.h"

Go to the source code of this file.

Classes

struct  ada_inferior_data
struct  match_data
struct  add_partial_datum
struct  exception_support_info
struct  ada_catchpoint_location
struct  ada_catchpoint

Defines

#define TRUNCATION_TOWARDS_ZERO   ((-5 / 2) == -2)
#define MAX_ADA_DIMENS   (sizeof(bound_name) / (2*sizeof(char *)))
#define ADA_OPERATORS
#define OP_DEFN(op, len, args, binop)   case op: *oplenp = len; *argsp = args; break;
#define OP_DEFN(op, len, args, binop)   case op: return #op;
#define OP_DEFN(op, len, args, binop)   case op: *oplenp = len; *argsp = args; break;

Typedefs

typedef CORE_ADDRada_unhandled_exception_name_addr_ftype )(void)

Enumerations

enum  ada_primitive_types {
  ada_primitive_type_int, ada_primitive_type_long, ada_primitive_type_short, ada_primitive_type_char,
  ada_primitive_type_float, ada_primitive_type_double, ada_primitive_type_void, ada_primitive_type_long_long,
  ada_primitive_type_long_double, ada_primitive_type_natural, ada_primitive_type_positive, ada_primitive_type_system_address,
  nr_ada_primitive_types
}

Functions

static struct typedesc_base_type (struct type *)
static struct typedesc_bounds_type (struct type *)
static struct valuedesc_bounds (struct value *)
static int fat_pntr_bounds_bitpos (struct type *)
static int fat_pntr_bounds_bitsize (struct type *)
static struct typedesc_data_target_type (struct type *)
static struct valuedesc_data (struct value *)
static int fat_pntr_data_bitpos (struct type *)
static int fat_pntr_data_bitsize (struct type *)
static struct valuedesc_one_bound (struct value *, int, int)
static int desc_bound_bitpos (struct type *, int, int)
static int desc_bound_bitsize (struct type *, int, int)
static struct typedesc_index_type (struct type *, int)
static int desc_arity (struct type *)
static int ada_type_match (struct type *, struct type *, int)
static int ada_args_match (struct symbol *, struct value **, int)
static int full_match (const char *, const char *)
static struct valuemake_array_descriptor (struct type *, struct value *)
static void ada_add_block_symbols (struct obstack *, struct block *, const char *, domain_enum, struct objfile *, int)
static int is_nonfunction (struct ada_symbol_info *, int)
static void add_defn_to_vec (struct obstack *, struct symbol *, struct block *)
static int num_defns_collected (struct obstack *)
static struct ada_symbol_infodefns_collected (struct obstack *, int)
static struct valueresolve_subexp (struct expression **, int *, int, struct type *)
static void replace_operator_with_call (struct expression **, int, int, int, struct symbol *, const struct block *)
static int possible_user_operator_p (enum exp_opcode, struct value **)
static char * ada_op_name (enum exp_opcode)
static const char * ada_decoded_op_name (enum exp_opcode)
static int numeric_type_p (struct type *)
static int integer_type_p (struct type *)
static int scalar_type_p (struct type *)
static int discrete_type_p (struct type *)
static enum ada_renaming_category parse_old_style_renaming (struct type *, const char **, int *, const char **)
static struct symbolfind_old_style_renaming_symbol (const char *, const struct block *)
static struct typeada_lookup_struct_elt_type (struct type *, char *, int, int, int *)
static struct valueevaluate_subexp_type (struct expression *, int *)
static struct typeada_find_parallel_type_with_name (struct type *, const char *)
static int is_dynamic_field (struct type *, int)
static struct typeto_fixed_variant_branch_type (struct type *, const gdb_byte *, CORE_ADDR, struct value *)
static struct typeto_fixed_array_type (struct type *, struct value *, int)
static struct typeto_fixed_range_type (struct type *, struct value *)
static struct typeto_static_fixed_type (struct type *)
static struct typestatic_unwrap_type (struct type *type)
static struct valueunwrap_value (struct value *)
static struct typeconstrained_packed_array_type (struct type *, long *)
static struct typedecode_constrained_packed_array_type (struct type *)
static long decode_packed_array_bitsize (struct type *)
static struct valuedecode_constrained_packed_array (struct value *)
static int ada_is_packed_array_type (struct type *)
static int ada_is_unconstrained_packed_array_type (struct type *)
static struct valuevalue_subscript_packed (struct value *, int, struct value **)
static void move_bits (gdb_byte *, int, const gdb_byte *, int, int, int)
static struct valuecoerce_unspec_val_to_type (struct value *, struct type *)
static struct valueget_var_value (char *, char *)
static int lesseq_defined_than (struct symbol *, struct symbol *)
static int equiv_types (struct type *, struct type *)
static int is_name_suffix (const char *)
static int advance_wild_match (const char **, const char *, int)
static int wild_match (const char *, const char *)
static struct valueada_coerce_ref (struct value *)
static LONGEST pos_atr (struct value *)
static struct valuevalue_pos_atr (struct type *, struct value *)
static struct valuevalue_val_atr (struct type *, struct value *)
static struct symbolstandard_lookup (const char *, const struct block *, domain_enum)
static struct valueada_search_struct_field (char *, struct value *, int, struct type *)
static struct valueada_value_primitive_field (struct value *, int, int, struct type *)
static int find_struct_field (const char *, struct type *, int, struct type **, int *, int *, int *, int *)
static struct valueada_to_fixed_value_create (struct type *, CORE_ADDR, struct value *)
static int ada_resolve_function (struct ada_symbol_info *, int, struct value **, int, const char *, struct type *)
static int ada_is_direct_array_type (struct type *)
static void ada_language_arch_info (struct gdbarch *, struct language_arch_info *)
static void check_size (const struct type *)
static struct valueada_index_struct_field (int, struct value *, int, struct type *)
static struct valueassign_aggregate (struct value *, struct value *, struct expression *, int *, enum noside)
static void aggregate_assign_from_choices (struct value *, struct value *, struct expression *, int *, LONGEST *, int *, int, LONGEST, LONGEST)
static void aggregate_assign_positional (struct value *, struct value *, struct expression *, int *, LONGEST *, int *, int, LONGEST, LONGEST)
static void aggregate_assign_others (struct value *, struct value *, struct expression *, int *, LONGEST *, int, LONGEST, LONGEST)
static void add_component_interval (LONGEST, LONGEST, LONGEST *, int *, int)
static struct valueada_evaluate_subexp (struct type *, struct expression *, int *, enum noside)
static void ada_forward_operator_length (struct expression *, int, int *, int *)
static struct typeada_find_any_type (const char *name)
static void ada_inferior_data_cleanup (struct inferior *inf, void *arg)
static struct ada_inferior_dataget_ada_inferior_data (struct inferior *inf)
static void ada_inferior_exit (struct inferior *inf)
static struct typeada_typedef_target_type (struct type *type)
static const char * ada_unqualified_name (const char *decoded_name)
static char * add_angle_brackets (const char *str)
static char * ada_get_gdb_completer_word_break_characters (void)
static void ada_print_array_index (struct value *index_value, struct ui_file *stream, const struct value_print_options *options)
void * grow_vect (void *vect, size_t *size, size_t min_size, int element_size)
static int field_name_match (const char *field_name, const char *target)
int ada_get_field_index (const struct type *type, const char *field_name, int maybe_missing)
int ada_name_prefix_len (const char *name)
static int is_suffix (const char *str, const char *suffix)
static const gdb_bytecond_offset_host (const gdb_byte *valaddr, long offset)
static CORE_ADDR cond_offset_target (CORE_ADDR address, long offset)
static void lim_warning (const char *format,...) ATTRIBUTE_PRINTF(1
static LONGEST max_of_size (int size)
static LONGEST min_of_size (int size)
static ULONGEST umax_of_size (int size)
static LONGEST max_of_type (struct type *t)
static LONGEST min_of_type (struct type *t)
LONGEST ada_discrete_type_high_bound (struct type *type)
LONGEST ada_discrete_type_low_bound (struct type *type)
static struct typeget_base_type (struct type *type)
struct valueada_get_decoded_value (struct value *value)
struct typeada_get_decoded_type (struct type *type)
enum language ada_update_initial_language (enum language lang)
char * ada_main_name (void)
char * ada_encode (const char *decoded)
char * ada_fold_name (const char *name)
static int is_lower_alphanum (const char c)
static void ada_remove_trailing_digits (const char *encoded, int *len)
static void ada_remove_po_subprogram_suffix (const char *encoded, int *len)
static void ada_remove_Xbn_suffix (const char *encoded, int *len)
const char * ada_decode (const char *encoded)
const char * ada_decode_symbol (const struct general_symbol_info *arg)
static char * ada_la_decode (const char *encoded, int options)
static int match_name (const char *sym_name, const char *name, int wild)
void ada_fixup_array_indexes_type (struct type *index_desc_type)
static int is_thin_pntr (struct type *type)
static struct typethin_descriptor_type (struct type *type)
static struct valuethin_data_pntr (struct value *val)
static int is_thick_pntr (struct type *type)
static int ada_is_array_type (struct type *type)
int ada_is_simple_array_type (struct type *type)
int ada_is_array_descriptor_type (struct type *type)
int ada_is_bogus_array_descriptor (struct type *type)
struct typeada_type_of_array (struct value *arr, int bounds)
struct valueada_coerce_to_simple_array_ptr (struct value *arr)
struct valueada_coerce_to_simple_array (struct value *arr)
struct typeada_coerce_to_simple_array_type (struct type *type)
int ada_is_constrained_packed_array_type (struct type *type)
static int has_negatives (struct type *type)
struct valueada_value_primitive_packed_val (struct value *obj, const gdb_byte *valaddr, long offset, int bit_offset, int bit_size, struct type *type)
static struct valueada_value_assign (struct value *toval, struct value *fromval)
static void value_assign_to_component (struct value *container, struct value *component, struct value *val)
struct valueada_value_subscript (struct value *arr, int arity, struct value **ind)
static struct valueada_value_ptr_subscript (struct value *arr, struct type *type, int arity, struct value **ind)
static struct valueada_value_slice_from_ptr (struct value *array_ptr, struct type *type, int low, int high)
static struct valueada_value_slice (struct value *array, int low, int high)
int ada_array_arity (struct type *type)
struct typeada_array_element_type (struct type *type, int nindices)
static struct typeada_index_type (struct type *type, int n, const char *name)
static LONGEST ada_array_bound_from_type (struct type *arr_type, int n, int which)
static LONGEST ada_array_bound (struct value *arr, int n, int which)
static LONGEST ada_array_length (struct value *arr, int n)
static struct valueempty_array (struct type *arr_type, int low)
static void resolve (struct expression **expp, int void_context_p)
static int return_match (struct type *func_type, struct type *context_type)
static int ada_resolve_function (struct ada_symbol_info syms[], int nsyms, struct value **args, int nargs, const char *name, struct type *context_type)
static int encoded_ordered_before (const char *N0, const char *N1)
static void sort_choices (struct ada_symbol_info syms[], int nsyms)
int user_select_syms (struct ada_symbol_info *syms, int nsyms, int max_results)
int get_selections (int *choices, int n_choices, int max_results, int is_all_choice, char *annotation_suffix)
static int possible_user_operator_p (enum exp_opcode op, struct value *args[])
enum ada_renaming_category ada_parse_renaming (struct symbol *sym, const char **renamed_entity, int *len, const char **renaming_expr)
static struct valueada_read_renaming_var_value (struct symbol *renaming_sym, struct block *block)
static struct valueensure_lval (struct value *val)
struct valueada_convert_actual (struct value *actual, struct type *formal_type0)
static CORE_ADDR value_pointer (struct value *value, struct type *type)
static int lookup_cached_symbol (const char *name, domain_enum namespace, struct symbol **sym, struct block **block)
static void cache_symbol (const char *name, domain_enum namespace, struct symbol *sym, const struct block *block)
static int should_use_wild_match (const char *lookup_name)
static int is_nonfunction (struct ada_symbol_info syms[], int n)
struct bound_minimal_symbol ada_lookup_simple_minsym (const char *name)
static void add_symbols_from_enclosing_procs (struct obstack *obstackp, const char *name, domain_enum namespace, int wild_match_p)
static int is_nondebugging_type (struct type *type)
static int ada_identical_enum_types_p (struct type *type1, struct type *type2)
static int symbols_are_identical_enums (struct ada_symbol_info *syms, int nsyms)
static int remove_extra_symbols (struct ada_symbol_info *syms, int nsyms)
static char * xget_renaming_scope (struct type *renaming_type)
static int is_package_name (const char *name)
static int old_renaming_is_invisible (const struct symbol *sym, const char *function_name)
static int remove_irrelevant_renamings (struct ada_symbol_info *syms, int nsyms, const struct block *current_block)
static void ada_add_local_symbols (struct obstack *obstackp, const char *name, struct block *block, domain_enum domain, int wild_match_p)
static int aux_add_nonlocal_symbols (struct block *block, struct symbol *sym, void *data0)
static int compare_names_with_case (const char *string1, const char *string2, enum case_sensitivity casing)
static int compare_names (const char *string1, const char *string2)
static void add_nonlocal_symbols (struct obstack *obstackp, const char *name, domain_enum domain, int global, int is_wild_match)
static int ada_lookup_symbol_list_worker (const char *name0, const struct block *block0, domain_enum namespace, struct ada_symbol_info **results, int full_search)
int ada_lookup_symbol_list (const char *name0, const struct block *block0, domain_enum domain, struct ada_symbol_info **results)
static void ada_iterate_over_symbols (const struct block *block, const char *name, domain_enum domain, symbol_found_callback_ftype *callback, void *data)
char * ada_name_for_lookup (const char *name)
void ada_lookup_encoded_symbol (const char *name, const struct block *block, domain_enum namespace, struct ada_symbol_info *info)
struct symbolada_lookup_symbol (const char *name, const struct block *block0, domain_enum namespace, int *is_a_field_of_this)
static struct symbolada_lookup_symbol_nonlocal (const char *name, const struct block *block, const domain_enum domain)
static int is_valid_name_for_wild_match (const char *name0)
static const char * symbol_completion_match (const char *sym_name, const char *text, int text_len, int wild_match_p, int encoded_p)
static void symbol_completion_add (VEC(char_ptr)**sv, const char *sym_name, const char *text, int text_len, const char *orig_text, const char *word, int wild_match_p, int encoded_p)
static int ada_expand_partial_symbol_name (const char *name, void *user_data)
static VEC (char_ptr)
static int ada_is_dispatch_table_ptr_type (struct type *type)
static int ada_is_interface_tag (struct type *type)
int ada_is_ignored_field (struct type *type, int field_num)
int ada_is_tagged_type (struct type *type, int refok)
int ada_is_tag_type (struct type *type)
struct typeada_tag_type (struct value *val)
static int is_ada95_tag (struct value *tag)
struct valueada_value_tag (struct value *val)
static struct valuevalue_tag_from_contents_and_address (struct type *type, const gdb_byte *valaddr, CORE_ADDR address)
static struct typetype_from_tag (struct value *tag)
struct valueada_tag_value_at_base_address (struct value *obj)
static struct typeada_get_tsd_type (struct inferior *inf)
static struct valueada_get_tsd_from_tag (struct value *tag)
static char * ada_tag_name_from_tsd (struct value *tsd)
const char * ada_tag_name (struct value *tag)
struct typeada_parent_type (struct type *type)
int ada_is_parent_field (struct type *type, int field_num)
int ada_is_wrapper_field (struct type *type, int field_num)
int ada_is_variant_part (struct type *type, int field_num)
struct typeada_variant_discrim_type (struct type *var_type, struct type *outer_type)
int ada_is_others_clause (struct type *type, int field_num)
char * ada_variant_discrim_name (struct type *type0)
int ada_scan_number (const char str[], int k, LONGEST *R, int *new_k)
int ada_in_variant (LONGEST val, struct type *type, int field_num)
static int num_visible_fields (struct type *type)
static struct valueada_index_struct_field_1 (int *, struct value *, int, struct type *)
struct valueada_value_struct_elt (struct value *arg, char *name, int no_err)
static int is_unchecked_variant (struct type *var_type, struct type *outer_type)
int ada_which_variant_applies (struct type *var_type, struct type *outer_type, const gdb_byte *outer_valaddr)
struct valueada_value_ind (struct value *val0)
static unsigned int align_value (unsigned int off, unsigned int alignment)
static unsigned int field_alignment (struct type *type, int f)
static struct symbolada_find_any_type_symbol (const char *name)
struct symbolada_find_renaming_symbol (struct symbol *name_sym, const struct block *block)
int ada_prefer_type (struct type *type0, struct type *type1)
const char * ada_type_name (struct type *type)
static struct typefind_parallel_type_by_descriptive_type (struct type *type, const char *name)
struct typeada_find_parallel_type (struct type *type, const char *suffix)
static struct typedynamic_template_type (struct type *type)
static int variant_field_index (struct type *type)
static struct typeempty_record (struct type *template)
struct typeada_template_to_fixed_record_type_1 (struct type *type, const gdb_byte *valaddr, CORE_ADDR address, struct value *dval0, int keep_dynamic_fields)
static struct typetemplate_to_fixed_record_type (struct type *type, const gdb_byte *valaddr, CORE_ADDR address, struct value *dval0)
static struct typetemplate_to_static_fixed_type (struct type *type0)
static struct typeto_record_with_fixed_variant_part (struct type *type, const gdb_byte *valaddr, CORE_ADDR address, struct value *dval0)
static struct typeto_fixed_record_type (struct type *type0, const gdb_byte *valaddr, CORE_ADDR address, struct value *dval)
static struct typeada_to_fixed_type_1 (struct type *type, const gdb_byte *valaddr, CORE_ADDR address, struct value *dval, int check_tag)
struct typeada_to_fixed_type (struct type *type, const gdb_byte *valaddr, CORE_ADDR address, struct value *dval, int check_tag)
struct typeada_check_typedef (struct type *type)
struct valueada_to_fixed_value (struct value *val)
const char * ada_attribute_name (enum exp_opcode n)
int ada_is_character_type (struct type *type)
int ada_is_string_type (struct type *type)
int ada_is_aligner_type (struct type *type)
struct typeada_get_base_type (struct type *raw_type)
struct typeada_aligned_type (struct type *type)
const gdb_byteada_aligned_value_addr (struct type *type, const gdb_byte *valaddr)
const char * ada_enum_name (const char *name)
static struct valuecast_to_fixed (struct type *type, struct value *arg)
static struct valuecast_from_fixed (struct type *type, struct value *arg)
static int ada_same_array_size_p (struct type *t1, struct type *t2)
static struct valueada_promote_array_of_integrals (struct type *type, struct value *val)
static struct valuecoerce_for_assign (struct type *type, struct value *val)
static struct valueada_value_binop (struct value *arg1, struct value *arg2, enum exp_opcode op)
static int ada_value_equal (struct value *arg1, struct value *arg2)
static int num_component_specs (struct expression *exp, int pc)
static void assign_component (struct value *container, struct value *lhs, LONGEST index, struct expression *exp, int *pos)
static struct valueada_value_cast (struct type *type, struct value *arg2, enum noside noside)
static const char * fixed_type_info (struct type *type)
int ada_is_fixed_point_type (struct type *type)
int ada_is_system_address_type (struct type *type)
DOUBLEST ada_delta (struct type *type)
static DOUBLEST scaling_factor (struct type *type)
DOUBLEST ada_fixed_to_float (struct type *type, LONGEST x)
LONGEST ada_float_to_fixed (struct type *type, DOUBLEST x)
static int scan_discrim_bound (char *str, int k, struct value *dval, LONGEST *px, int *pnew_k)
LONGEST get_int_var_value (char *name, int *flag)
int ada_is_range_type_name (const char *name)
int ada_is_modular_type (struct type *type)
ULONGEST ada_modulus (struct type *type)
static CORE_ADDR ada_unhandled_exception_name_addr (void)
static CORE_ADDR ada_unhandled_exception_name_addr_from_raise (void)
static int ada_has_this_exception_support (const struct exception_support_info *einfo)
static void ada_exception_support_info_sniffer (void)
static int is_known_support_routine (struct frame_info *frame)
void ada_find_printable_frame (struct frame_info *fi)
static CORE_ADDR ada_exception_name_addr_1 (enum ada_exception_catchpoint_kind ex, struct breakpoint *b)
static CORE_ADDR ada_exception_name_addr (enum ada_exception_catchpoint_kind ex, struct breakpoint *b)
static char * ada_exception_catchpoint_cond_string (const char *excep_string)
static void ada_catchpoint_location_dtor (struct bp_location *bl)
static void create_excep_cond_exprs (struct ada_catchpoint *c)
static void dtor_exception (enum ada_exception_catchpoint_kind ex, struct breakpoint *b)
static struct bp_locationallocate_location_exception (enum ada_exception_catchpoint_kind ex, struct breakpoint *self)
static void re_set_exception (enum ada_exception_catchpoint_kind ex, struct breakpoint *b)
static int should_stop_exception (const struct bp_location *bl)
static void check_status_exception (enum ada_exception_catchpoint_kind ex, bpstat bs)
static enum print_stop_action print_it_exception (enum ada_exception_catchpoint_kind ex, bpstat bs)
static void print_one_exception (enum ada_exception_catchpoint_kind ex, struct breakpoint *b, struct bp_location **last_loc)
static void print_mention_exception (enum ada_exception_catchpoint_kind ex, struct breakpoint *b)
static void print_recreate_exception (enum ada_exception_catchpoint_kind ex, struct breakpoint *b, struct ui_file *fp)
static void dtor_catch_exception (struct breakpoint *b)
static struct bp_locationallocate_location_catch_exception (struct breakpoint *self)
static void re_set_catch_exception (struct breakpoint *b)
static void check_status_catch_exception (bpstat bs)
static enum print_stop_action print_it_catch_exception (bpstat bs)
static void print_one_catch_exception (struct breakpoint *b, struct bp_location **last_loc)
static void print_mention_catch_exception (struct breakpoint *b)
static void print_recreate_catch_exception (struct breakpoint *b, struct ui_file *fp)
static void dtor_catch_exception_unhandled (struct breakpoint *b)
static struct bp_locationallocate_location_catch_exception_unhandled (struct breakpoint *self)
static void re_set_catch_exception_unhandled (struct breakpoint *b)
static void check_status_catch_exception_unhandled (bpstat bs)
static enum print_stop_action print_it_catch_exception_unhandled (bpstat bs)
static void print_one_catch_exception_unhandled (struct breakpoint *b, struct bp_location **last_loc)
static void print_mention_catch_exception_unhandled (struct breakpoint *b)
static void print_recreate_catch_exception_unhandled (struct breakpoint *b, struct ui_file *fp)
static void dtor_catch_assert (struct breakpoint *b)
static struct bp_locationallocate_location_catch_assert (struct breakpoint *self)
static void re_set_catch_assert (struct breakpoint *b)
static void check_status_catch_assert (bpstat bs)
static enum print_stop_action print_it_catch_assert (bpstat bs)
static void print_one_catch_assert (struct breakpoint *b, struct bp_location **last_loc)
static void print_mention_catch_assert (struct breakpoint *b)
static void print_recreate_catch_assert (struct breakpoint *b, struct ui_file *fp)
static char * ada_get_next_arg (char **argsp)
static void catch_ada_exception_command_split (char *args, enum ada_exception_catchpoint_kind *ex, char **excep_string, char **cond_string)
static const char * ada_exception_sym_name (enum ada_exception_catchpoint_kind ex)
static struct breakpoint_opsada_exception_breakpoint_ops (enum ada_exception_catchpoint_kind ex)
static struct symtab_and_line ada_exception_sal (enum ada_exception_catchpoint_kind ex, char *excep_string, char **addr_string, const struct breakpoint_ops **ops)
void create_ada_exception_catchpoint (struct gdbarch *gdbarch, enum ada_exception_catchpoint_kind ex_kind, char *excep_string, char *cond_string, int tempflag, int disabled, int from_tty)
static void catch_ada_exception_command (char *arg, int from_tty, struct cmd_list_element *command)
static void catch_ada_assert_command_split (char *args, char **cond_string)
static void catch_assert_command (char *arg, int from_tty, struct cmd_list_element *command)
static void ada_operator_length (const struct expression *exp, int pc, int *oplenp, int *argsp)
static int ada_operator_check (struct expression *exp, int pos, int(*objfile_func)(struct objfile *objfile, void *data), void *data)
static int ada_dump_subexp_body (struct expression *exp, struct ui_file *stream, int elt)
static void ada_print_subexp (struct expression *exp, int *pos, struct ui_file *stream, enum precedence prec)
static void emit_char (int c, struct type *type, struct ui_file *stream, int quoter)
static int parse (void)
static symbol_name_cmp_ftype ada_get_symbol_name_cmp (const char *lookup_name)
static struct valueada_read_var_value (struct symbol *var, struct frame_info *frame)
static void set_ada_command (char *arg, int from_tty)
static void show_ada_command (char *args, int from_tty)
static void initialize_ada_catchpoint_ops (void)
void _initialize_ada_language (void)

Variables

static unsigned int varsize_limit
static char * ada_completer_word_break_characters = " \t\n!@#$%^&*()+=|~`}{[]\";:?/,-"
static const char ADA_MAIN_PROGRAM_SYMBOL_NAME [] = "__gnat_ada_main_program_name"
static int warning_limit = 2
static int warnings_issued = 0
static const char * known_runtime_file_name_patterns []
static const char * known_auxiliary_function_name_patterns []
static struct obstack symbol_list_obstack
static struct inferior_data * ada_inferior_data
struct ada_opname_map ada_opname_table []
static struct htab * decoded_names_store
static char * bound_name []
static const char * attribute_names []
static int trust_pad_over_xvs = 1
static char * standard_exc []
static struct
exception_support_info 
default_exception_support_info
static struct
exception_support_info 
exception_support_info_fallback
static struct bp_location_ops ada_catchpoint_location_ops
static struct breakpoint_ops catch_exception_breakpoint_ops
static struct breakpoint_ops catch_exception_unhandled_breakpoint_ops
static struct breakpoint_ops catch_assert_breakpoint_ops
static struct op_print ada_op_print_tab []
static struct exp_descriptor ada_exp_descriptor
struct language_defn ada_language_defn
initialize_file_ftype _initialize_ada_language
static struct cmd_list_elementset_ada_list
static struct cmd_list_elementshow_ada_list

Define Documentation

#define ADA_OPERATORS
Value:
OP_DEFN (OP_VAR_VALUE, 4, 0, 0) \
    OP_DEFN (BINOP_IN_BOUNDS, 3, 2, 0) \
    OP_DEFN (TERNOP_IN_RANGE, 1, 3, 0) \
    OP_DEFN (OP_ATR_FIRST, 1, 2, 0) \
    OP_DEFN (OP_ATR_LAST, 1, 2, 0) \
    OP_DEFN (OP_ATR_LENGTH, 1, 2, 0) \
    OP_DEFN (OP_ATR_IMAGE, 1, 2, 0) \
    OP_DEFN (OP_ATR_MAX, 1, 3, 0) \
    OP_DEFN (OP_ATR_MIN, 1, 3, 0) \
    OP_DEFN (OP_ATR_MODULUS, 1, 1, 0) \
    OP_DEFN (OP_ATR_POS, 1, 2, 0) \
    OP_DEFN (OP_ATR_SIZE, 1, 1, 0) \
    OP_DEFN (OP_ATR_TAG, 1, 1, 0) \
    OP_DEFN (OP_ATR_VAL, 1, 2, 0) \
    OP_DEFN (UNOP_QUAL, 3, 1, 0) \
    OP_DEFN (UNOP_IN_RANGE, 3, 1, 0) \
    OP_DEFN (OP_OTHERS, 1, 1, 0) \
    OP_DEFN (OP_POSITIONAL, 3, 1, 0) \
    OP_DEFN (OP_DISCRETE_RANGE, 1, 2, 0)

Definition at line 12287 of file ada-lang.c.

Referenced by ada_forward_operator_length(), ada_op_name(), and ada_operator_length().

#define MAX_ADA_DIMENS   (sizeof(bound_name) / (2*sizeof(char *)))

Definition at line 1433 of file ada-lang.c.

#define OP_DEFN (   op,
  len,
  args,
  binop 
)    case op: *oplenp = len; *argsp = args; break;
#define OP_DEFN (   op,
  len,
  args,
  binop 
)    case op: return #op;
#define OP_DEFN (   op,
  len,
  args,
  binop 
)    case op: *oplenp = len; *argsp = args; break;
#define TRUNCATION_TOWARDS_ZERO   ((-5 / 2) == -2)

Definition at line 74 of file ada-lang.c.

Referenced by ada_value_binop().


Typedef Documentation

Definition at line 10993 of file ada-lang.c.


Enumeration Type Documentation

Enumerator:
ada_primitive_type_int 
ada_primitive_type_long 
ada_primitive_type_short 
ada_primitive_type_char 
ada_primitive_type_float 
ada_primitive_type_double 
ada_primitive_type_void 
ada_primitive_type_long_long 
ada_primitive_type_long_double 
ada_primitive_type_natural 
ada_primitive_type_positive 
ada_primitive_type_system_address 
nr_ada_primitive_types 

Definition at line 12671 of file ada-lang.c.


Function Documentation

void _initialize_ada_language ( void  )
static void ada_add_block_symbols ( struct obstack *  obstackp,
struct block block,
const char *  name,
domain_enum  domain,
struct objfile objfile,
int  wild 
) [static]
static void ada_add_local_symbols ( struct obstack *  obstackp,
const char *  name,
struct block block,
domain_enum  domain,
int  wild_match_p 
) [static]
struct type* ada_aligned_type ( struct type type) [read]
const gdb_byte* ada_aligned_value_addr ( struct type type,
const gdb_byte valaddr 
)
static int ada_args_match ( struct symbol func,
struct value **  actuals,
int  n_actuals 
) [static]
int ada_array_arity ( struct type type)
static LONGEST ada_array_bound ( struct value arr,
int  n,
int  which 
) [static]
static LONGEST ada_array_bound_from_type ( struct type arr_type,
int  n,
int  which 
) [static]
struct type* ada_array_element_type ( struct type type,
int  nindices 
) [read]
static LONGEST ada_array_length ( struct value arr,
int  n 
) [static]
const char* ada_attribute_name ( enum exp_opcode  n)

Definition at line 8478 of file ada-lang.c.

Referenced by ada_print_subexp().

static void ada_catchpoint_location_dtor ( struct bp_location bl) [static]

Definition at line 11393 of file ada-lang.c.

References ada_catchpoint_location::excep_cond_expr, and xfree().

struct type* ada_check_typedef ( struct type type) [read]

Definition at line 8384 of file ada-lang.c.

References ada_check_typedef(), ada_find_any_type(), ada_typedef_target_type(), CHECK_TYPEDEF, is_thick_pntr(), name, type, TYPE_CODE, TYPE_CODE_ENUM, TYPE_CODE_TYPEDEF, TYPE_STUB, and TYPE_TAG_NAME.

Referenced by ada_args_match(), ada_array_arity(), ada_array_element_type(), ada_array_length(), ada_check_typedef(), ada_coerce_to_simple_array_type(), ada_convert_actual(), ada_fixup_array_indexes_type(), ada_get_decoded_value(), ada_index_struct_field_1(), ada_is_aligner_type(), ada_is_array_descriptor_type(), ada_is_direct_array_type(), ada_is_packed_array_type(), ada_is_parent_field(), ada_is_simple_array_type(), ada_is_string_type(), ada_lookup_struct_elt_type(), ada_parent_type(), ada_print_scalar(), ada_print_type(), ada_print_typedef(), ada_resolve_function(), ada_search_struct_field(), ada_template_to_fixed_record_type_1(), ada_to_fixed_type_1(), ada_type_match(), ada_type_of_array(), ada_val_print_1(), ada_value_binop(), ada_value_cast(), ada_value_primitive_field(), ada_value_primitive_packed_val(), ada_value_print(), ada_value_slice(), ada_value_slice_from_ptr(), ada_value_struct_elt(), ada_value_subscript(), ada_varobj_decode_var(), coerce_for_assign(), coerce_unspec_val_to_type(), constrained_packed_array_type(), decode_constrained_packed_array(), decode_constrained_packed_array_type(), decode_packed_array_bitsize(), desc_base_type(), desc_bounds(), desc_bounds_type(), desc_data_target_type(), dynamic_template_type(), empty_array(), ensure_lval(), fat_pntr_bounds_bitsize(), find_struct_field(), make_array_descriptor(), possible_user_operator_p(), print_record(), static_unwrap_type(), template_to_static_fixed_type(), thin_data_pntr(), to_fixed_array_type(), to_static_fixed_type(), unwrap_value(), and value_subscript_packed().

static struct value * ada_coerce_ref ( struct value val0) [static, read]
struct value* ada_coerce_to_simple_array ( struct value arr) [read]
struct value* ada_coerce_to_simple_array_ptr ( struct value arr) [read]
struct type* ada_coerce_to_simple_array_type ( struct type type) [read]
struct value* ada_convert_actual ( struct value actual,
struct type formal_type0 
) [read]
const char* ada_decode ( const char *  encoded)
static const char * ada_decoded_op_name ( enum exp_opcode  op) [static]

Definition at line 2888 of file ada-lang.c.

References _, ada_opname_map::decoded, ada_opname_map::encoded, and error().

Referenced by resolve_subexp().

DOUBLEST ada_delta ( struct type type)

Definition at line 10665 of file ada-lang.c.

References DOUBLEST_SCAN_FORMAT, encoding, and fixed_type_info().

Referenced by print_fixed_point_type().

static int ada_dump_subexp_body ( struct expression exp,
struct ui_file stream,
int  elt 
) [static]
char* ada_encode ( const char *  decoded)
const char* ada_enum_name ( const char *  name)

Definition at line 8699 of file ada-lang.c.

References GROW_VECT, name, strrchr(), strstr(), and xsnprintf().

Referenced by ada_print_scalar(), ada_val_print_1(), and print_enum_type().

static struct value* ada_evaluate_subexp ( struct type expect_type,
struct expression exp,
int pos,
enum noside noside   
) [static, read]
static char * ada_exception_catchpoint_cond_string ( const char *  excep_string) [static]

Definition at line 12091 of file ada-lang.c.

References standard_exc, and xstrprintf().

Referenced by create_excep_cond_exprs().

static CORE_ADDR ada_exception_name_addr ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
) [static]
static CORE_ADDR ada_exception_name_addr_1 ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
) [static]
static struct symtab_and_line ada_exception_sal ( enum ada_exception_catchpoint_kind  ex,
char *  excep_string,
char **  addr_string,
const struct breakpoint_ops **  ops 
) [static, read]
static void ada_exception_support_info_sniffer ( void  ) [static]
static const char* ada_exception_sym_name ( enum ada_exception_catchpoint_kind  ex) [static]
static int ada_expand_partial_symbol_name ( const char *  name,
void *  user_data 
) [static]

Definition at line 5880 of file ada-lang.c.

References symbol_completion_match().

Referenced by VEC().

static struct type * ada_find_any_type ( const char *  name) [static, read]
static struct symbol* ada_find_any_type_symbol ( const char *  name) [static, read]
struct type* ada_find_parallel_type ( struct type type,
const char *  suffix 
) [read]
static struct type * ada_find_parallel_type_with_name ( struct type type,
const char *  name 
) [static, read]
void ada_find_printable_frame ( struct frame_info fi)

Definition at line 11225 of file ada-lang.c.

References get_prev_frame(), is_known_support_routine(), and select_frame().

Referenced by print_it_exception(), and task_command_1().

struct symbol* ada_find_renaming_symbol ( struct symbol name_sym,
const struct block block 
) [read]
DOUBLEST ada_fixed_to_float ( struct type type,
LONGEST  x 
)

Definition at line 10711 of file ada-lang.c.

References scaling_factor().

Referenced by ada_val_print_1(), cast_from_fixed(), cast_to_fixed(), and print_fixed_point_type().

void ada_fixup_array_indexes_type ( struct type index_desc_type)
LONGEST ada_float_to_fixed ( struct type type,
DOUBLEST  x 
)

Definition at line 10720 of file ada-lang.c.

References LONGEST, and scaling_factor().

Referenced by cast_to_fixed().

char* ada_fold_name ( const char *  name)

Definition at line 921 of file ada-lang.c.

References GROW_VECT, and len.

Referenced by ada_lookup_symbol(), and ada_name_for_lookup().

static void ada_forward_operator_length ( struct expression exp,
int  pc,
int oplenp,
int argsp 
) [static]
struct type* ada_get_base_type ( struct type raw_type) [read]
struct type* ada_get_decoded_type ( struct type type) [read]
struct value* ada_get_decoded_value ( struct value value) [read]
int ada_get_field_index ( const struct type type,
const char *  field_name,
int  maybe_missing 
)
static char* ada_get_gdb_completer_word_break_characters ( void  ) [static]

Definition at line 446 of file ada-lang.c.

References ada_completer_word_break_characters.

static char* ada_get_next_arg ( char **  argsp) [static]

Definition at line 11929 of file ada-lang.c.

References skip_spaces(), skip_to_space, and xmalloc().

Referenced by catch_ada_exception_command_split().

static symbol_name_cmp_ftype ada_get_symbol_name_cmp ( const char *  lookup_name) [static]

Definition at line 12769 of file ada-lang.c.

References compare_names(), should_use_wild_match(), and wild_match().

static struct value* ada_get_tsd_from_tag ( struct value tag) [static, read]
static struct type* ada_get_tsd_type ( struct inferior inf) [static, read]
static int ada_has_this_exception_support ( const struct exception_support_info einfo) [static]
static int ada_identical_enum_types_p ( struct type type1,
struct type type2 
) [static]
int ada_in_variant ( LONGEST  val,
struct type type,
int  field_num 
)

Definition at line 6561 of file ada-lang.c.

References ada_scan_number(), L, LONGEST, name, p, and TYPE_FIELD_NAME.

Referenced by ada_which_variant_applies().

static struct value * ada_index_struct_field ( int  index,
struct value arg,
int  offset,
struct type type 
) [static, read]

Definition at line 6801 of file ada-lang.c.

References ada_index_struct_field_1().

Referenced by assign_component().

static struct value * ada_index_struct_field_1 ( int index_p,
struct value arg,
int  offset,
struct type type 
) [static, read]
static struct type* ada_index_type ( struct type type,
int  n,
const char *  name 
) [static, read]
static void ada_inferior_data_cleanup ( struct inferior inf,
void *  arg 
) [static]

Definition at line 336 of file ada-lang.c.

References xfree().

Referenced by _initialize_ada_language(), and ada_inferior_exit().

static void ada_inferior_exit ( struct inferior inf) [static]

Definition at line 372 of file ada-lang.c.

References ada_inferior_data_cleanup().

Referenced by _initialize_ada_language().

int ada_is_aligner_type ( struct type type)
static int ada_is_array_type ( struct type type) [static]
int ada_is_character_type ( struct type type)
static int ada_is_direct_array_type ( struct type type) [static]
static int ada_is_dispatch_table_ptr_type ( struct type type) [static]

Definition at line 6018 of file ada-lang.c.

References name, TYPE_CODE, TYPE_CODE_PTR, TYPE_NAME, and TYPE_TARGET_TYPE.

Referenced by ada_is_ignored_field().

int ada_is_fixed_point_type ( struct type type)

Definition at line 10646 of file ada-lang.c.

References fixed_type_info().

Referenced by ada_print_type(), ada_val_print_1(), ada_value_cast(), and cast_to_fixed().

int ada_is_ignored_field ( struct type type,
int  field_num 
)
static int ada_is_interface_tag ( struct type type) [static]

Definition at line 6035 of file ada-lang.c.

References name, and TYPE_NAME.

Referenced by ada_is_ignored_field().

int ada_is_modular_type ( struct type type)
int ada_is_others_clause ( struct type type,
int  field_num 
)

Definition at line 6453 of file ada-lang.c.

References name, and TYPE_FIELD_NAME.

Referenced by ada_which_variant_applies().

static int ada_is_packed_array_type ( struct type type) [static]
int ada_is_parent_field ( struct type type,
int  field_num 
)

Definition at line 6393 of file ada-lang.c.

References ada_check_typedef(), name, and TYPE_FIELD_NAME.

Referenced by ada_parent_type(), and print_selected_record_field_types().

int ada_is_range_type_name ( const char *  name)

Definition at line 10929 of file ada-lang.c.

References strstr().

Referenced by ada_print_type().

int ada_is_simple_array_type ( struct type type)
int ada_is_string_type ( struct type type)
int ada_is_system_address_type ( struct type type)

Definition at line 10654 of file ada-lang.c.

References TYPE_NAME.

Referenced by ada_val_print_1().

int ada_is_tag_type ( struct type type)

Definition at line 6098 of file ada-lang.c.

References ada_type_name(), name, TYPE_CODE, TYPE_CODE_PTR, and TYPE_TARGET_TYPE.

Referenced by ada_tag_name(), and ada_val_print_1().

int ada_is_tagged_type ( struct type type,
int  refok 
)
static int ada_is_unconstrained_packed_array_type ( struct type type) [static]

Definition at line 1996 of file ada-lang.c.

References ada_is_array_descriptor_type(), and ada_is_packed_array_type().

Referenced by ada_type_of_array().

int ada_is_variant_part ( struct type type,
int  field_num 
)
int ada_is_wrapper_field ( struct type type,
int  field_num 
)
static void ada_iterate_over_symbols ( const struct block block,
const char *  name,
domain_enum  domain,
symbol_found_callback_ftype callback,
void *  data 
) [static]

Definition at line 5248 of file ada-lang.c.

References ada_lookup_symbol_list_worker(), and ada_symbol_info::sym.

static char* ada_la_decode ( const char *  encoded,
int  options 
) [static]

Definition at line 1335 of file ada-lang.c.

References ada_decode().

static void ada_language_arch_info ( struct gdbarch gdbarch,
struct language_arch_info lai 
) [static]
void ada_lookup_encoded_symbol ( const char *  name,
const struct block block,
domain_enum  namespace,
struct ada_symbol_info info 
)
struct bound_minimal_symbol ada_lookup_simple_minsym ( const char *  name) [read]
static struct type * ada_lookup_struct_elt_type ( struct type type,
char *  name,
int  refok,
int  noerr,
int dispp 
) [static, read]
struct symbol* ada_lookup_symbol ( const char *  name,
const struct block block0,
domain_enum  namespace,
int is_a_field_of_this 
) [read]
int ada_lookup_symbol_list ( const char *  name0,
const struct block block0,
domain_enum  domain,
struct ada_symbol_info **  results 
)
static int ada_lookup_symbol_list_worker ( const char *  name0,
const struct block block0,
domain_enum  namespace,
struct ada_symbol_info **  results,
int  full_search 
) [static]
static struct symbol* ada_lookup_symbol_nonlocal ( const char *  name,
const struct block block,
const domain_enum  domain 
) [static, read]

Definition at line 5336 of file ada-lang.c.

References ada_lookup_symbol(), and block_static_block().

char* ada_main_name ( void  )
ULONGEST ada_modulus ( struct type type)

Definition at line 10952 of file ada-lang.c.

References TYPE_HIGH_BOUND, and ULONGEST.

Referenced by ada_print_type(), and decode_constrained_packed_array().

char* ada_name_for_lookup ( const char *  name)

Definition at line 5273 of file ada-lang.c.

References ada_encode(), ada_fold_name(), memcpy(), and xmalloc().

Referenced by find_linespec_symbols().

int ada_name_prefix_len ( const char *  name)
static char * ada_op_name ( enum exp_opcode  opcode) [static]

Definition at line 12366 of file ada-lang.c.

References ADA_OPERATORS, and op_name_standard().

static int ada_operator_check ( struct expression exp,
int  pos,
int(*)(struct objfile *objfile, void *data)  objfile_func,
void *  data 
) [static]
static void ada_operator_length ( const struct expression exp,
int  pc,
int oplenp,
int argsp 
) [static]
struct type* ada_parent_type ( struct type type) [read]
enum ada_renaming_category ada_parse_renaming ( struct symbol sym,
const char **  renamed_entity,
int len,
const char **  renaming_expr 
)
int ada_prefer_type ( struct type type0,
struct type type1 
)
static void ada_print_array_index ( struct value index_value,
struct ui_file stream,
const struct value_print_options options 
) [static]

Definition at line 454 of file ada-lang.c.

References fprintf_filtered(), and LA_VALUE_PRINT.

static void ada_print_subexp ( struct expression exp,
int pos,
struct ui_file stream,
enum precedence  prec 
) [static]
static struct value* ada_promote_array_of_integrals ( struct type type,
struct value val 
) [static, read]
static struct value* ada_read_renaming_var_value ( struct symbol renaming_sym,
struct block block 
) [static, read]
static struct value* ada_read_var_value ( struct symbol var,
struct frame_info frame 
) [static, read]
static void ada_remove_po_subprogram_suffix ( const char *  encoded,
int len 
) [static]

Definition at line 989 of file ada-lang.c.

Referenced by ada_decode(), and find_old_style_renaming_symbol().

static void ada_remove_trailing_digits ( const char *  encoded,
int len 
) [static]
static void ada_remove_Xbn_suffix ( const char *  encoded,
int len 
) [static]

Definition at line 1010 of file ada-lang.c.

Referenced by find_old_style_renaming_symbol().

static int ada_resolve_function ( struct ada_symbol_info ,
int  ,
struct value **  ,
int  ,
const char *  ,
struct type  
) [static]

Referenced by resolve_subexp().

static int ada_resolve_function ( struct ada_symbol_info  syms[],
int  nsyms,
struct value **  args,
int  nargs,
const char *  name,
struct type context_type 
) [static]
static int ada_same_array_size_p ( struct type t1,
struct type t2 
) [static]

Definition at line 8848 of file ada-lang.c.

References _, error(), get_array_bounds(), and LONGEST.

Referenced by coerce_for_assign().

int ada_scan_number ( const char  str[],
int  k,
LONGEST R,
int new_k 
)

Definition at line 6519 of file ada-lang.c.

References LONGEST, and ULONGEST.

Referenced by ada_in_variant(), print_choices(), print_range_bound(), and to_fixed_range_type().

static struct value * ada_search_struct_field ( char *  name,
struct value arg,
int  offset,
struct type type 
) [static, read]
const char* ada_tag_name ( struct value tag)
static char* ada_tag_name_from_tsd ( struct value tsd) [static]

Definition at line 6307 of file ada-lang.c.

References ada_value_struct_elt(), name, p, read_memory_string(), and value_as_address().

Referenced by ada_tag_name().

struct type* ada_tag_type ( struct value val) [read]

Definition at line 6114 of file ada-lang.c.

References ada_lookup_struct_elt_type(), and value_type().

struct value* ada_tag_value_at_base_address ( struct value obj) [read]
struct type* ada_template_to_fixed_record_type_1 ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval0,
int  keep_dynamic_fields 
) [read]
struct type* ada_to_fixed_type ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval,
int  check_tag 
) [read]
static struct type* ada_to_fixed_type_1 ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval,
int  check_tag 
) [static, read]
struct value* ada_to_fixed_value ( struct value val) [read]
static struct value * ada_to_fixed_value_create ( struct type type0,
CORE_ADDR  address,
struct value val0 
) [static, read]

Definition at line 8429 of file ada-lang.c.

References ada_to_fixed_type(), and value_from_contents_and_address().

Referenced by ada_to_fixed_value().

static int ada_type_match ( struct type ftype,
struct type atype,
int  may_deref 
) [static]
const char* ada_type_name ( struct type type)
struct type* ada_type_of_array ( struct value arr,
int  bounds 
) [read]
static struct type* ada_typedef_target_type ( struct type type) [static, read]
static CORE_ADDR ada_unhandled_exception_name_addr ( void  ) [static]

Definition at line 11245 of file ada-lang.c.

References parse_and_eval_address().

static const char* ada_unqualified_name ( const char *  decoded_name) [static]

Definition at line 420 of file ada-lang.c.

References strrchr().

Referenced by symbol_completion_match().

Definition at line 787 of file ada-lang.c.

References language_ada, and lookup_minimal_symbol().

Referenced by ada_exception_support_info_sniffer().

static struct value* ada_value_assign ( struct value toval,
struct value fromval 
) [static, read]
static struct value* ada_value_binop ( struct value arg1,
struct value arg2,
enum exp_opcode  op 
) [static, read]
static struct value* ada_value_cast ( struct type type,
struct value arg2,
enum noside  noside 
) [static, read]
static int ada_value_equal ( struct value arg1,
struct value arg2 
) [static]
struct value* ada_value_ind ( struct value val0) [read]
static struct value * ada_value_primitive_field ( struct value arg1,
int  offset,
int  fieldno,
struct type arg_type 
) [static, read]
struct value* ada_value_primitive_packed_val ( struct value obj,
const gdb_byte valaddr,
long  offset,
int  bit_offset,
int  bit_size,
struct type type 
) [read]
static struct value* ada_value_ptr_subscript ( struct value arr,
struct type type,
int  arity,
struct value **  ind 
) [static, read]
static struct value* ada_value_slice ( struct value array,
int  low,
int  high 
) [static, read]
static struct value* ada_value_slice_from_ptr ( struct value array_ptr,
struct type type,
int  low,
int  high 
) [static, read]
struct value* ada_value_struct_elt ( struct value arg,
char *  name,
int  no_err 
) [read]
struct value* ada_value_subscript ( struct value arr,
int  arity,
struct value **  ind 
) [read]
struct value* ada_value_tag ( struct value val) [read]

Definition at line 6131 of file ada-lang.c.

References ada_value_struct_elt().

Referenced by ada_tag_value_at_base_address().

char* ada_variant_discrim_name ( struct type type0)
struct type* ada_variant_discrim_type ( struct type var_type,
struct type outer_type 
) [read]

Definition at line 6441 of file ada-lang.c.

References ada_lookup_struct_elt_type(), ada_variant_discrim_name(), and name.

Referenced by print_variant_clauses().

int ada_which_variant_applies ( struct type var_type,
struct type outer_type,
const gdb_byte outer_valaddr 
)
static char* add_angle_brackets ( const char *  str) [static]

Definition at line 436 of file ada-lang.c.

References xfree(), and xstrprintf().

Referenced by symbol_completion_match().

static void add_component_interval ( LONGEST  low,
LONGEST  high,
LONGEST indices,
int size,
int  max_size 
) [static]

Definition at line 9333 of file ada-lang.c.

References _, error(), memcpy(), and size.

Referenced by aggregate_assign_from_choices(), and aggregate_assign_positional().

static void add_defn_to_vec ( struct obstack *  obstackp,
struct symbol sym,
struct block block 
) [static]
static void add_nonlocal_symbols ( struct obstack *  obstackp,
const char *  name,
domain_enum  domain,
int  global,
int  is_wild_match 
) [static]
static void add_symbols_from_enclosing_procs ( struct obstack *  obstackp,
const char *  name,
domain_enum  namespace,
int  wild_match_p 
) [static]

Definition at line 4455 of file ada-lang.c.

Referenced by ada_add_local_symbols().

static int advance_wild_match ( const char **  namep,
const char *  name0,
int  target0 
) [static]

Definition at line 5517 of file ada-lang.c.

References name.

Referenced by wild_match().

static void aggregate_assign_from_choices ( struct value container,
struct value lhs,
struct expression exp,
int pos,
LONGEST indices,
int num_indices,
int  max_indices,
LONGEST  low,
LONGEST  high 
) [static]
static void aggregate_assign_others ( struct value container,
struct value lhs,
struct expression exp,
int pos,
LONGEST indices,
int  num_indices,
LONGEST  low,
LONGEST  high 
) [static]

Definition at line 9305 of file ada-lang.c.

References ada_evaluate_subexp(), assign_component(), EVAL_SKIP, and LONGEST.

static void aggregate_assign_positional ( struct value container,
struct value lhs,
struct expression exp,
int pos,
LONGEST indices,
int num_indices,
int  max_indices,
LONGEST  low,
LONGEST  high 
) [static]
static unsigned int align_value ( unsigned int  off,
unsigned int  alignment 
) [static]

Definition at line 7217 of file ada-lang.c.

Referenced by ada_template_to_fixed_record_type_1().

static struct bp_location* allocate_location_catch_assert ( struct breakpoint self) [static, read]

Definition at line 11879 of file ada-lang.c.

References ada_catch_assert, and allocate_location_exception().

Referenced by initialize_ada_catchpoint_ops().

static struct bp_location* allocate_location_catch_exception ( struct breakpoint self) [static, read]

Definition at line 11773 of file ada-lang.c.

References ada_catch_exception, and allocate_location_exception().

Referenced by initialize_ada_catchpoint_ops().

static struct bp_location* allocate_location_catch_exception_unhandled ( struct breakpoint self) [static, read]
static struct bp_location* allocate_location_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint self 
) [static, read]
static struct value* assign_aggregate ( struct value container,
struct value lhs,
struct expression exp,
int pos,
enum noside noside   
) [static, read]

Referenced by assign_component().

static void assign_component ( struct value container,
struct value lhs,
LONGEST  index,
struct expression exp,
int pos 
) [static]
static int aux_add_nonlocal_symbols ( struct block block,
struct symbol sym,
void *  data0 
) [static]
static void cache_symbol ( const char *  name,
domain_enum  namespace,
struct symbol sym,
const struct block block 
) [static]

Definition at line 4233 of file ada-lang.c.

Referenced by ada_lookup_symbol_list_worker(), and standard_lookup().

static struct value* cast_from_fixed ( struct type type,
struct value arg 
) [static, read]

Definition at line 8836 of file ada-lang.c.

References ada_fixed_to_float(), value_as_long(), value_from_double(), and value_type().

Referenced by ada_value_cast().

static struct value* cast_to_fixed ( struct type type,
struct value arg 
) [static, read]
static void catch_ada_assert_command_split ( char *  args,
char **  cond_string 
) [static]

Definition at line 12241 of file ada-lang.c.

References _, error(), and skip_spaces().

Referenced by catch_assert_command().

static void catch_ada_exception_command ( char *  arg,
int  from_tty,
struct cmd_list_element command 
) [static]
static void catch_ada_exception_command_split ( char *  args,
enum ada_exception_catchpoint_kind ex,
char **  excep_string,
char **  cond_string 
) [static]
static void catch_assert_command ( char *  arg,
int  from_tty,
struct cmd_list_element command 
) [static]
static void check_size ( const struct type type) [static]
static void check_status_catch_assert ( bpstat  bs) [static]

Definition at line 11891 of file ada-lang.c.

References ada_catch_assert, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

static void check_status_catch_exception ( bpstat  bs) [static]

Definition at line 11785 of file ada-lang.c.

References ada_catch_exception, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

static void check_status_catch_exception_unhandled ( bpstat  bs) [static]

Definition at line 11837 of file ada-lang.c.

References ada_catch_exception_unhandled, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

static void check_status_exception ( enum ada_exception_catchpoint_kind  ex,
bpstat  bs 
) [static]
static struct value* coerce_for_assign ( struct type type,
struct value val 
) [static, read]
static struct value * coerce_unspec_val_to_type ( struct value val,
struct type type 
) [static, read]
static int compare_names ( const char *  string1,
const char *  string2 
) [static]
static int compare_names_with_case ( const char *  string1,
const char *  string2,
enum case_sensitivity  casing 
) [static]

Definition at line 4989 of file ada-lang.c.

References case_sensitive_off, is_name_suffix(), and strcmp_iw_ordered().

Referenced by compare_names().

static const gdb_byte* cond_offset_host ( const gdb_byte valaddr,
long  offset 
) [static]

Definition at line 590 of file ada-lang.c.

References offset.

Referenced by ada_template_to_fixed_record_type_1(), and to_record_with_fixed_variant_part().

static CORE_ADDR cond_offset_target ( CORE_ADDR  address,
long  offset 
) [static]

Definition at line 599 of file ada-lang.c.

References offset.

Referenced by ada_template_to_fixed_record_type_1(), and to_record_with_fixed_variant_part().

static struct type * constrained_packed_array_type ( struct type type,
long *  elt_bits 
) [static, read]
void create_ada_exception_catchpoint ( struct gdbarch gdbarch,
enum ada_exception_catchpoint_kind  ex_kind,
char *  excep_string,
char *  cond_string,
int  tempflag,
int  disabled,
int  from_tty 
)
static void create_excep_cond_exprs ( struct ada_catchpoint c) [static]
static struct value * decode_constrained_packed_array ( struct value arr) [static, read]
static struct type * decode_constrained_packed_array_type ( struct type type) [static, read]
static long decode_packed_array_bitsize ( struct type type) [static]
static struct ada_symbol_info * defns_collected ( struct obstack *  obstackp,
int  finish 
) [static, read]
static int desc_arity ( struct type type) [static]

Definition at line 1745 of file ada-lang.c.

References desc_base_type(), and TYPE_NFIELDS.

Referenced by ada_array_arity(), and ada_is_array_descriptor_type().

static struct type * desc_base_type ( struct type type) [static, read]
static int desc_bound_bitpos ( struct type type,
int  i,
int  which 
) [static]

Definition at line 1707 of file ada-lang.c.

References desc_base_type(), and TYPE_FIELD_BITPOS.

Referenced by make_array_descriptor().

static int desc_bound_bitsize ( struct type type,
int  i,
int  which 
) [static]

Definition at line 1717 of file ada-lang.c.

References desc_base_type(), TYPE_FIELD_BITSIZE, TYPE_FIELD_TYPE, and TYPE_LENGTH.

Referenced by make_array_descriptor().

static struct value * desc_bounds ( struct value arr) [static, read]
static struct type * desc_bounds_type ( struct type type) [static, read]
static struct value * desc_data ( struct value arr) [static, read]
static struct type * desc_data_target_type ( struct type type) [static, read]
static struct type * desc_index_type ( struct type type,
int  i 
) [static, read]

Definition at line 1731 of file ada-lang.c.

References bound_name, desc_base_type(), lookup_struct_elt_type(), TYPE_CODE, and TYPE_CODE_STRUCT.

Referenced by ada_index_type().

static struct value * desc_one_bound ( struct value bounds,
int  i,
int  which 
) [static, read]

Definition at line 1696 of file ada-lang.c.

References _, bound_name, and value_struct_elt().

Referenced by ada_array_bound(), ada_array_length(), and ada_type_of_array().

static int discrete_type_p ( struct type type) [static]

Definition at line 3822 of file ada-lang.c.

References TYPE_CODE, TYPE_CODE_BOOL, TYPE_CODE_ENUM, TYPE_CODE_INT, and TYPE_CODE_RANGE.

Referenced by pos_atr(), and value_val_atr().

static void dtor_catch_assert ( struct breakpoint b) [static]

Definition at line 11873 of file ada-lang.c.

References ada_catch_assert, and dtor_exception().

Referenced by initialize_ada_catchpoint_ops().

static void dtor_catch_exception ( struct breakpoint b) [static]

Definition at line 11767 of file ada-lang.c.

References ada_catch_exception, and dtor_exception().

Referenced by initialize_ada_catchpoint_ops().

static void dtor_catch_exception_unhandled ( struct breakpoint b) [static]

Definition at line 11819 of file ada-lang.c.

References ada_catch_exception_unhandled, and dtor_exception().

Referenced by initialize_ada_catchpoint_ops().

static void dtor_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
) [static]
static struct type* dynamic_template_type ( struct type type) [static, read]
static void emit_char ( int  c,
struct type type,
struct ui_file stream,
int  quoter 
) [static]

Definition at line 12744 of file ada-lang.c.

References ada_emit_char().

static struct value* empty_array ( struct type arr_type,
int  low 
) [static, read]
static struct type* empty_record ( struct type template) [static, read]
static int encoded_ordered_before ( const char *  N0,
const char *  N1 
) [static]

Definition at line 3462 of file ada-lang.c.

Referenced by sort_choices().

static struct value* ensure_lval ( struct value val) [static, read]
static int equiv_types ( struct type type0,
struct type type1 
) [static]

Definition at line 4291 of file ada-lang.c.

References ada_type_name(), TYPE_CODE, TYPE_CODE_ENUM, and TYPE_CODE_STRUCT.

Referenced by lesseq_defined_than().

static struct value * evaluate_subexp_type ( struct expression exp,
int pos 
) [static, read]

Definition at line 8772 of file ada-lang.c.

References EVAL_AVOID_SIDE_EFFECTS, evaluate_subexp(), and NULL_TYPE.

Referenced by resolve_subexp().

static int fat_pntr_bounds_bitpos ( struct type type) [static]

Definition at line 1606 of file ada-lang.c.

References desc_base_type(), and TYPE_FIELD_BITPOS.

Referenced by make_array_descriptor().

static int fat_pntr_bounds_bitsize ( struct type type) [static]
static int fat_pntr_data_bitpos ( struct type type) [static]

Definition at line 1672 of file ada-lang.c.

References desc_base_type(), and TYPE_FIELD_BITPOS.

Referenced by make_array_descriptor().

static int fat_pntr_data_bitsize ( struct type type) [static]

Definition at line 1681 of file ada-lang.c.

References desc_base_type(), TYPE_FIELD_BITSIZE, TYPE_FIELD_TYPE, and TYPE_LENGTH.

Referenced by make_array_descriptor().

static unsigned int field_alignment ( struct type type,
int  f 
) [static]

Definition at line 7225 of file ada-lang.c.

References len, name, and TYPE_FIELD_NAME.

Referenced by ada_template_to_fixed_record_type_1(), and alignment_of().

static int field_name_match ( const char *  field_name,
const char *  target 
) [static]
static struct symbol * find_old_style_renaming_symbol ( const char *  name,
const struct block block 
) [static, read]
static struct type* find_parallel_type_by_descriptive_type ( struct type type,
const char *  name 
) [static, read]
static int find_struct_field ( const char *  name,
struct type type,
int  offset,
struct type **  field_type_p,
int byte_offset_p,
int bit_offset_p,
int bit_size_p,
int index_p 
) [static]
static const char* fixed_type_info ( struct type type) [static]
static int full_match ( const char *  sym_name,
const char *  search_name 
) [static]

Definition at line 5590 of file ada-lang.c.

References match_name().

Referenced by ada_add_block_symbols(), and add_nonlocal_symbols().

static struct ada_inferior_data* get_ada_inferior_data ( struct inferior inf) [static, read]
static struct type* get_base_type ( struct type type) [static, read]

Definition at line 729 of file ada-lang.c.

References type, TYPE_CODE, TYPE_CODE_RANGE, and TYPE_TARGET_TYPE.

Referenced by ada_is_modular_type(), ada_value_binop(), and return_match().

LONGEST get_int_var_value ( char *  name,
int flag 
)
int get_selections ( int choices,
int  n_choices,
int  max_results,
int  is_all_choice,
char *  annotation_suffix 
)

Definition at line 3644 of file ada-lang.c.

References _, command_line_input(), error(), error_no_arg(), and skip_spaces().

Referenced by user_select_syms().

static struct value * get_var_value ( char *  name,
char *  err_msg 
) [static, read]
void* grow_vect ( void *  vect,
size_t *  size,
size_t  min_size,
int  element_size 
)

Definition at line 466 of file ada-lang.c.

References xrealloc().

static int has_negatives ( struct type type) [static]
static void initialize_ada_catchpoint_ops ( void  ) [static]
static int integer_type_p ( struct type type) [static]

Definition at line 3778 of file ada-lang.c.

References TYPE_CODE, TYPE_CODE_INT, TYPE_CODE_RANGE, and TYPE_TARGET_TYPE.

Referenced by possible_user_operator_p(), and value_val_atr().

static int is_ada95_tag ( struct value tag) [static]

Definition at line 6123 of file ada-lang.c.

References ada_value_struct_elt().

Referenced by ada_tag_value_at_base_address().

static int is_dynamic_field ( struct type templ_type,
int  field_num 
) [static]
static int is_known_support_routine ( struct frame_info frame) [static]
static int is_lower_alphanum ( const char  c) [static]

Definition at line 948 of file ada-lang.c.

Referenced by ada_decode().

static int is_name_suffix ( const char *  str) [static]

Definition at line 5360 of file ada-lang.c.

References len.

Referenced by ada_add_block_symbols(), compare_names_with_case(), match_name(), and wild_match().

static int is_nondebugging_type ( struct type type) [static]

Definition at line 4465 of file ada-lang.c.

References ada_type_name(), and name.

Referenced by remove_extra_symbols().

static int is_nonfunction ( struct ada_symbol_info ,
int   
) [static]
static int is_nonfunction ( struct ada_symbol_info  syms[],
int  n 
) [static]

Definition at line 4274 of file ada-lang.c.

References LOC_CONST, SYMBOL_CLASS, SYMBOL_TYPE, TYPE_CODE, TYPE_CODE_ENUM, and TYPE_CODE_FUNC.

static int is_package_name ( const char *  name) [static]

Definition at line 4702 of file ada-lang.c.

References standard_lookup(), strstr(), VAR_DOMAIN, and xstrprintf().

Referenced by old_renaming_is_invisible().

static int is_suffix ( const char *  str,
const char *  suffix 
) [static]

Definition at line 543 of file ada-lang.c.

Referenced by is_thin_pntr(), and thin_descriptor_type().

static int is_thick_pntr ( struct type type) [static]
static int is_thin_pntr ( struct type type) [static]
static int is_unchecked_variant ( struct type var_type,
struct type outer_type 
) [static]

Definition at line 7097 of file ada-lang.c.

References ada_lookup_struct_elt_type(), and ada_variant_discrim_name().

Referenced by to_fixed_variant_branch_type().

static int is_valid_name_for_wild_match ( const char *  name0) [static]

Definition at line 5494 of file ada-lang.c.

References ada_decode().

Referenced by wild_match().

static int lesseq_defined_than ( struct symbol sym0,
struct symbol sym1 
) [static]
static void static void lim_warning ( const char *  format,
  ... 
) [static]
static int lookup_cached_symbol ( const char *  name,
domain_enum  namespace,
struct symbol **  sym,
struct block **  block 
) [static]

Definition at line 4226 of file ada-lang.c.

Referenced by ada_lookup_symbol_list_worker(), and standard_lookup().

static struct value * make_array_descriptor ( struct type type,
struct value arr 
) [static, read]
static int match_name ( const char *  sym_name,
const char *  name,
int  wild 
) [static]

Definition at line 1348 of file ada-lang.c.

References is_name_suffix(), and wild_match().

Referenced by ada_lookup_simple_minsym(), and full_match().

static LONGEST max_of_size ( int  size) [static]

Definition at line 642 of file ada-lang.c.

References LONGEST.

Referenced by max_of_type(), and min_of_size().

static LONGEST max_of_type ( struct type t) [static]

Definition at line 667 of file ada-lang.c.

References LONGEST, max_of_size(), TYPE_LENGTH, TYPE_UNSIGNED, and umax_of_size().

Referenced by ada_discrete_type_high_bound().

static LONGEST min_of_size ( int  size) [static]

Definition at line 651 of file ada-lang.c.

References max_of_size().

Referenced by min_of_type().

static LONGEST min_of_type ( struct type t) [static]

Definition at line 677 of file ada-lang.c.

References min_of_size(), TYPE_LENGTH, and TYPE_UNSIGNED.

Referenced by ada_discrete_type_low_bound().

static void move_bits ( gdb_byte target,
int  targ_offset,
const gdb_byte source,
int  src_offset,
int  n,
int  bits_big_endian_p 
) [static]

Definition at line 2428 of file ada-lang.c.

References HOST_CHAR_BIT.

Referenced by ada_value_assign(), and value_assign_to_component().

static int num_component_specs ( struct expression exp,
int  pc 
) [static]
static int num_defns_collected ( struct obstack *  obstackp) [static]
static int num_visible_fields ( struct type type) [static]

Definition at line 6724 of file ada-lang.c.

References find_struct_field().

static int numeric_type_p ( struct type type) [static]

Definition at line 3755 of file ada-lang.c.

References TYPE_CODE, TYPE_CODE_FLT, TYPE_CODE_INT, TYPE_CODE_RANGE, and TYPE_TARGET_TYPE.

Referenced by possible_user_operator_p().

static int old_renaming_is_invisible ( const struct symbol sym,
const char *  function_name 
) [static]
static int parse ( void  ) [static]

Definition at line 12750 of file ada-lang.c.

References ada_parse(), and warnings_issued.

Referenced by mi_cmd_execute(), and mi_parse().

static enum ada_renaming_category parse_old_style_renaming ( struct type type,
const char **  renamed_entity,
int len,
const char **  renaming_expr 
) [static]
static LONGEST pos_atr ( struct value arg) [static]
static int possible_user_operator_p ( enum  exp_opcode,
struct value **   
) [static]

Referenced by resolve_subexp().

static int possible_user_operator_p ( enum exp_opcode  op,
struct value args[] 
) [static]
static enum print_stop_action print_it_catch_assert ( bpstat  bs) [static]

Definition at line 11897 of file ada-lang.c.

References ada_catch_assert, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

static enum print_stop_action print_it_catch_exception ( bpstat  bs) [static]

Definition at line 11791 of file ada-lang.c.

References ada_catch_exception, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

Definition at line 11843 of file ada-lang.c.

References ada_catch_exception_unhandled, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

static enum print_stop_action print_it_exception ( enum ada_exception_catchpoint_kind  ex,
bpstat  bs 
) [static]
static void print_mention_catch_assert ( struct breakpoint b) [static]

Definition at line 11909 of file ada-lang.c.

References ada_catch_assert, and print_mention_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_mention_catch_exception ( struct breakpoint b) [static]

Definition at line 11803 of file ada-lang.c.

References ada_catch_exception, and print_mention_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_mention_catch_exception_unhandled ( struct breakpoint b) [static]
static void print_mention_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
) [static]
static void print_one_catch_assert ( struct breakpoint b,
struct bp_location **  last_loc 
) [static]

Definition at line 11903 of file ada-lang.c.

References ada_catch_assert, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_one_catch_exception ( struct breakpoint b,
struct bp_location **  last_loc 
) [static]

Definition at line 11797 of file ada-lang.c.

References ada_catch_exception, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_one_catch_exception_unhandled ( struct breakpoint b,
struct bp_location **  last_loc 
) [static]

Definition at line 11849 of file ada-lang.c.

References ada_catch_exception_unhandled, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_one_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b,
struct bp_location **  last_loc 
) [static]
static void print_recreate_catch_assert ( struct breakpoint b,
struct ui_file fp 
) [static]

Definition at line 11915 of file ada-lang.c.

References ada_catch_assert, and print_recreate_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_recreate_catch_exception ( struct breakpoint b,
struct ui_file fp 
) [static]

Definition at line 11809 of file ada-lang.c.

References ada_catch_exception, and print_recreate_exception().

Referenced by initialize_ada_catchpoint_ops().

static void print_recreate_catch_exception_unhandled ( struct breakpoint b,
struct ui_file fp 
) [static]
static void print_recreate_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b,
struct ui_file fp 
) [static]
static void re_set_catch_assert ( struct breakpoint b) [static]

Definition at line 11885 of file ada-lang.c.

References ada_catch_assert, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

static void re_set_catch_exception ( struct breakpoint b) [static]

Definition at line 11779 of file ada-lang.c.

References ada_catch_exception, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

static void re_set_catch_exception_unhandled ( struct breakpoint b) [static]

Definition at line 11831 of file ada-lang.c.

References ada_catch_exception_unhandled, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

static void re_set_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
) [static]
static int remove_extra_symbols ( struct ada_symbol_info syms,
int  nsyms 
) [static]
static int remove_irrelevant_renamings ( struct ada_symbol_info syms,
int  nsyms,
const struct block current_block 
) [static]
static void replace_operator_with_call ( struct expression **  expp,
int  pc,
int  nargs,
int  oplen,
struct symbol sym,
const struct block block 
) [static]
static void resolve ( struct expression **  expp,
int  void_context_p 
) [static]

Definition at line 2911 of file ada-lang.c.

References builtin_type(), builtin_type::builtin_void, and resolve_subexp().

static struct value * resolve_subexp ( struct expression **  expp,
int pos,
int  deprocedure_p,
struct type context_type 
) [static, read]
static int return_match ( struct type func_type,
struct type context_type 
) [static]
static int scalar_type_p ( struct type type) [static]

Definition at line 3800 of file ada-lang.c.

References TYPE_CODE, TYPE_CODE_ENUM, TYPE_CODE_FLT, TYPE_CODE_INT, and TYPE_CODE_RANGE.

Referenced by possible_user_operator_p().

static DOUBLEST scaling_factor ( struct type type) [static]

Definition at line 10684 of file ada-lang.c.

References DOUBLEST_SCAN_FORMAT, encoding, and fixed_type_info().

Referenced by ada_fixed_to_float(), and ada_float_to_fixed().

static int scan_discrim_bound ( char *  str,
int  k,
struct value dval,
LONGEST px,
int pnew_k 
) [static]

Definition at line 10736 of file ada-lang.c.

References ada_search_struct_field(), GROW_VECT, strstr(), value_as_long(), and value_type().

Referenced by to_fixed_range_type().

static void set_ada_command ( char *  arg,
int  from_tty 
) [static]

Definition at line 12850 of file ada-lang.c.

References _, gdb_stdout, help_list(), and printf_unfiltered().

Referenced by _initialize_ada_language().

static int should_stop_exception ( const struct bp_location bl) [static]
static int should_use_wild_match ( const char *  lookup_name) [static]
static void show_ada_command ( char *  args,
int  from_tty 
) [static]

Definition at line 12860 of file ada-lang.c.

References cmd_show_list().

Referenced by _initialize_ada_language().

static void sort_choices ( struct ada_symbol_info  syms[],
int  nsyms 
) [static]

Definition at line 3498 of file ada-lang.c.

References encoded_ordered_before(), ada_symbol_info::sym, and SYMBOL_LINKAGE_NAME.

Referenced by user_select_syms().

static struct symbol * standard_lookup ( const char *  name,
const struct block block,
domain_enum  domain 
) [static, read]
static struct type * static_unwrap_type ( struct type type) [static, read]
static void symbol_completion_add ( VEC(char_ptr)**  sv,
const char *  sym_name,
const char *  text,
int  text_len,
const char *  orig_text,
const char *  word,
int  wild_match_p,
int  encoded_p 
) [static]

Definition at line 5826 of file ada-lang.c.

References symbol_completion_match(), VEC_safe_push, word, and xmalloc().

Referenced by VEC().

static const char* symbol_completion_match ( const char *  sym_name,
const char *  text,
int  text_len,
int  wild_match_p,
int  encoded_p 
) [static]
static int symbols_are_identical_enums ( struct ada_symbol_info syms,
int  nsyms 
) [static]
static struct type* template_to_fixed_record_type ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval0 
) [static, read]

Definition at line 7821 of file ada-lang.c.

References ada_template_to_fixed_record_type_1().

Referenced by to_fixed_record_type().

static struct type* template_to_static_fixed_type ( struct type type0) [static, read]
static struct value* thin_data_pntr ( struct value val) [static, read]
static struct type* thin_descriptor_type ( struct type type) [static, read]
static struct type * to_fixed_array_type ( struct type type0,
struct value dval,
int  ignore_too_big 
) [static, read]
static struct type * to_fixed_range_type ( struct type raw_type,
struct value dval 
) [static, read]
static struct type* to_fixed_record_type ( struct type type0,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval 
) [static, read]
static struct type * to_fixed_variant_branch_type ( struct type var_type0,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval 
) [static, read]
static struct type* to_record_with_fixed_variant_part ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval0 
) [static, read]
static struct type * to_static_fixed_type ( struct type type0) [static, read]
static struct type* type_from_tag ( struct value tag) [static, read]

Definition at line 6162 of file ada-lang.c.

References ada_encode(), ada_find_any_type(), and ada_tag_name().

Referenced by ada_tag_value_at_base_address(), and ada_to_fixed_type_1().

static ULONGEST umax_of_size ( int  size) [static]

Definition at line 658 of file ada-lang.c.

References ULONGEST.

Referenced by max_of_type().

static struct value * unwrap_value ( struct value val) [static, read]
int user_select_syms ( struct ada_symbol_info syms,
int  nsyms,
int  max_results 
)
static void value_assign_to_component ( struct value container,
struct value component,
struct value val 
) [static]
static CORE_ADDR value_pointer ( struct value value,
struct type type 
) [static]
static struct value * value_pos_atr ( struct type type,
struct value arg 
) [static, read]

Definition at line 8514 of file ada-lang.c.

References pos_atr(), and value_from_longest().

static struct value * value_subscript_packed ( struct value arr,
int  arity,
struct value **  ind 
) [static, read]
static struct value* value_tag_from_contents_and_address ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address 
) [static, read]
static struct value * value_val_atr ( struct type type,
struct value arg 
) [static, read]
static int variant_field_index ( struct type type) [static]
static VEC ( char_ptr  ) [static]
static int wild_match ( const char *  name,
const char *  patn 
) [static]
static char* xget_renaming_scope ( struct type renaming_type) [static]

Definition at line 4668 of file ada-lang.c.

References name, strstr(), type_name_no_tag(), and xmalloc().

Referenced by old_renaming_is_invisible().


Variable Documentation

Referenced by initialize_all_files().

Initial value:

Definition at line 11402 of file ada-lang.c.

char* ada_completer_word_break_characters = " \t\n!@#$%^&*()+=|~`}{[]\";:?/,-" [static]

Definition at line 284 of file ada-lang.c.

Referenced by ada_get_gdb_completer_word_break_characters().

struct inferior_data* ada_inferior_data [static]

Definition at line 332 of file ada-lang.c.

Definition at line 12799 of file ada-lang.c.

const char ADA_MAIN_PROGRAM_SYMBOL_NAME[] = "__gnat_ada_main_program_name" [static]

Definition at line 293 of file ada-lang.c.

Referenced by ada_main_name().

struct op_print ada_op_print_tab[] [static]

Definition at line 12636 of file ada-lang.c.

Initial value:
 {
  {"Oadd", "\"+\"", BINOP_ADD},
  {"Osubtract", "\"-\"", BINOP_SUB},
  {"Omultiply", "\"*\"", BINOP_MUL},
  {"Odivide", "\"/\"", BINOP_DIV},
  {"Omod", "\"mod\"", BINOP_MOD},
  {"Orem", "\"rem\"", BINOP_REM},
  {"Oexpon", "\"**\"", BINOP_EXP},
  {"Olt", "\"<\"", BINOP_LESS},
  {"Ole", "\"<=\"", BINOP_LEQ},
  {"Ogt", "\">\"", BINOP_GTR},
  {"Oge", "\">=\"", BINOP_GEQ},
  {"Oeq", "\"=\"", BINOP_EQUAL},
  {"One", "\"/=\"", BINOP_NOTEQUAL},
  {"Oand", "\"and\"", BINOP_BITWISE_AND},
  {"Oor", "\"or\"", BINOP_BITWISE_IOR},
  {"Oxor", "\"xor\"", BINOP_BITWISE_XOR},
  {"Oconcat", "\"&\"", BINOP_CONCAT},
  {"Oabs", "\"abs\"", UNOP_ABS},
  {"Onot", "\"not\"", UNOP_LOGICAL_NOT},
  {"Oadd", "\"+\"", UNOP_PLUS},
  {"Osubtract", "\"-\"", UNOP_NEG},
  {NULL, NULL}
}

Definition at line 840 of file ada-lang.c.

Referenced by is_ada_operator().

const char* attribute_names[] [static]
Initial value:
 {
  "<?>",

  "first",
  "last",
  "length",
  "image",
  "max",
  "min",
  "modulus",
  "pos",
  "size",
  "tag",
  "val",
  0
}

Definition at line 8460 of file ada-lang.c.

char* bound_name[] [static]
Initial value:
 {
  "LB0", "UB0", "LB1", "UB1", "LB2", "UB2", "LB3", "UB3",
  "LB4", "UB4", "LB5", "UB5", "LB6", "UB6", "LB7", "UB7"
}

Definition at line 1426 of file ada-lang.c.

Referenced by desc_index_type(), and desc_one_bound().

Definition at line 11920 of file ada-lang.c.

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

Definition at line 11814 of file ada-lang.c.

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

Definition at line 11868 of file ada-lang.c.

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

struct htab* decoded_names_store [static]

Definition at line 1287 of file ada-lang.c.

Referenced by _initialize_ada_language(), and ada_decode_symbol().

Initial value:
{
  "__gnat_debug_raise_exception", 
  "__gnat_unhandled_exception", 
  "__gnat_debug_raise_assert_failure", 
  ada_unhandled_exception_name_addr
}

Definition at line 11026 of file ada-lang.c.

Referenced by ada_exception_support_info_sniffer().

Initial value:
{
  "__gnat_raise_nodefer_with_msg", 
  "__gnat_unhandled_exception", 
  "system__assertions__raise_assert_failure",  
  ada_unhandled_exception_name_addr_from_raise
}

Definition at line 11038 of file ada-lang.c.

Referenced by ada_exception_support_info_sniffer().

Initial value:

Definition at line 306 of file ada-lang.c.

Referenced by is_known_support_routine().

Initial value:
 {
  ADA_KNOWN_RUNTIME_FILE_NAME_PATTERNS NULL
}

Definition at line 302 of file ada-lang.c.

Referenced by is_known_support_routine().

struct cmd_list_element* set_ada_list [static]

Definition at line 12844 of file ada-lang.c.

struct cmd_list_element* show_ada_list [static]

Definition at line 12845 of file ada-lang.c.

char* standard_exc[] [static]
Initial value:
 {
  "constraint_error",
  "program_error",
  "storage_error",
  "tasking_error"
}

Definition at line 10986 of file ada-lang.c.

Referenced by ada_exception_catchpoint_cond_string().

struct obstack symbol_list_obstack [static]

Definition at line 311 of file ada-lang.c.

Referenced by _initialize_ada_language(), and ada_lookup_symbol_list_worker().

int trust_pad_over_xvs = 1 [static]

Definition at line 8599 of file ada-lang.c.

unsigned int varsize_limit [static]
int warning_limit = 2 [static]

Definition at line 296 of file ada-lang.c.

Referenced by lim_warning().

int warnings_issued = 0 [static]

Definition at line 300 of file ada-lang.c.

Referenced by lim_warning(), and parse().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Defines