GDB (xrefs)
Classes | Macros | Typedefs | Enumerations | Functions | Variables
/tmp/gdb-8.1/gdb/ada-lang.c File Reference
#include "defs.h"
#include <ctype.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 "varobj.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 <sys/stat.h>
#include "ui-out.h"
#include "block.h"
#include "infcall.h"
#include "dictionary.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 "namespace.h"
#include "psymtab.h"
#include "value.h"
#include "mi/mi-common.h"
#include "arch-utils.h"
#include "cli/cli-utils.h"
#include "common/function-view.h"
#include "common/byte-vector.h"
#include <algorithm>

Go to the source code of this file.

Classes

struct  cache_entry
 
struct  ada_symbol_cache
 
struct  ada_inferior_data
 
struct  ada_pspace_data
 
struct  match_data
 
struct  exception_support_info
 
class  ada_catchpoint_location
 
struct  ada_catchpoint
 

Macros

#define TRUNCATION_TOWARDS_ZERO   ((-5 / 2) == -2)
 
#define HASH_SIZE   1009
 
#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_ADDR() ada_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,
  ada_primitive_type_storage_offset, 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 struct valuemake_array_descriptor (struct type *, struct value *)
 
static void ada_add_block_symbols (struct obstack *, const struct block *, const lookup_name_info &lookup_name, domain_enum, struct objfile *)
 
static void ada_add_all_symbols (struct obstack *, const struct block *, const lookup_name_info &lookup_name, domain_enum, int, int *)
 
static int is_nonfunction (struct block_symbol *, int)
 
static void add_defn_to_vec (struct obstack *, struct symbol *, const struct block *)
 
static int num_defns_collected (struct obstack *)
 
static struct block_symboldefns_collected (struct obstack *, int)
 
static struct valueresolve_subexp (expression_up *, int *, int, struct type *)
 
static void replace_operator_with_call (expression_up *, int, int, int, struct symbol *, const struct block *)
 
static int possible_user_operator_p (enum exp_opcode, struct value **)
 
static const 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 *, const char *, 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 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 bool wild_match (const char *name, const char *patn)
 
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 (const 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 block_symbol *, 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 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 symbol_name_matcher_ftypeada_get_symbol_name_matcher (const lookup_name_info &lookup_name)
 
static void ada_free_symbol_cache (struct ada_symbol_cache *sym_cache)
 
static void maint_set_ada_cmd (const char *args, int from_tty)
 
static void maint_show_ada_cmd (const char *args, int from_tty)
 
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 ada_pspace_dataget_ada_pspace_data (struct program_space *pspace)
 
static void ada_pspace_data_cleanup (struct program_space *pspace, void *data)
 
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 const 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
 
void ada_ensure_varsize_limit (const struct type *type)
 
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)
 
static char * ada_encode_1 (const char *decoded, bool throw_errors)
 
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 ada_sniff_from_mangled_name (const char *mangled, char **out)
 
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)
 
static void ada_unpack_from_contents (const gdb_byte *src, int bit_offset, int bit_size, gdb_byte *unpacked, int unpacked_len, int is_big_endian, int is_signed_type, int is_scalar)
 
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, 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 (expression_up *expp, int void_context_p)
 
static int return_match (struct type *func_type, struct type *context_type)
 
static int ada_resolve_function (struct block_symbol 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 block_symbol syms[], int nsyms)
 
static void ada_print_symbol_signature (struct ui_file *stream, struct symbol *sym, const struct type_print_options *flags)
 
int user_select_syms (struct block_symbol *syms, int nsyms, int max_results)
 
int get_selections (int *choices, int n_choices, int max_results, int is_all_choice, const 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, const 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 void ada_init_symbol_cache (struct ada_symbol_cache *sym_cache)
 
static struct ada_symbol_cacheada_get_symbol_cache (struct program_space *pspace)
 
static void ada_clear_symbol_cache (void)
 
static struct cache_entry ** find_entry (const char *name, domain_enum domain)
 
static int lookup_cached_symbol (const char *name, domain_enum domain, struct symbol **sym, const struct block **block)
 
static void cache_symbol (const char *name, domain_enum domain, struct symbol *sym, const struct block *block)
 
static symbol_name_match_type name_match_type_from_name (const char *lookup_name)
 
static int is_nonfunction (struct block_symbol 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 lookup_name_info &lookup_name, domain_enum domain)
 
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 block_symbol *syms, int nsyms)
 
static int remove_extra_symbols (struct block_symbol *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 block_symbol *syms, int nsyms, const struct block *current_block)
 
static void ada_add_local_symbols (struct obstack *obstackp, const lookup_name_info &lookup_name, const struct block *block, domain_enum domain)
 
static int aux_add_nonlocal_symbols (struct block *block, struct symbol *sym, void *data0)
 
static int ada_add_block_renamings (struct obstack *obstackp, const struct block *block, const lookup_name_info &lookup_name, domain_enum domain)
 
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 const char * ada_lookup_name (const lookup_name_info &lookup_name)
 
static void add_nonlocal_symbols (struct obstack *obstackp, const lookup_name_info &lookup_name, domain_enum domain, int global)
 
static int ada_lookup_symbol_list_worker (const lookup_name_info &lookup_name, const struct block *block, domain_enum domain, struct block_symbol **results, int full_search)
 
int ada_lookup_symbol_list (const char *name, const struct block *block, domain_enum domain, struct block_symbol **results)
 
static void ada_iterate_over_symbols (const struct block *block, const lookup_name_info &name, domain_enum domain, gdb::function_view< symbol_found_callback_ftype > callback)
 
void ada_lookup_encoded_symbol (const char *name, const struct block *block, domain_enum domain, struct block_symbol *info)
 
struct block_symbol ada_lookup_symbol (const char *name, const struct block *block0, domain_enum domain, int *is_a_field_of_this)
 
static struct block_symbol ada_lookup_symbol_nonlocal (const struct language_defn *langdef, const char *name, const struct block *block, const domain_enum domain)
 
static int is_valid_name_for_wild_match (const char *name0)
 
static bool full_match (const char *sym_name, const char *search_name)
 
static void ada_collect_symbol_completion_matches (completion_tracker &tracker, complete_symbol_mode mode, symbol_name_match_type name_match_type, const char *text, const char *word, enum type_code code)
 
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)
 
const 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, const char *name, int no_err)
 
static std::string type_as_string (struct type *type)
 
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 *templ)
 
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 int ada_is_redundant_range_encoding (struct type *range_type, struct type *encoding_type)
 
static int ada_is_redundant_index_type_desc (struct type *array_type, struct type *desc_type)
 
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_from_fixed (struct type *type, struct value *arg)
 
static struct valuecast_to_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)
 
static valueada_evaluate_subexp_for_cast (expression *exp, int *pos, enum noside noside, struct type *to_type)
 
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)
 
static struct typeada_scaling_type (struct type *type)
 
struct valueada_delta (struct type *type)
 
struct valueada_scaling_factor (struct type *type)
 
static int scan_discrim_bound (const char *str, int k, struct value *dval, LONGEST *px, int *pnew_k)
 
static struct valueget_var_value (const char *name, const char *err_msg)
 
bool get_int_var_value (const char *name, LONGEST &value)
 
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 char * ada_exception_message_1 (void)
 
static char * ada_exception_message (void)
 
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, enum ada_exception_catchpoint_kind ex)
 
static void ada_catchpoint_location_dtor (struct bp_location *bl)
 
static void create_excep_cond_exprs (struct ada_catchpoint *c, enum ada_exception_catchpoint_kind ex)
 
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 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 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 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 struct bp_locationallocate_location_catch_handlers (struct breakpoint *self)
 
static void re_set_catch_handlers (struct breakpoint *b)
 
static void check_status_catch_handlers (bpstat bs)
 
static enum print_stop_action print_it_catch_handlers (bpstat bs)
 
static void print_one_catch_handlers (struct breakpoint *b, struct bp_location **last_loc)
 
static void print_mention_catch_handlers (struct breakpoint *b)
 
static void print_recreate_catch_handlers (struct breakpoint *b, struct ui_file *fp)
 
static char * ada_get_next_arg (const char **argsp)
 
static void catch_ada_exception_command_split (const char *args, bool is_catch_handlers_cmd, 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 const 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, const 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 (const char *arg_entry, int from_tty, struct cmd_list_element *command)
 
static void catch_ada_handlers_command (const char *arg_entry, int from_tty, struct cmd_list_element *command)
 
static void catch_ada_assert_command_split (const char *args, char **cond_string)
 
static void catch_assert_command (const char *arg_entry, int from_tty, struct cmd_list_element *command)
 
static int ada_is_exception_sym (struct symbol *sym)
 
static int ada_is_non_standard_exception_sym (struct symbol *sym)
 
static void sort_remove_dups_ada_exceptions_list (std::vector< ada_exc_info > *exceptions, int skip)
 
static void ada_add_standard_exceptions (compiled_regex *preg, std::vector< ada_exc_info > *exceptions)
 
static void ada_add_exceptions_from_frame (compiled_regex *preg, struct frame_info *frame, std::vector< ada_exc_info > *exceptions)
 
static bool name_matches_regex (const char *name, compiled_regex *preg)
 
static void ada_add_global_exceptions (compiled_regex *preg, std::vector< ada_exc_info > *exceptions)
 
static std::vector< ada_exc_infoada_exceptions_list_1 (compiled_regex *preg)
 
std::vector< ada_exc_infoada_exceptions_list (const char *regexp)
 
static void info_exceptions_command (const char *regexp, int from_tty)
 
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 (struct parser_state *ps)
 
static bool do_wild_match (const char *symbol_search_name, const lookup_name_info &lookup_name, completion_match_result *comp_match_res)
 
static bool do_full_match (const char *symbol_search_name, const lookup_name_info &lookup_name, completion_match_result *comp_match_res)
 
static bool ada_symbol_name_matches (const char *symbol_search_name, const lookup_name_info &lookup_name, completion_match_result *comp_match_res)
 
static bool literal_symbol_name_matcher (const char *symbol_search_name, const lookup_name_info &lookup_name, completion_match_result *comp_match_res)
 
static struct valueada_read_var_value (struct symbol *var, const struct block *var_block, struct frame_info *frame)
 
static void set_ada_command (const char *arg, int from_tty)
 
static void show_ada_command (const char *args, int from_tty)
 
static void initialize_ada_catchpoint_ops (void)
 
static void ada_new_objfile_observer (struct objfile *objfile)
 
static void ada_free_objfile_observer (struct objfile *objfile)
 
void _initialize_ada_language (void)
 

Variables

static unsigned int varsize_limit
 
static const char ada_completer_word_break_characters []
 
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 cmd_list_elementmaint_set_ada_cmdlist
 
static struct cmd_list_elementmaint_show_ada_cmdlist
 
static int ada_ignore_descriptive_types_p = 0
 
static const struct inferior_data * ada_inferior_data
 
static const struct program_space_data * ada_pspace_data_handle
 
const struct ada_opname_map ada_opname_table []
 
static struct htab * decoded_names_store
 
static const char * bound_name []
 
static int print_signatures = 1
 
static const char * attribute_names []
 
static int trust_pad_over_xvs = 1
 
static const char * standard_exc []
 
static const struct exception_support_info default_exception_support_info
 
static const struct exception_support_info exception_support_info_fallback
 
static const 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 breakpoint_ops catch_handlers_breakpoint_ops
 
static const struct op_print ada_op_print_tab []
 
static const struct exp_descriptor ada_exp_descriptor
 
static const char * ada_extensions []
 
const struct language_defn ada_language_defn
 
static struct cmd_list_elementset_ada_list
 
static struct cmd_list_elementshow_ada_list
 

Macro Definition Documentation

◆ ADA_OPERATORS

#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)
#define OP_DEFN(op, len, args, binop)

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

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

◆ HASH_SIZE

#define HASH_SIZE   1009

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

Referenced by cache_symbol(), and find_entry().

◆ MAX_ADA_DIMENS

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

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

◆ OP_DEFN [1/3]

#define OP_DEFN (   op,
  len,
  args,
  binop 
)    case op: *oplenp = len; *argsp = args; break;

◆ OP_DEFN [2/3]

#define OP_DEFN (   op,
  len,
  args,
  binop 
)    case op: return #op;

◆ OP_DEFN [3/3]

#define OP_DEFN (   op,
  len,
  args,
  binop 
)    case op: *oplenp = len; *argsp = args; break;

◆ TRUNCATION_TOWARDS_ZERO

#define TRUNCATION_TOWARDS_ZERO   ((-5 / 2) == -2)

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

Referenced by ada_value_binop().

Typedef Documentation

◆ ada_unhandled_exception_name_addr_ftype

typedef CORE_ADDR() ada_unhandled_exception_name_addr_ftype(void)

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

Enumeration Type Documentation

◆ ada_primitive_types

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 
ada_primitive_type_storage_offset 
nr_ada_primitive_types 

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

Function Documentation

◆ _initialize_ada_language()

void _initialize_ada_language ( void  )

◆ ada_add_all_symbols()

static void ada_add_all_symbols ( struct obstack *  obstackp,
const struct block block,
const lookup_name_info lookup_name,
domain_enum  domain,
int  full_search,
int *  made_global_lookup_p 
)
static

◆ ada_add_block_renamings()

static int ada_add_block_renamings ( struct obstack *  obstackp,
const struct block block,
const lookup_name_info lookup_name,
domain_enum  domain 
)
static

◆ ada_add_block_symbols()

static void ada_add_block_symbols ( struct obstack *  obstackp,
const struct block block,
const lookup_name_info lookup_name,
domain_enum  domain,
struct objfile objfile 
)
static

◆ ada_add_exceptions_from_frame()

static void ada_add_exceptions_from_frame ( compiled_regex preg,
struct frame_info frame,
std::vector< ada_exc_info > *  exceptions 
)
static

◆ ada_add_global_exceptions()

static void ada_add_global_exceptions ( compiled_regex preg,
std::vector< ada_exc_info > *  exceptions 
)
static

◆ ada_add_local_symbols()

static void ada_add_local_symbols ( struct obstack *  obstackp,
const lookup_name_info lookup_name,
const struct block block,
domain_enum  domain 
)
static

◆ ada_add_standard_exceptions()

static void ada_add_standard_exceptions ( compiled_regex preg,
std::vector< ada_exc_info > *  exceptions 
)
static

◆ ada_aligned_type()

struct type* ada_aligned_type ( struct type type)

◆ ada_aligned_value_addr()

const gdb_byte* ada_aligned_value_addr ( struct type type,
const gdb_byte valaddr 
)

◆ ada_args_match()

static int ada_args_match ( struct symbol func,
struct value **  actuals,
int  n_actuals 
)
static

◆ ada_array_arity()

int ada_array_arity ( struct type type)

◆ ada_array_bound()

static LONGEST ada_array_bound ( struct value arr,
int  n,
int  which 
)
static

◆ ada_array_bound_from_type()

static LONGEST ada_array_bound_from_type ( struct type arr_type,
int  n,
int  which 
)
static

◆ ada_array_element_type()

struct type* ada_array_element_type ( struct type type,
int  nindices 
)

◆ ada_array_length()

static LONGEST ada_array_length ( struct value arr,
int  n 
)
static

◆ ada_attribute_name()

const char* ada_attribute_name ( enum exp_opcode  n)

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

References attribute_names.

Referenced by ada_evaluate_subexp(), and ada_print_subexp().

◆ ada_catchpoint_location_dtor()

static void ada_catchpoint_location_dtor ( struct bp_location bl)
static

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

References ada_catchpoint_location::excep_cond_expr.

◆ ada_check_typedef()

struct type* ada_check_typedef ( struct type type)

Definition at line 9307 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_check_typedef(), ada_coerce_to_simple_array_type(), ada_convert_actual(), ada_evaluate_subexp(), 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_is_tag_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_equal(), 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(), 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().

◆ ada_clear_symbol_cache()

static void ada_clear_symbol_cache ( void  )
static

◆ ada_coerce_ref()

static struct value * ada_coerce_ref ( struct value val0)
static

◆ ada_coerce_to_simple_array()

struct value* ada_coerce_to_simple_array ( struct value arr)

◆ ada_coerce_to_simple_array_ptr()

struct value* ada_coerce_to_simple_array_ptr ( struct value arr)

◆ ada_coerce_to_simple_array_type()

struct type* ada_coerce_to_simple_array_type ( struct type type)

◆ ada_collect_symbol_completion_matches()

static void ada_collect_symbol_completion_matches ( completion_tracker tracker,
complete_symbol_mode  mode,
symbol_name_match_type  name_match_type,
const char *  text,
const char *  word,
enum type_code  code 
)
static

◆ ada_convert_actual()

struct value* ada_convert_actual ( struct value actual,
struct type formal_type0 
)

◆ ada_decode()

const char* ada_decode ( const char *  encoded)

◆ ada_decode_symbol()

const char* ada_decode_symbol ( const struct general_symbol_info arg)

◆ ada_decoded_op_name()

static const char * ada_decoded_op_name ( enum exp_opcode  op)
static

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

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

Referenced by resolve_subexp().

◆ ada_delta()

struct value* ada_delta ( struct type type)

◆ ada_discrete_type_high_bound()

LONGEST ada_discrete_type_high_bound ( struct type type)

◆ ada_discrete_type_low_bound()

LONGEST ada_discrete_type_low_bound ( struct type type)

◆ ada_dump_subexp_body()

static int ada_dump_subexp_body ( struct expression exp,
struct ui_file stream,
int  elt 
)
static

◆ ada_encode()

char* ada_encode ( const char *  decoded)

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

References ada_encode_1(), and ada_opname_map::decoded.

Referenced by block_lookup(), type_from_tag(), and write_var_or_type().

◆ ada_encode_1()

static char* ada_encode_1 ( const char *  decoded,
bool  throw_errors 
)
static

◆ ada_ensure_varsize_limit()

void ada_ensure_varsize_limit ( const struct type type)

◆ ada_enum_name()

const char* ada_enum_name ( const char *  name)

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

References GROW_VECT, name, and xsnprintf().

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

◆ ada_evaluate_subexp()

static struct value* ada_evaluate_subexp ( struct type expect_type,
struct expression exp,
int *  pos,
enum noside noside   
)
static

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

References _, ada_aligned_type(), ada_array_arity(), ada_array_bound(), ada_array_bound_from_type(), ada_array_element_type(), ada_array_length(), ada_attribute_name(), ada_check_typedef(), ada_coerce_ref(), ada_coerce_to_simple_array(), ada_coerce_to_simple_array_ptr(), ada_discrete_type_high_bound(), ada_discrete_type_low_bound(), ada_ensure_varsize_limit(), ada_evaluate_subexp_for_cast(), ada_find_parallel_type(), ada_forward_operator_length(), ada_index_type(), ada_is_aligner_type(), ada_is_array_descriptor_type(), ada_is_constrained_packed_array_type(), ada_is_fixed_point_type(), ada_is_modular_type(), ada_is_simple_array_type(), ada_is_tagged_type(), ada_lookup_struct_elt_type(), ada_modulus(), ada_tag_type(), ada_to_fixed_value(), ada_type_name(), ada_type_of_array(), ada_typedef_target_type(), ada_value_assign(), ada_value_binop(), ada_value_cast(), ada_value_equal(), ada_value_ind(), ada_value_ptr_subscript(), ada_value_slice(), ada_value_slice_from_ptr(), ada_value_struct_elt(), ada_value_subscript(), ada_value_tag(), allocate_value(), assign_aggregate(), binop_promote(), builtin_type::builtin_double, builtin_type::builtin_int, builtin_type(), BYTES_TO_EXP_ELEM, call_function_by_hand(), call_internal_function(), cast_from_fixed(), cast_to_fixed(), check_typedef(), coerce_for_assign(), coerce_ref(), decode_constrained_packed_array_type(), desc_base_type(), discrete_type_p(), dynamic_template_type(), expression::elts, empty_array(), error(), error_call_unknown_return_type(), EVAL_AVOID_SIDE_EFFECTS, EVAL_NORMAL, EVAL_SKIP, eval_skip_value(), evaluate_subexp(), evaluate_subexp_standard(), evaluate_subexp_with_coercion(), expression::gdbarch, internal_error(), is_integral_type(), language_bool_type(), expression::language_defn, lim_warning(), exp_element::longconst, longest_to_int(), lookup_pointer_type(), lval_internalvar, lval_memory, name, not_lval, NULL_TYPE, exp_element::opcode, static_unwrap_type(), exp_element::string, exp_element::symbol, SYMBOL_DOMAIN, SYMBOL_PRINT_NAME, SYMBOL_TYPE, TARGET_CHAR_BIT, to_fixed_array_type(), to_fixed_range_type(), to_static_fixed_type(), exp_element::type, type, TYPE_CODE, TYPE_CODE_ARRAY, TYPE_CODE_ENUM, TYPE_CODE_FLT, TYPE_CODE_FUNC, TYPE_CODE_INT, TYPE_CODE_INTERNAL_FUNCTION, TYPE_CODE_PTR, TYPE_CODE_RANGE, TYPE_CODE_REF, TYPE_CODE_STRING, TYPE_CODE_STRUCT, TYPE_CODE_TYPEDEF, TYPE_CODE_UNION, TYPE_FIELD_BITSIZE, type_from_tag(), TYPE_HIGH_BOUND, TYPE_LENGTH, TYPE_LOW_BOUND, TYPE_TARGET_TYPE, UNDEF_DOMAIN, unop_promote(), unwrap_value(), value_addr(), value_as_address(), value_as_long(), value_at_lazy(), value_binop(), value_cast(), value_equal(), value_from_longest(), value_ind(), value_less(), VALUE_LVAL, value_neg(), value_pos_atr(), value_ref(), value_type(), value_val_atr(), and value_zero().

Referenced by aggregate_assign_from_choices(), aggregate_assign_others(), aggregate_assign_positional(), assign_aggregate(), assign_component(), and num_component_specs().

◆ ada_evaluate_subexp_for_cast()

static value* ada_evaluate_subexp_for_cast ( expression exp,
int *  pos,
enum noside  noside,
struct type to_type 
)
static

◆ ada_exception_breakpoint_ops()

static const struct breakpoint_ops* ada_exception_breakpoint_ops ( enum ada_exception_catchpoint_kind  ex)
static

◆ ada_exception_catchpoint_cond_string()

static char * ada_exception_catchpoint_cond_string ( const char *  excep_string,
enum ada_exception_catchpoint_kind  ex 
)
static

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

References ada_catch_handlers, standard_exc, xfree(), and xstrprintf().

Referenced by create_excep_cond_exprs().

◆ ada_exception_message()

static char* ada_exception_message ( void  )
static

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

References ada_exception_message_1(), CATCH, END_CATCH, RETURN_MASK_ERROR, and TRY.

Referenced by print_it_exception().

◆ ada_exception_message_1()

static char* ada_exception_message_1 ( void  )
static

◆ ada_exception_name_addr()

static CORE_ADDR ada_exception_name_addr ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
)
static

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

References _, ada_exception_name_addr_1(), CATCH, END_CATCH, RETURN_MASK_ERROR, TRY, and warning().

Referenced by print_it_exception().

◆ ada_exception_name_addr_1()

static CORE_ADDR ada_exception_name_addr_1 ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
)
static

◆ ada_exception_sal()

static struct symtab_and_line ada_exception_sal ( enum ada_exception_catchpoint_kind  ex,
char *  excep_string,
const char **  addr_string,
const struct breakpoint_ops **  ops 
)
static

◆ ada_exception_support_info_sniffer()

static void ada_exception_support_info_sniffer ( void  )
static

◆ ada_exception_sym_name()

static const char* ada_exception_sym_name ( enum ada_exception_catchpoint_kind  ex)
static

◆ ada_exceptions_list()

std::vector<ada_exc_info> ada_exceptions_list ( const char *  regexp)

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

References _, and ada_exceptions_list_1().

Referenced by info_exceptions_command(), and mi_cmd_info_ada_exceptions().

◆ ada_exceptions_list_1()

static std::vector<ada_exc_info> ada_exceptions_list_1 ( compiled_regex preg)
static

◆ ada_find_any_type()

static struct type * ada_find_any_type ( const char *  name)
static

◆ ada_find_any_type_symbol()

static struct symbol* ada_find_any_type_symbol ( const char *  name)
static

◆ ada_find_parallel_type()

struct type* ada_find_parallel_type ( struct type type,
const char *  suffix 
)

◆ ada_find_parallel_type_with_name()

static struct type * ada_find_parallel_type_with_name ( struct type type,
const char *  name 
)
static

◆ ada_find_printable_frame()

void ada_find_printable_frame ( struct frame_info fi)

Definition at line 12253 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().

◆ ada_find_renaming_symbol()

struct symbol* ada_find_renaming_symbol ( struct symbol name_sym,
const struct block block 
)

◆ ada_fixup_array_indexes_type()

void ada_fixup_array_indexes_type ( struct type index_desc_type)

◆ ada_fold_name()

char* ada_fold_name ( const char *  name)

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

References GROW_VECT, and name.

Referenced by ada_lookup_name_info::ada_lookup_name_info().

◆ ada_forward_operator_length()

static void ada_forward_operator_length ( struct expression exp,
int  pc,
int *  oplenp,
int *  argsp 
)
static

◆ ada_free_objfile_observer()

static void ada_free_objfile_observer ( struct objfile objfile)
static

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

References ada_clear_symbol_cache().

Referenced by _initialize_ada_language().

◆ ada_free_symbol_cache()

static void ada_free_symbol_cache ( struct ada_symbol_cache sym_cache)
static

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

References ada_symbol_cache::cache_space, and xfree().

Referenced by ada_pspace_data_cleanup().

◆ ada_get_base_type()

struct type* ada_get_base_type ( struct type raw_type)

◆ ada_get_decoded_type()

struct type* ada_get_decoded_type ( struct type type)

◆ ada_get_decoded_value()

struct value* ada_get_decoded_value ( struct value value)

◆ ada_get_field_index()

int ada_get_field_index ( const struct type type,
const char *  field_name,
int  maybe_missing 
)

◆ ada_get_gdb_completer_word_break_characters()

static const char* ada_get_gdb_completer_word_break_characters ( void  )
static

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

References ada_completer_word_break_characters.

◆ ada_get_next_arg()

static char* ada_get_next_arg ( const char **  argsp)
static

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

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

Referenced by catch_ada_exception_command_split().

◆ ada_get_symbol_cache()

static struct ada_symbol_cache* ada_get_symbol_cache ( struct program_space pspace)
static

◆ ada_get_symbol_name_matcher()

static symbol_name_matcher_ftype * ada_get_symbol_name_matcher ( const lookup_name_info lookup_name)
static

◆ ada_get_tsd_from_tag()

static struct value* ada_get_tsd_from_tag ( struct value tag)
static

◆ ada_get_tsd_type()

static struct type* ada_get_tsd_type ( struct inferior inf)
static

◆ ada_has_this_exception_support()

static int ada_has_this_exception_support ( const struct exception_support_info einfo)
static

◆ ada_identical_enum_types_p()

static int ada_identical_enum_types_p ( struct type type1,
struct type type2 
)
static

◆ ada_in_variant()

int ada_in_variant ( LONGEST  val,
struct type type,
int  field_num 
)

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

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

Referenced by ada_which_variant_applies().

◆ ada_index_struct_field()

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

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

References ada_index_struct_field_1(), and offset.

Referenced by assign_component().

◆ ada_index_struct_field_1()

static struct value * ada_index_struct_field_1 ( int *  index_p,
struct value arg,
int  offset,
struct type type 
)
static

◆ ada_index_type()

static struct type* ada_index_type ( struct type type,
int  n,
const char *  name 
)
static

◆ ada_inferior_data_cleanup()

static void ada_inferior_data_cleanup ( struct inferior inf,
void *  arg 
)
static

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

References xfree().

Referenced by _initialize_ada_language(), and ada_inferior_exit().

◆ ada_inferior_exit()

static void ada_inferior_exit ( struct inferior inf)
static

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

References ada_inferior_data_cleanup().

Referenced by _initialize_ada_language().

◆ ada_init_symbol_cache()

static void ada_init_symbol_cache ( struct ada_symbol_cache sym_cache)
static

◆ ada_is_aligner_type()

int ada_is_aligner_type ( struct type type)

◆ ada_is_array_descriptor_type()

int ada_is_array_descriptor_type ( struct type type)

◆ ada_is_array_type()

static int ada_is_array_type ( struct type type)
static

◆ ada_is_bogus_array_descriptor()

int ada_is_bogus_array_descriptor ( struct type type)

◆ ada_is_character_type()

int ada_is_character_type ( struct type type)

◆ ada_is_constrained_packed_array_type()

int ada_is_constrained_packed_array_type ( struct type type)

◆ ada_is_direct_array_type()

static int ada_is_direct_array_type ( struct type type)
static

◆ ada_is_dispatch_table_ptr_type()

static int ada_is_dispatch_table_ptr_type ( struct type type)
static

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

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

Referenced by ada_is_ignored_field().

◆ ada_is_exception_sym()

static int ada_is_exception_sym ( struct symbol sym)
static

◆ ada_is_fixed_point_type()

int ada_is_fixed_point_type ( struct type type)

◆ ada_is_ignored_field()

int ada_is_ignored_field ( struct type type,
int  field_num 
)

◆ ada_is_interface_tag()

static int ada_is_interface_tag ( struct type type)
static

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

References name, and TYPE_NAME.

Referenced by ada_is_ignored_field().

◆ ada_is_modular_type()

int ada_is_modular_type ( struct type type)

◆ ada_is_non_standard_exception_sym()

static int ada_is_non_standard_exception_sym ( struct symbol sym)
static

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

References ada_is_exception_sym(), standard_exc, and SYMBOL_LINKAGE_NAME.

Referenced by ada_add_global_exceptions().

◆ ada_is_others_clause()

int ada_is_others_clause ( struct type type,
int  field_num 
)

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

References name, and TYPE_FIELD_NAME.

Referenced by ada_which_variant_applies().

◆ ada_is_packed_array_type()

static int ada_is_packed_array_type ( struct type type)
static

◆ ada_is_parent_field()

int ada_is_parent_field ( struct type type,
int  field_num 
)

◆ ada_is_range_type_name()

int ada_is_range_type_name ( const char *  name)

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

References name.

Referenced by ada_print_type().

◆ ada_is_redundant_index_type_desc()

static int ada_is_redundant_index_type_desc ( struct type array_type,
struct type desc_type 
)
static

◆ ada_is_redundant_range_encoding()

static int ada_is_redundant_range_encoding ( struct type range_type,
struct type encoding_type 
)
static

◆ ada_is_simple_array_type()

int ada_is_simple_array_type ( struct type type)

◆ ada_is_string_type()

int ada_is_string_type ( struct type type)

◆ ada_is_system_address_type()

int ada_is_system_address_type ( struct type type)

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

References TYPE_NAME.

Referenced by ada_val_print_num().

◆ ada_is_tag_type()

int ada_is_tag_type ( struct type type)

◆ ada_is_tagged_type()

int ada_is_tagged_type ( struct type type,
int  refok 
)

◆ ada_is_unconstrained_packed_array_type()

static int ada_is_unconstrained_packed_array_type ( struct type type)
static

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

References ada_is_array_descriptor_type(), and ada_is_packed_array_type().

Referenced by ada_type_of_array().

◆ ada_is_variant_part()

int ada_is_variant_part ( struct type type,
int  field_num 
)

◆ ada_is_wrapper_field()

int ada_is_wrapper_field ( struct type type,
int  field_num 
)

◆ ada_iterate_over_symbols()

static void ada_iterate_over_symbols ( const struct block block,
const lookup_name_info name,
domain_enum  domain,
gdb::function_view< symbol_found_callback_ftype callback 
)
static

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

References ada_lookup_symbol_list_worker(), do_cleanups(), make_cleanup(), name, and xfree().

◆ ada_la_decode()

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

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

References ada_decode().

◆ ada_language_arch_info()

static void ada_language_arch_info ( struct gdbarch gdbarch,
struct language_arch_info lai 
)
static

◆ ada_lookup_encoded_symbol()

void ada_lookup_encoded_symbol ( const char *  name,
const struct block block,
domain_enum  domain,
struct block_symbol info 
)

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

References ada_lookup_symbol(), gdb_assert, name, and string.

Referenced by write_object_renaming().

◆ ada_lookup_name()

static const char* ada_lookup_name ( const lookup_name_info lookup_name)
static

◆ ada_lookup_simple_minsym()

struct bound_minimal_symbol ada_lookup_simple_minsym ( const char *  name)

◆ ada_lookup_struct_elt_type()

static struct type * ada_lookup_struct_elt_type ( struct type type,
const char *  name,
int  refok,
int  noerr 
)
static

◆ ada_lookup_symbol()

struct block_symbol ada_lookup_symbol ( const char *  name,
const struct block block0,
domain_enum  domain,
int *  is_a_field_of_this 
)

◆ ada_lookup_symbol_list()

int ada_lookup_symbol_list ( const char *  name,
const struct block block,
domain_enum  domain,
struct block_symbol **  results 
)

◆ ada_lookup_symbol_list_worker()

static int ada_lookup_symbol_list_worker ( const lookup_name_info lookup_name,
const struct block block,
domain_enum  domain,
struct block_symbol **  results,
int  full_search 
)
static

◆ ada_lookup_symbol_nonlocal()

static struct block_symbol ada_lookup_symbol_nonlocal ( const struct language_defn langdef,
const char *  name,
const struct block block,
const domain_enum  domain 
)
static

◆ ada_main_name()

char* ada_main_name ( void  )

◆ ada_modulus()

ULONGEST ada_modulus ( struct type type)

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

References TYPE_HIGH_BOUND.

Referenced by ada_evaluate_subexp(), ada_print_type(), and decode_constrained_packed_array().

◆ ada_name_prefix_len()

int ada_name_prefix_len ( const char *  name)

◆ ada_new_objfile_observer()

static void ada_new_objfile_observer ( struct objfile objfile)
static

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

References ada_clear_symbol_cache().

Referenced by _initialize_ada_language().

◆ ada_op_name()

static const char * ada_op_name ( enum exp_opcode  opcode)
static

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

References ADA_OPERATORS, and op_name_standard().

◆ ada_operator_check()

static int ada_operator_check ( struct expression exp,
int  pos,
int(*)(struct objfile *objfile, void *data)  objfile_func,
void *  data 
)
static

◆ ada_operator_length()

static void ada_operator_length ( const struct expression exp,
int  pc,
int *  oplenp,
int *  argsp 
)
static

◆ ada_parent_type()

struct type* ada_parent_type ( struct type type)

◆ ada_parse_renaming()

enum ada_renaming_category ada_parse_renaming ( struct symbol sym,
const char **  renamed_entity,
int *  len,
const char **  renaming_expr 
)

◆ ada_prefer_type()

int ada_prefer_type ( struct type type0,
struct type type1 
)

◆ ada_print_array_index()

static void ada_print_array_index ( struct value index_value,
struct ui_file stream,
const struct value_print_options options 
)
static

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

References fprintf_filtered(), and LA_VALUE_PRINT.

◆ ada_print_subexp()

static void ada_print_subexp ( struct expression exp,
int *  pos,
struct ui_file stream,
enum precedence  prec 
)
static

◆ ada_print_symbol_signature()

static void ada_print_symbol_signature ( struct ui_file stream,
struct symbol sym,
const struct type_print_options flags 
)
static

◆ ada_promote_array_of_integrals()

static struct value* ada_promote_array_of_integrals ( struct type type,
struct value val 
)
static

◆ ada_pspace_data_cleanup()

static void ada_pspace_data_cleanup ( struct program_space pspace,
void *  data 
)
static

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

References ada_free_symbol_cache(), ada_pspace_data::sym_cache, and xfree().

Referenced by _initialize_ada_language().

◆ ada_read_renaming_var_value()

static struct value* ada_read_renaming_var_value ( struct symbol renaming_sym,
const struct block block 
)
static

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

References evaluate_expression(), parse_exp_1(), and SYMBOL_LINKAGE_NAME.

Referenced by ada_read_var_value().

◆ ada_read_var_value()

static struct value* ada_read_var_value ( struct symbol var,
const struct block var_block,
struct frame_info frame 
)
static

◆ ada_remove_po_subprogram_suffix()

static void ada_remove_po_subprogram_suffix ( const char *  encoded,
int *  len 
)
static

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

References ada_opname_map::encoded.

Referenced by ada_decode(), and find_old_style_renaming_symbol().

◆ ada_remove_trailing_digits()

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

◆ ada_remove_Xbn_suffix()

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

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

References ada_opname_map::encoded.

Referenced by find_old_style_renaming_symbol().

◆ ada_resolve_function() [1/2]

static int ada_resolve_function ( struct block_symbol ,
int  ,
struct value **  ,
int  ,
const char *  ,
struct type  
)
static

Referenced by resolve_subexp().

◆ ada_resolve_function() [2/2]

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

◆ ada_same_array_size_p()

static int ada_same_array_size_p ( struct type t1,
struct type t2 
)
static

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

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

Referenced by coerce_for_assign().

◆ ada_scaling_factor()

struct value* ada_scaling_factor ( struct type type)

◆ ada_scaling_type()

static struct type* ada_scaling_type ( struct type type)
static

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

References builtin_type::builtin_long_double, builtin_type(), and get_type_arch().

Referenced by ada_delta(), and ada_scaling_factor().

◆ ada_scan_number()

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

◆ ada_search_struct_field()

static struct value * ada_search_struct_field ( const char *  name,
struct value arg,
int  offset,
struct type type 
)
static

◆ ada_sniff_from_mangled_name()

static int ada_sniff_from_mangled_name ( const char *  mangled,
char **  out 
)
static

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

References ada_decode().

◆ ada_symbol_name_matches()

static bool ada_symbol_name_matches ( const char *  symbol_search_name,
const lookup_name_info lookup_name,
completion_match_result comp_match_res 
)
static

◆ ada_tag_name()

const char* ada_tag_name ( struct value tag)

◆ ada_tag_name_from_tsd()

static char* ada_tag_name_from_tsd ( struct value tsd)
static

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

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

Referenced by ada_tag_name().

◆ ada_tag_type()

struct type* ada_tag_type ( struct value val)

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

References ada_lookup_struct_elt_type(), and value_type().

Referenced by ada_evaluate_subexp().

◆ ada_tag_value_at_base_address()

struct value* ada_tag_value_at_base_address ( struct value obj)

◆ ada_template_to_fixed_record_type_1()

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 
)

◆ ada_to_fixed_type()

struct type* ada_to_fixed_type ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval,
int  check_tag 
)

◆ ada_to_fixed_type_1()

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

◆ ada_to_fixed_value()

struct value* ada_to_fixed_value ( struct value val)

◆ ada_to_fixed_value_create()

static struct value * ada_to_fixed_value_create ( struct type type0,
CORE_ADDR  address,
struct value val0 
)
static

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

References ada_to_fixed_type(), and value_from_contents_and_address().

Referenced by ada_to_fixed_value().

◆ ada_type_match()

static int ada_type_match ( struct type ftype,
struct type atype,
int  may_deref 
)
static

◆ ada_type_name()

const char* ada_type_name ( struct type type)

◆ ada_type_of_array()

struct type* ada_type_of_array ( struct value arr,
int  bounds 
)

◆ ada_typedef_target_type()

static struct type* ada_typedef_target_type ( struct type type)
static

◆ ada_unhandled_exception_name_addr()

static CORE_ADDR ada_unhandled_exception_name_addr ( void  )
static

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

References parse_and_eval_address().

◆ ada_unhandled_exception_name_addr_from_raise()

static CORE_ADDR ada_unhandled_exception_name_addr_from_raise ( void  )
static

◆ ada_unpack_from_contents()

static void ada_unpack_from_contents ( const gdb_byte src,
int  bit_offset,
int  bit_size,
gdb_byte unpacked,
int  unpacked_len,
int  is_big_endian,
int  is_signed_type,
int  is_scalar 
)
static

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

References _, error(), and HOST_CHAR_BIT.

Referenced by ada_value_primitive_packed_val().

◆ ada_unqualified_name()

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

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

Referenced by ada_lookup_name_info::matches().

◆ ada_update_initial_language()

enum language ada_update_initial_language ( enum language  lang)

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

References language_ada, and lookup_minimal_symbol().

Referenced by ada_exception_support_info_sniffer().

◆ ada_value_assign()

static struct value* ada_value_assign ( struct value toval,
struct value fromval 
)
static

◆ ada_value_binop()

static struct value* ada_value_binop ( struct value arg1,
struct value arg2,
enum exp_opcode  op 
)
static

◆ ada_value_cast()

static struct value* ada_value_cast ( struct type type,
struct value arg2 
)
static

◆ ada_value_equal()

static int ada_value_equal ( struct value arg1,
struct value arg2 
)
static

◆ ada_value_ind()

struct value* ada_value_ind ( struct value val0)

◆ ada_value_primitive_field()

static struct value * ada_value_primitive_field ( struct value arg1,
int  offset,
int  fieldno,
struct type arg_type 
)
static

◆ ada_value_primitive_packed_val()

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 
)

◆ ada_value_ptr_subscript()

static struct value* ada_value_ptr_subscript ( struct value arr,
int  arity,
struct value **  ind 
)
static

◆ ada_value_slice()

static struct value* ada_value_slice ( struct value array,
int  low,
int  high 
)
static

◆ ada_value_slice_from_ptr()

static struct value* ada_value_slice_from_ptr ( struct value array_ptr,
struct type type,
int  low,
int  high 
)
static

◆ ada_value_struct_elt()

struct value* ada_value_struct_elt ( struct value arg,
const char *  name,
int  no_err 
)

◆ ada_value_subscript()

struct value* ada_value_subscript ( struct value arr,
int  arity,
struct value **  ind 
)

◆ ada_value_tag()

struct value* ada_value_tag ( struct value val)

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

References ada_value_struct_elt().

Referenced by ada_evaluate_subexp(), and ada_tag_value_at_base_address().

◆ ada_variant_discrim_name()

const char* ada_variant_discrim_name ( struct type type0)

◆ ada_variant_discrim_type()

struct type* ada_variant_discrim_type ( struct type var_type,
struct type outer_type 
)

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

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

Referenced by print_variant_clauses().

◆ ada_which_variant_applies()

int ada_which_variant_applies ( struct type var_type,
struct type outer_type,
const gdb_byte outer_valaddr 
)

◆ add_angle_brackets()

static char* add_angle_brackets ( const char *  str)
static

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

References xfree(), and xstrprintf().

Referenced by ada_lookup_name_info::matches().

◆ add_component_interval()

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

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

References _, error(), and size.

Referenced by aggregate_assign_from_choices(), and aggregate_assign_positional().

◆ add_defn_to_vec()

static void add_defn_to_vec ( struct obstack *  obstackp,
struct symbol sym,
const struct block block 
)
static

◆ add_nonlocal_symbols()

static void add_nonlocal_symbols ( struct obstack *  obstackp,
const lookup_name_info lookup_name,
domain_enum  domain,
int  global 
)
static

◆ add_symbols_from_enclosing_procs()

static void add_symbols_from_enclosing_procs ( struct obstack *  obstackp,
const lookup_name_info lookup_name,
domain_enum  domain 
)
static

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

Referenced by ada_add_local_symbols().

◆ advance_wild_match()

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

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

References name, and startswith().

Referenced by wild_match().

◆ aggregate_assign_from_choices()

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

◆ aggregate_assign_others()

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 10221 of file ada-lang.c.

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

Referenced by assign_aggregate().

◆ aggregate_assign_positional()

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

◆ align_value()

static unsigned int align_value ( unsigned int  off,
unsigned int  alignment 
)
static

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

Referenced by ada_template_to_fixed_record_type_1().

◆ allocate_location_catch_assert()

static struct bp_location* allocate_location_catch_assert ( struct breakpoint self)
static

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

References ada_catch_assert, and allocate_location_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ allocate_location_catch_exception()

static struct bp_location* allocate_location_catch_exception ( struct breakpoint self)
static

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

References ada_catch_exception, and allocate_location_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ allocate_location_catch_exception_unhandled()

static struct bp_location* allocate_location_catch_exception_unhandled ( struct breakpoint self)
static

◆ allocate_location_catch_handlers()

static struct bp_location* allocate_location_catch_handlers ( struct breakpoint self)
static

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

References ada_catch_handlers, and allocate_location_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ allocate_location_exception()

static struct bp_location* allocate_location_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint self 
)
static

◆ assign_aggregate()

static struct value* assign_aggregate ( struct value container,
struct value lhs,
struct expression exp,
int *  pos,
enum noside noside   
)
static

◆ assign_component()

static void assign_component ( struct value container,
struct value lhs,
LONGEST  index,
struct expression exp,
int *  pos 
)
static

◆ aux_add_nonlocal_symbols()

static int aux_add_nonlocal_symbols ( struct block block,
struct symbol sym,
void *  data0 
)
static

◆ cache_symbol()

static void cache_symbol ( const char *  name,
domain_enum  domain,
struct symbol sym,
const struct block block 
)
static

◆ cast_from_fixed()

static struct value* cast_from_fixed ( struct type type,
struct value arg 
)
static

◆ cast_to_fixed()

static struct value* cast_to_fixed ( struct type type,
struct value arg 
)
static

◆ catch_ada_assert_command_split()

static void catch_ada_assert_command_split ( const char *  args,
char **  cond_string 
)
static

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

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

Referenced by catch_assert_command().

◆ catch_ada_exception_command()

static void catch_ada_exception_command ( const char *  arg_entry,
int  from_tty,
struct cmd_list_element command 
)
static

◆ catch_ada_exception_command_split()

static void catch_ada_exception_command_split ( const char *  args,
bool  is_catch_handlers_cmd,
enum ada_exception_catchpoint_kind ex,
char **  excep_string,
char **  cond_string 
)
static

◆ catch_ada_handlers_command()

static void catch_ada_handlers_command ( const char *  arg_entry,
int  from_tty,
struct cmd_list_element command 
)
static

◆ catch_assert_command()

static void catch_assert_command ( const char *  arg_entry,
int  from_tty,
struct cmd_list_element command 
)
static

◆ check_status_catch_assert()

static void check_status_catch_assert ( bpstat  bs)
static

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

References ada_catch_assert, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ check_status_catch_exception()

static void check_status_catch_exception ( bpstat  bs)
static

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

References ada_catch_exception, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ check_status_catch_exception_unhandled()

static void check_status_catch_exception_unhandled ( bpstat  bs)
static

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

References ada_catch_exception_unhandled, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ check_status_catch_handlers()

static void check_status_catch_handlers ( bpstat  bs)
static

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

References ada_catch_handlers, and check_status_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ check_status_exception()

static void check_status_exception ( enum ada_exception_catchpoint_kind  ex,
bpstat  bs 
)
static

◆ coerce_for_assign()

static struct value* coerce_for_assign ( struct type type,
struct value val 
)
static

◆ coerce_unspec_val_to_type()

static struct value * coerce_unspec_val_to_type ( struct value val,
struct type type 
)
static

◆ compare_names()

static int compare_names ( const char *  string1,
const char *  string2 
)
static

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

References case_sensitive_off, case_sensitive_on, and compare_names_with_case().

Referenced by add_nonlocal_symbols().

◆ compare_names_with_case()

static int compare_names_with_case ( const char *  string1,
const char *  string2,
enum case_sensitivity  casing 
)
static

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

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

Referenced by compare_names().

◆ cond_offset_host()

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

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

References offset.

Referenced by ada_template_to_fixed_record_type_1(), and to_record_with_fixed_variant_part().

◆ cond_offset_target()

static CORE_ADDR cond_offset_target ( CORE_ADDR  address,
long  offset 
)
static

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

References value::address, and offset.

Referenced by ada_template_to_fixed_record_type_1(), and to_record_with_fixed_variant_part().

◆ constrained_packed_array_type()

static struct type * constrained_packed_array_type ( struct type type,
long *  elt_bits 
)
static

◆ create_ada_exception_catchpoint()

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 
)

◆ create_excep_cond_exprs()

static void create_excep_cond_exprs ( struct ada_catchpoint c,
enum ada_exception_catchpoint_kind  ex 
)
static

◆ decode_constrained_packed_array()

static struct value * decode_constrained_packed_array ( struct value arr)
static

◆ decode_constrained_packed_array_type()

static struct type * decode_constrained_packed_array_type ( struct type type)
static

◆ decode_packed_array_bitsize()

static long decode_packed_array_bitsize ( struct type type)
static

◆ defns_collected()

static struct block_symbol * defns_collected ( struct obstack *  obstackp,
int  finish 
)
static

◆ desc_arity()

static int desc_arity ( struct type type)
static

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

References desc_base_type(), and TYPE_NFIELDS.

Referenced by ada_array_arity(), and ada_is_array_descriptor_type().

◆ desc_base_type()

static struct type * desc_base_type ( struct type type)
static

◆ desc_bound_bitpos()

static int desc_bound_bitpos ( struct type type,
int  i,
int  which 
)
static

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

References desc_base_type(), and TYPE_FIELD_BITPOS.

Referenced by make_array_descriptor().

◆ desc_bound_bitsize()

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

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

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

Referenced by make_array_descriptor().

◆ desc_bounds()

static struct value * desc_bounds ( struct value arr)
static

◆ desc_bounds_type()

static struct type * desc_bounds_type ( struct type type)
static

◆ desc_data()

static struct value * desc_data ( struct value arr)
static

◆ desc_data_target_type()

static struct type * desc_data_target_type ( struct type type)
static

◆ desc_index_type()

static struct type * desc_index_type ( struct type type,
int  i 
)
static

Definition at line 1876 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().

◆ desc_one_bound()

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

Definition at line 1841 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().

◆ discrete_type_p()

static int discrete_type_p ( struct type type)
static

◆ do_full_match()

static bool do_full_match ( const char *  symbol_search_name,
const lookup_name_info lookup_name,
completion_match_result comp_match_res 
)
static

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

References ada_lookup_name(), full_match(), and symbol_search_name().

Referenced by ada_get_symbol_name_matcher().

◆ do_wild_match()

static bool do_wild_match ( const char *  symbol_search_name,
const lookup_name_info lookup_name,
completion_match_result comp_match_res 
)
static

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

References ada_lookup_name(), symbol_search_name(), and wild_match().

Referenced by ada_get_symbol_name_matcher().

◆ dynamic_template_type()

static struct type* dynamic_template_type ( struct type type)
static

◆ emit_char()

static void emit_char ( int  c,
struct type type,
struct ui_file stream,
int  quoter 
)
static

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

References ada_emit_char().

◆ empty_array()

static struct value* empty_array ( struct type arr_type,
int  low 
)
static

◆ empty_record()

static struct type* empty_record ( struct type templ)
static

◆ encoded_ordered_before()

static int encoded_ordered_before ( const char *  N0,
const char *  N1 
)
static

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

Referenced by sort_choices().

◆ ensure_lval()

static struct value* ensure_lval ( struct value val)
static

◆ equiv_types()

static int equiv_types ( struct type type0,
struct type type1 
)
static

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

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

Referenced by lesseq_defined_than().

◆ evaluate_subexp_type()

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

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

References EVAL_AVOID_SIDE_EFFECTS, evaluate_subexp(), and NULL_TYPE.

Referenced by resolve_subexp().

◆ fat_pntr_bounds_bitpos()

static int fat_pntr_bounds_bitpos ( struct type type)
static

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

References desc_base_type(), and TYPE_FIELD_BITPOS.

Referenced by make_array_descriptor().

◆ fat_pntr_bounds_bitsize()

static int fat_pntr_bounds_bitsize ( struct type type)
static

◆ fat_pntr_data_bitpos()

static int fat_pntr_data_bitpos ( struct type type)
static

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

References desc_base_type(), and TYPE_FIELD_BITPOS.

Referenced by make_array_descriptor().

◆ fat_pntr_data_bitsize()

static int fat_pntr_data_bitsize ( struct type type)
static

◆ field_alignment()

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

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

References name, startswith(), TARGET_CHAR_BIT, and TYPE_FIELD_NAME.

Referenced by ada_template_to_fixed_record_type_1().

◆ field_name_match()

static int field_name_match ( const char *  field_name,
const char *  target 
)
static

◆ find_entry()

static struct cache_entry** find_entry ( const char *  name,
domain_enum  domain 
)
static

◆ find_old_style_renaming_symbol()

static struct symbol * find_old_style_renaming_symbol ( const char *  name,
const struct block block 
)
static

◆ find_parallel_type_by_descriptive_type()

static struct type* find_parallel_type_by_descriptive_type ( struct type type,
const char *  name 
)
static

◆ find_struct_field()

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

◆ fixed_type_info()

static const char* fixed_type_info ( struct type type)
static

◆ full_match()

static bool full_match ( const char *  sym_name,
const char *  search_name 
)
static

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

References is_name_suffix(), and startswith().

Referenced by do_full_match().

◆ get_ada_inferior_data()

static struct ada_inferior_data* get_ada_inferior_data ( struct inferior inf)
static

◆ get_ada_pspace_data()

static struct ada_pspace_data* get_ada_pspace_data ( struct program_space pspace)
static

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

References ada_pspace_data_handle, and XCNEW.

Referenced by ada_get_symbol_cache().

◆ get_base_type()

static struct type* get_base_type ( struct type type)
static

◆ get_int_var_value()

bool get_int_var_value ( const char *  name,
LONGEST value 
)

◆ get_selections()

int get_selections ( int *  choices,
int  n_choices,
int  max_results,
int  is_all_choice,
const char *  annotation_suffix 
)

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

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

Referenced by user_select_syms().

◆ get_var_value()

static struct value* get_var_value ( const char *  name,
const char *  err_msg 
)
static

◆ grow_vect()

void* grow_vect ( void *  vect,
size_t *  size,
size_t  min_size,
int  element_size 
)

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

References size, and xrealloc().

◆ has_negatives()

static int has_negatives ( struct type type)
static

◆ info_exceptions_command()

static void info_exceptions_command ( const char *  regexp,
int  from_tty 
)
static

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

References _, ada_exceptions_list(), get_current_arch(), paddress(), and printf_filtered().

Referenced by _initialize_ada_language().

◆ initialize_ada_catchpoint_ops()

static void initialize_ada_catchpoint_ops ( void  )
static

◆ integer_type_p()

static int integer_type_p ( struct type type)
static

Definition at line 4179 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().

◆ is_ada95_tag()

static int is_ada95_tag ( struct value tag)
static

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

References ada_value_struct_elt().

Referenced by ada_tag_value_at_base_address().

◆ is_dynamic_field()

static int is_dynamic_field ( struct type templ_type,
int  field_num 
)
static

◆ is_known_support_routine()

static int is_known_support_routine ( struct frame_info frame)
static

◆ is_lower_alphanum()

static int is_lower_alphanum ( const char  c)
static

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

Referenced by ada_decode().

◆ is_name_suffix()

static int is_name_suffix ( const char *  str)
static

◆ is_nondebugging_type()

static int is_nondebugging_type ( struct type type)
static

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

References ada_type_name(), and name.

Referenced by remove_extra_symbols().

◆ is_nonfunction() [1/2]

static int is_nonfunction ( struct block_symbol ,
int   
)
static

◆ is_nonfunction() [2/2]

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

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

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

◆ is_package_name()

static int is_package_name ( const char *  name)
static

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

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

Referenced by old_renaming_is_invisible().

◆ is_suffix()

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

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

Referenced by is_thin_pntr(), and thin_descriptor_type().

◆ is_thick_pntr()

static int is_thick_pntr ( struct type type)
static

◆ is_thin_pntr()

static int is_thin_pntr ( struct type type)
static

◆ is_unchecked_variant()

static int is_unchecked_variant ( struct type var_type,
struct type outer_type 
)
static

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

References ada_lookup_struct_elt_type(), and ada_variant_discrim_name().

Referenced by to_fixed_variant_branch_type().

◆ is_valid_name_for_wild_match()

static int is_valid_name_for_wild_match ( const char *  name0)
static

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

References ada_decode().

Referenced by wild_match().

◆ lesseq_defined_than()

static int lesseq_defined_than ( struct symbol sym0,
struct symbol sym1 
)
static

◆ lim_warning()

static void static void lim_warning ( const char *  format,
  ... 
)
static

◆ literal_symbol_name_matcher()

static bool literal_symbol_name_matcher ( const char *  symbol_search_name,
const lookup_name_info lookup_name,
completion_match_result comp_match_res 
)
static

◆ lookup_cached_symbol()

static int lookup_cached_symbol ( const char *  name,
domain_enum  domain,
struct symbol **  sym,
const struct block **  block 
)
static

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

References cache_entry::domain, find_entry(), name, and cache_entry::sym.

Referenced by ada_add_all_symbols(), and standard_lookup().

◆ maint_set_ada_cmd()

static void maint_set_ada_cmd ( const char *  args,
int  from_tty 
)
static

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

References all_commands, gdb_stdout, help_list(), and maint_set_ada_cmdlist.

Referenced by _initialize_ada_language().

◆ maint_show_ada_cmd()

static void maint_show_ada_cmd ( const char *  args,
int  from_tty 
)
static

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

References cmd_show_list(), and maint_show_ada_cmdlist.

Referenced by _initialize_ada_language().

◆ make_array_descriptor()

static struct value * make_array_descriptor ( struct type type,
struct value arr 
)
static

◆ max_of_size()

static LONGEST max_of_size ( int  size)
static

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

References size.

Referenced by max_of_type(), and min_of_size().

◆ max_of_type()

static LONGEST max_of_type ( struct type t)
static

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

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

Referenced by ada_discrete_type_high_bound().

◆ min_of_size()

static LONGEST min_of_size ( int  size)
static

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

References max_of_size(), and size.

Referenced by min_of_type().

◆ min_of_type()

static LONGEST min_of_type ( struct type t)
static

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

References min_of_size(), TYPE_LENGTH, and TYPE_UNSIGNED.

Referenced by ada_discrete_type_low_bound().

◆ move_bits()

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 2669 of file ada-lang.c.

References HOST_CHAR_BIT.

Referenced by ada_value_assign(), and value_assign_to_component().

◆ name_match_type_from_name()

static symbol_name_match_type name_match_type_from_name ( const char *  lookup_name)
static

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

References FULL, and WILD.

Referenced by ada_lookup_simple_minsym(), and ada_lookup_symbol_list().

◆ name_matches_regex()

static bool name_matches_regex ( const char *  name,
compiled_regex preg 
)
static

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

References ada_decode(), compiled_regex::exec(), and name.

Referenced by ada_add_global_exceptions().

◆ num_component_specs()

static int num_component_specs ( struct expression exp,
int  pc 
)
static

◆ num_defns_collected()

static int num_defns_collected ( struct obstack *  obstackp)
static

◆ num_visible_fields()

static int num_visible_fields ( struct type type)
static

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

References find_struct_field().

Referenced by assign_aggregate().

◆ numeric_type_p()

static int numeric_type_p ( struct type type)
static

Definition at line 4156 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().

◆ old_renaming_is_invisible()

static int old_renaming_is_invisible ( const struct symbol sym,
const char *  function_name 
)
static

◆ parse()

static int parse ( struct parser_state ps)
static

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

References ada_parse(), cleanup_check::ps, and warnings_issued.

Referenced by mi_cmd_execute(), mi_parse(), and mi_parse_argv().

◆ parse_old_style_renaming()

static enum ada_renaming_category parse_old_style_renaming ( struct type type,
const char **  renamed_entity,
int *  len,
const char **  renaming_expr 
)
static

◆ pos_atr()

static LONGEST pos_atr ( struct value arg)
static

◆ possible_user_operator_p() [1/2]

static int possible_user_operator_p ( enum  exp_opcode,
struct value **   
)
static

Referenced by resolve_subexp().

◆ possible_user_operator_p() [2/2]

static int possible_user_operator_p ( enum exp_opcode  op,
struct value args[] 
)
static

◆ print_it_catch_assert()

static enum print_stop_action print_it_catch_assert ( bpstat  bs)
static

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

References ada_catch_assert, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_it_catch_exception()

static enum print_stop_action print_it_catch_exception ( bpstat  bs)
static

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

References ada_catch_exception, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_it_catch_exception_unhandled()

static enum print_stop_action print_it_catch_exception_unhandled ( bpstat  bs)
static

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

References ada_catch_exception_unhandled, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_it_catch_handlers()

static enum print_stop_action print_it_catch_handlers ( bpstat  bs)
static

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

References ada_catch_handlers, and print_it_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_it_exception()

static enum print_stop_action print_it_exception ( enum ada_exception_catchpoint_kind  ex,
bpstat  bs 
)
static

◆ print_mention_catch_assert()

static void print_mention_catch_assert ( struct breakpoint b)
static

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

References ada_catch_assert, and print_mention_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_mention_catch_exception()

static void print_mention_catch_exception ( struct breakpoint b)
static

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

References ada_catch_exception, and print_mention_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_mention_catch_exception_unhandled()

static void print_mention_catch_exception_unhandled ( struct breakpoint b)
static

◆ print_mention_catch_handlers()

static void print_mention_catch_handlers ( struct breakpoint b)
static

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

References ada_catch_handlers, and print_mention_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_mention_exception()

static void print_mention_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
)
static

◆ print_one_catch_assert()

static void print_one_catch_assert ( struct breakpoint b,
struct bp_location **  last_loc 
)
static

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

References ada_catch_assert, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_one_catch_exception()

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

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

References ada_catch_exception, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_one_catch_exception_unhandled()

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

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

References ada_catch_exception_unhandled, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_one_catch_handlers()

static void print_one_catch_handlers ( struct breakpoint b,
struct bp_location **  last_loc 
)
static

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

References ada_catch_handlers, and print_one_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_one_exception()

static void print_one_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b,
struct bp_location **  last_loc 
)
static

◆ print_recreate_catch_assert()

static void print_recreate_catch_assert ( struct breakpoint b,
struct ui_file fp 
)
static

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

References ada_catch_assert, and print_recreate_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_recreate_catch_exception()

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

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

References ada_catch_exception, and print_recreate_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_recreate_catch_exception_unhandled()

static void print_recreate_catch_exception_unhandled ( struct breakpoint b,
struct ui_file fp 
)
static

◆ print_recreate_catch_handlers()

static void print_recreate_catch_handlers ( struct breakpoint b,
struct ui_file fp 
)
static

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

References ada_catch_handlers, and print_recreate_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ print_recreate_exception()

static void print_recreate_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b,
struct ui_file fp 
)
static

◆ re_set_catch_assert()

static void re_set_catch_assert ( struct breakpoint b)
static

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

References ada_catch_assert, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ re_set_catch_exception()

static void re_set_catch_exception ( struct breakpoint b)
static

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

References ada_catch_exception, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ re_set_catch_exception_unhandled()

static void re_set_catch_exception_unhandled ( struct breakpoint b)
static

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

References ada_catch_exception_unhandled, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ re_set_catch_handlers()

static void re_set_catch_handlers ( struct breakpoint b)
static

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

References ada_catch_handlers, and re_set_exception().

Referenced by initialize_ada_catchpoint_ops().

◆ re_set_exception()

static void re_set_exception ( enum ada_exception_catchpoint_kind  ex,
struct breakpoint b 
)
static

◆ remove_extra_symbols()

static int remove_extra_symbols ( struct block_symbol syms,
int  nsyms 
)
static

◆ remove_irrelevant_renamings()

static int remove_irrelevant_renamings ( struct block_symbol syms,
int  nsyms,
const struct block current_block 
)
static

◆ replace_operator_with_call()

static void replace_operator_with_call ( expression_up expp,
int  pc,
int  nargs,
int  oplen,
struct symbol sym,
const struct block block 
)
static

◆ resolve()

static void resolve ( expression_up expp,
int  void_context_p 
)
static

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

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

◆ resolve_subexp()

static struct value * resolve_subexp ( expression_up expp,
int *  pos,
int  deprocedure_p,
struct type context_type 
)
static

◆ return_match()

static int return_match ( struct type func_type,
struct type context_type 
)
static

◆ scalar_type_p()

static int scalar_type_p ( struct type type)
static

Definition at line 4201 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().

◆ scan_discrim_bound()

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

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

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

Referenced by to_fixed_range_type().

◆ set_ada_command()

static void set_ada_command ( const char *  arg,
int  from_tty 
)
static

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

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

Referenced by _initialize_ada_language().

◆ should_stop_exception()

static int should_stop_exception ( const struct bp_location bl)
static

◆ show_ada_command()

static void show_ada_command ( const char *  args,
int  from_tty 
)
static

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

References cmd_show_list(), and show_ada_list.

Referenced by _initialize_ada_language().

◆ sort_choices()

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

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

References encoded_ordered_before(), block_symbol::symbol, and SYMBOL_LINKAGE_NAME.

Referenced by user_select_syms().

◆ sort_remove_dups_ada_exceptions_list()

static void sort_remove_dups_ada_exceptions_list ( std::vector< ada_exc_info > *  exceptions,
int  skip 
)
static

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

Referenced by ada_exceptions_list_1().

◆ standard_lookup()

static struct symbol * standard_lookup ( const char *  name,
const struct block block,
domain_enum  domain 
)
static

◆ static_unwrap_type()

static struct type * static_unwrap_type ( struct type type)
static

◆ symbols_are_identical_enums()

static int symbols_are_identical_enums ( struct block_symbol syms,
int  nsyms 
)
static

◆ template_to_fixed_record_type()

static struct type* template_to_fixed_record_type ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval0 
)
static

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

References ada_template_to_fixed_record_type_1().

Referenced by to_fixed_record_type().

◆ template_to_static_fixed_type()

static struct type* template_to_static_fixed_type ( struct type type0)
static

◆ thin_data_pntr()

static struct value* thin_data_pntr ( struct value val)
static

◆ thin_descriptor_type()

static struct type* thin_descriptor_type ( struct type type)
static

◆ to_fixed_array_type()

static struct type * to_fixed_array_type ( struct type type0,
struct value dval,
int  ignore_too_big 
)
static

◆ to_fixed_range_type()

static struct type * to_fixed_range_type ( struct type raw_type,
struct value dval 
)
static

◆ to_fixed_record_type()

static struct type* to_fixed_record_type ( struct type type0,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval 
)
static

◆ to_fixed_variant_branch_type()

static struct type * to_fixed_variant_branch_type ( struct type var_type0,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval 
)
static

◆ to_record_with_fixed_variant_part()

static struct type* to_record_with_fixed_variant_part ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address,
struct value dval0 
)
static

◆ to_static_fixed_type()

static struct type * to_static_fixed_type ( struct type type0)
static

◆ type_as_string()

static std::string type_as_string ( struct type type)
static

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

References string_file::string(), and type_print().

Referenced by ada_lookup_struct_elt_type().

◆ type_from_tag()

static struct type* type_from_tag ( struct value tag)
static

◆ umax_of_size()

static ULONGEST umax_of_size ( int  size)
static

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

References size.

Referenced by max_of_type().

◆ unwrap_value()

static struct value * unwrap_value ( struct value val)
static

◆ user_select_syms()

int user_select_syms ( struct block_symbol syms,
int  nsyms,
int  max_results 
)

◆ value_assign_to_component()

static void value_assign_to_component ( struct value container,
struct value component,
struct value val 
)
static

◆ value_pointer()

static CORE_ADDR value_pointer ( struct value value,
struct type type 
)
static

◆ value_pos_atr()

static struct value * value_pos_atr ( struct type type,
struct value arg 
)
static

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

References pos_atr(), and value_from_longest().

Referenced by ada_evaluate_subexp().

◆ value_subscript_packed()

static struct value * value_subscript_packed ( struct value arr,
int  arity,
struct value **  ind 
)
static

◆ value_tag_from_contents_and_address()

static struct value* value_tag_from_contents_and_address ( struct type type,
const gdb_byte valaddr,
CORE_ADDR  address 
)
static

◆ value_val_atr()

static struct value * value_val_atr ( struct type type,
struct value arg 
)
static

◆ variant_field_index()

static int variant_field_index ( struct type type)
static

◆ wild_match()

static bool wild_match ( const char *  name,
const char *  patn 
)
static

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

References advance_wild_match(), is_name_suffix(), is_valid_name_for_wild_match(), and name.

Referenced by do_wild_match().

◆ xget_renaming_scope()

static char* xget_renaming_scope ( struct type renaming_type)
static

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

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

Referenced by old_renaming_is_invisible().

Variable Documentation

◆ ada_catchpoint_location_ops

const struct bp_location_ops ada_catchpoint_location_ops
static
Initial value:
=
{
}
static void ada_catchpoint_location_dtor(struct bp_location *bl)
Definition: ada-lang.c:12492

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

Referenced by allocate_location_exception().

◆ ada_completer_word_break_characters

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

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

Referenced by ada_get_gdb_completer_word_break_characters().

◆ ada_exp_descriptor

const struct exp_descriptor ada_exp_descriptor
static
Initial value:
= {
}
static void ada_operator_length(const struct expression *exp, int pc, int *oplenp, int *argsp)
Definition: ada-lang.c:13862
static void ada_print_subexp(struct expression *exp, int *pos, struct ui_file *stream, enum precedence prec)
Definition: ada-lang.c:14053
static struct value * ada_evaluate_subexp(struct type *, struct expression *, int *, enum noside)
Definition: ada-lang.c:10612
static const char * ada_op_name(enum exp_opcode)
Definition: ada-lang.c:13919
static int ada_dump_subexp_body(struct expression *exp, struct ui_file *stream, int elt)
Definition: ada-lang.c:13981
static int ada_operator_check(struct expression *exp, int pos, int(*objfile_func)(struct objfile *objfile, void *data), void *data)
Definition: ada-lang.c:13891

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

◆ ada_extensions

const char* ada_extensions[]
static
Initial value:
=
{
".adb", ".ads", ".a", ".ada", ".dg", NULL
}

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

◆ ada_ignore_descriptive_types_p

int ada_ignore_descriptive_types_p = 0
static

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

Referenced by _initialize_ada_language(), and find_parallel_type_by_descriptive_type().

◆ ada_inferior_data

const struct inferior_data* ada_inferior_data
static

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

◆ ada_language_defn

const struct language_defn ada_language_defn

◆ ADA_MAIN_PROGRAM_SYMBOL_NAME

const char ADA_MAIN_PROGRAM_SYMBOL_NAME[] = "__gnat_ada_main_program_name"
static

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

Referenced by ada_main_name().

◆ ada_op_print_tab

const struct op_print ada_op_print_tab[]
static

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

◆ ada_opname_table

const struct ada_opname_map ada_opname_table[]
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 955 of file ada-lang.c.

Referenced by ada_decode(), ada_decoded_op_name(), ada_encode_1(), and is_ada_operator().

◆ ada_pspace_data_handle

const struct program_space_data* ada_pspace_data_handle
static

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

Referenced by _initialize_ada_language(), and get_ada_pspace_data().

◆ attribute_names

const char* attribute_names[]
static
Initial value:
= {
"<?>",
"first",
"last",
"length",
"image",
"max",
"min",
"modulus",
"pos",
"size",
"tag",
"val",
0
}

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

Referenced by ada_attribute_name().

◆ bound_name

const 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 1571 of file ada-lang.c.

Referenced by desc_index_type(), and desc_one_bound().

◆ catch_assert_breakpoint_ops

struct breakpoint_ops catch_assert_breakpoint_ops
static

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

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

◆ catch_exception_breakpoint_ops

struct breakpoint_ops catch_exception_breakpoint_ops
static

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

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

◆ catch_exception_unhandled_breakpoint_ops

struct breakpoint_ops catch_exception_unhandled_breakpoint_ops
static

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

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

◆ catch_handlers_breakpoint_ops

struct breakpoint_ops catch_handlers_breakpoint_ops
static

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

Referenced by ada_exception_breakpoint_ops(), and initialize_ada_catchpoint_ops().

◆ decoded_names_store

struct htab* decoded_names_store
static

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

Referenced by _initialize_ada_language(), and ada_decode_symbol().

◆ default_exception_support_info

const struct exception_support_info default_exception_support_info
static
Initial value:
=
{
"__gnat_debug_raise_exception",
"__gnat_unhandled_exception",
"__gnat_debug_raise_assert_failure",
"__gnat_begin_handler",
}
static CORE_ADDR ada_unhandled_exception_name_addr(void)
Definition: ada-lang.c:12273

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

Referenced by ada_exception_support_info_sniffer().

◆ exception_support_info_fallback

const struct exception_support_info exception_support_info_fallback
static
Initial value:
=
{
"__gnat_raise_nodefer_with_msg",
"__gnat_unhandled_exception",
"system__assertions__raise_assert_failure",
"__gnat_begin_handler",
}
static CORE_ADDR ada_unhandled_exception_name_addr_from_raise(void)
Definition: ada-lang.c:12284

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

Referenced by ada_exception_support_info_sniffer().

◆ known_auxiliary_function_name_patterns

const char* known_auxiliary_function_name_patterns[]
static
Initial value:
= {
}
#define ADA_KNOWN_AUXILIARY_FUNCTION_NAME_PATTERNS
Definition: ada-lang.h:53

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

Referenced by is_known_support_routine().

◆ known_runtime_file_name_patterns

const char* known_runtime_file_name_patterns[]
static
Initial value:
= {
}
#define ADA_KNOWN_RUNTIME_FILE_NAME_PATTERNS
Definition: ada-lang.h:45

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

Referenced by is_known_support_routine().

◆ maint_set_ada_cmdlist

struct cmd_list_element* maint_set_ada_cmdlist
static

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

Referenced by _initialize_ada_language(), and maint_set_ada_cmd().

◆ maint_show_ada_cmdlist

struct cmd_list_element* maint_show_ada_cmdlist
static

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

Referenced by _initialize_ada_language(), and maint_show_ada_cmd().

◆ print_signatures

int print_signatures = 1
static

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

Referenced by _initialize_ada_language(), and ada_print_symbol_signature().

◆ set_ada_list

struct cmd_list_element* set_ada_list
static

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

Referenced by _initialize_ada_language(), and set_ada_command().

◆ show_ada_list

struct cmd_list_element* show_ada_list
static

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

Referenced by _initialize_ada_language(), and show_ada_command().

◆ standard_exc

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

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

Referenced by ada_add_standard_exceptions(), ada_exception_catchpoint_cond_string(), and ada_is_non_standard_exception_sym().

◆ trust_pad_over_xvs

int trust_pad_over_xvs = 1
static

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

Referenced by _initialize_ada_language(), and ada_is_aligner_type().

◆ varsize_limit

unsigned int varsize_limit
static

◆ warning_limit

int warning_limit = 2
static

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

Referenced by lim_warning().

◆ warnings_issued

int warnings_issued = 0
static

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

Referenced by lim_warning(), and parse().