44 struct ui_file * stream,
int quoter);
61 encoding =
"UTF-32BE";
63 encoding =
"UTF-32LE";
67 error (
_(
"unrecognized character type"));
106 unsigned int length,
const char *
encoding,
int force_ellipses,
114 if (!encoding || !*encoding)
115 encoding = type_encoding;
118 force_ellipses,
'\'', 0, options);
216 s = strchr (retval,
':');
219 char *last_char = &s[strlen (s) - 1];
232 f_make_symbol_completion_list (
const char *text,
const char *
word,
235 return default_make_symbol_completion_list_break_on (text, word,
":", code);
270 f_make_symbol_completion_list,
const char * target_charset(struct gdbarch *gdbarch)
struct type * builtin_real_s8
int f_parse(struct parser_state *par_state)
struct type * builtin_integer_s2
struct type * builtin_real_s16
struct type * arch_boolean_type(struct gdbarch *gdbarch, int bit, int unsigned_p, char *name)
struct type * builtin_logical_s8
#define GDBARCH_OBSTACK_CALLOC(GDBARCH, NR, TYPE)
struct type * builtin_logical_s2
int gdbarch_int_bit(struct gdbarch *gdbarch)
static void f_printstr(struct ui_file *stream, struct type *type, const gdb_byte *string, unsigned int length, const char *encoding, int force_ellipses, const struct value_print_options *options)
struct type * arch_float_type(struct gdbarch *gdbarch, int bit, char *name, const struct floatformat **floatformats)
struct type * arch_complex_type(struct gdbarch *gdbarch, char *name, struct type *target_type)
void * gdbarch_data(struct gdbarch *gdbarch, struct gdbarch_data *data)
struct type * builtin_logical
struct value * default_read_var_value(struct symbol *var, struct frame_info *frame)
void default_print_typedef(struct type *type, struct symbol *new_symbol, struct ui_file *stream)
struct type * string_char_type
void add_language(const struct language_defn *lang)
static char * f_word_break_characters(void)
#define GDBARCH_OBSTACK_ZALLOC(GDBARCH, TYPE)
static void f_language_arch_info(struct gdbarch *gdbarch, struct language_arch_info *lai)
static void * build_fortran_types(struct gdbarch *gdbarch)
char * default_word_break_characters(void)
void f_print_type(struct type *, const char *, struct ui_file *, int, int, const struct type_print_options *)
#define LA_EMIT_CHAR(ch, type, stream, quoter)
void generic_printstr(struct ui_file *stream, struct type *type, const gdb_byte *string, unsigned int length, const char *encoding, int force_ellipses, int quote_char, int c_style_terminator, const struct value_print_options *options)
struct type * builtin_complex_s16
struct type * builtin_complex_s32
struct type * bool_type_default
void null_post_parser(struct expression **exp, int void_context_p)
struct type * builtin_character
struct type * builtin_integer
void fputs_filtered(const char *linebuffer, struct ui_file *stream)
const char * bool_type_symbol
int default_pass_by_reference(struct type *type)
enum bfd_endian gdbarch_byte_order(struct gdbarch *gdbarch)
struct type * basic_lookup_transparent_type(const char *name)
struct gdbarch * get_type_arch(const struct type *type)
int gdbarch_double_bit(struct gdbarch *gdbarch)
void iterate_over_symbols(const struct block *block, const char *name, const domain_enum domain, symbol_found_callback_ftype *callback, void *data)
void default_print_array_index(struct value *index_value, struct ui_file *stream, const struct value_print_options *options)
struct type * arch_integer_type(struct gdbarch *gdbarch, int bit, int unsigned_p, char *name)
void _initialize_f_language(void)
static void f_printchar(int c, struct type *type, struct ui_file *stream)
static const struct op_print f_op_print_tab[]
static void f_emit_char(int c, struct type *type, struct ui_file *stream, int quoter)
void default_get_string(struct value *value, gdb_byte **buffer, int *length, struct type **char_type, const char **charset)
#define default_varobj_ops
struct type * builtin_complex_s8
int gdbarch_long_long_bit(struct gdbarch *gdbarch)
const struct exp_descriptor exp_descriptor_standard
void generic_emit_char(int c, struct type *type, struct ui_file *stream, int quoter, const char *encoding)
int gdbarch_float_bit(struct gdbarch *gdbarch)
struct symbol * cp_lookup_symbol_nonlocal(const struct language_defn *langdef, const char *name, const struct block *block, const domain_enum domain)
void f_val_print(struct type *, const gdb_byte *, int, CORE_ADDR, struct ui_file *, int, const struct value *, const struct value_print_options *)
struct type * builtin_void
struct type * builtin_real
#define TYPE_LENGTH(thistype)
static struct gdbarch_data * f_type_data
const struct builtin_f_type * builtin_f_type(struct gdbarch *gdbarch)
struct type * arch_type(struct gdbarch *gdbarch, enum type_code code, int length, char *name)
int gdbarch_long_double_bit(struct gdbarch *gdbarch)
int gdbarch_short_bit(struct gdbarch *gdbarch)
struct type ** primitive_type_vector
void c_value_print(struct value *, struct ui_file *, const struct value_print_options *)
void error(const char *fmt,...)
struct gdbarch_data * gdbarch_data_register_post_init(gdbarch_data_post_init_ftype *post_init)
struct type * builtin_logical_s1
static const char * f_get_encoding(struct type *type)