extern int ada_parse (struct parser_state *); /* Defined in ada-exp.y */
-extern void ada_yyerror (const char *); /* Defined in ada-exp.y */
-
/* Defined in ada-typeprint.c */
extern void ada_print_type (struct type *, const char *, struct ui_file *, int,
int, const struct type_print_options *);
struct value *ada_convert_actual (struct value *actual,
struct type *formal_type0);
+extern bool ada_is_access_to_unconstrained_array (struct type *type);
+
extern struct value *ada_value_subscript (struct value *, int,
struct value **);
extern struct ada_task_info *ada_get_task_info_from_ptid (ptid_t ptid);
-extern int ada_get_task_number (ptid_t);
+extern int ada_get_task_number (thread_info *thread);
typedef void (ada_task_list_iterator_ftype) (struct ada_task_info *task);
extern void iterate_over_live_ada_tasks