extern int ada_is_system_address_type (struct type *);
-extern DOUBLEST ada_delta (struct type *);
+extern struct value *ada_delta (struct type *);
-extern DOUBLEST ada_fixed_to_float (struct type *, LONGEST);
-
-extern LONGEST ada_float_to_fixed (struct type *, DOUBLEST);
+extern struct value *ada_scaling_factor (struct type *);
extern struct type *ada_system_address_type (void);
extern struct type *ada_find_parallel_type (struct type *,
const char *suffix);
-extern LONGEST get_int_var_value (char *, int *);
+extern bool get_int_var_value (const char *, LONGEST &value);
extern struct symbol *ada_find_renaming_symbol (struct symbol *name_sym,
const struct block *block);
/* Some information about a given Ada exception. */
-typedef struct ada_exc_info
+struct ada_exc_info
{
/* The name of the exception. */
const char *name;
/* The address of the symbol corresponding to that exception. */
CORE_ADDR addr;
-} ada_exc_info;
-DEF_VEC_O(ada_exc_info);
+ bool operator< (const ada_exc_info &) const;
+ bool operator== (const ada_exc_info &) const;
+};
-extern VEC(ada_exc_info) *ada_exceptions_list (const char *regexp);
+extern std::vector<ada_exc_info> ada_exceptions_list (const char *regexp);
/* Tasking-related: ada-tasks.c */