63 scm_remember_upto_here_1 (
self);
119 scm_gc_protect_object (arch_scm);
121 return (
void *) arch_scm;
130 SCM a_scm = (SCM)
gdbarch_data (gdbarch, arch_object_data);
141 SCM_ASSERT_TYPE (
arscm_is_arch (
self),
self, arg_pos, func_name,
500 Return #t if the object is a <gdb:arch> object." },
504 Return the <gdb:arch> object representing the architecture of the\n\
505 currently selected stack frame, if there is one, or the architecture of the\n\
506 current target if there isn't.\n\
512 Return the name of the architecture." },
516 Return name of target character set as a string." },
520 Return name of target wide character set as a string." },
524 Return the <gdb:type> object for the \"void\" type\n\
525 of the architecture." },
529 Return the <gdb:type> object for the \"char\" type\n\
530 of the architecture." },
534 Return the <gdb:type> object for the \"short\" type\n\
535 of the architecture." },
539 Return the <gdb:type> object for the \"int\" type\n\
540 of the architecture." },
544 Return the <gdb:type> object for the \"long\" type\n\
545 of the architecture." },
549 Return the <gdb:type> object for the \"signed char\" type\n\
550 of the architecture." },
554 Return the <gdb:type> object for the \"unsigned char\" type\n\
555 of the architecture." },
559 Return the <gdb:type> object for the \"unsigned short\" type\n\
560 of the architecture." },
564 Return the <gdb:type> object for the \"unsigned int\" type\n\
565 of the architecture." },
569 Return the <gdb:type> object for the \"unsigned long\" type\n\
570 of the architecture." },
574 Return the <gdb:type> object for the \"float\" type\n\
575 of the architecture." },
579 Return the <gdb:type> object for the \"double\" type\n\
580 of the architecture." },
584 Return the <gdb:type> object for the \"long double\" type\n\
585 of the architecture." },
589 Return the <gdb:type> object for the \"bool\" type\n\
590 of the architecture." },
594 Return the <gdb:type> object for the \"long long\" type\n\
595 of the architecture." },
597 {
"arch-ulonglong-type", 1, 0, 0,
600 Return the <gdb:type> object for the \"unsigned long long\" type\n\
601 of the architecture." },
605 Return the <gdb:type> object for the \"int8\" type\n\
606 of the architecture." },
610 Return the <gdb:type> object for the \"uint8\" type\n\
611 of the architecture." },
615 Return the <gdb:type> object for the \"int16\" type\n\
616 of the architecture." },
620 Return the <gdb:type> object for the \"uint16\" type\n\
621 of the architecture." },
625 Return the <gdb:type> object for the \"int32\" type\n\
626 of the architecture." },
630 Return the <gdb:type> object for the \"uint32\" type\n\
631 of the architecture." },
635 Return the <gdb:type> object for the \"int64\" type\n\
636 of the architecture." },
640 Return the <gdb:type> object for the \"uint64\" type\n\
641 of the architecture." },
const char * target_charset(struct gdbarch *gdbarch)
static SCM gdbscm_arch_ushort_type(SCM self)
static SCM scm_new_smob(scm_t_bits tc, scm_t_bits data)
struct type * builtin_long_double
void gdbscm_define_functions(const scheme_function *, int is_public)
static int arscm_print_arch_smob(SCM self, SCM port, scm_print_state *pstate)
static const char arch_smob_name[]
static SCM gdbscm_arch_ulonglong_type(SCM self)
struct type * builtin_unsigned_int
static SCM gdbscm_arch_short_type(SCM self)
static SCM gdbscm_arch_int_type(SCM self)
SCM tyscm_scm_from_type(struct type *type)
static SCM arscm_get_arch_arg_unsafe(SCM self, int arg_pos, const char *func_name)
static SCM gdbscm_arch_uint_type(SCM self)
static const struct builtin_type * gdbscm_arch_builtin_type(SCM self, const char *func_name)
static SCM gdbscm_arch_float_type(SCM self)
static SCM gdbscm_arch_p(SCM scm)
const struct builtin_type * builtin_type(struct gdbarch *gdbarch)
struct type * builtin_uint8
static SCM gdbscm_arch_name(SCM self)
struct type * builtin_uint16
static SCM gdbscm_arch_longlong_type(SCM self)
static SCM gdbscm_arch_int8_type(SCM self)
scm_t_bits gdbscm_make_smob_type(const char *name, size_t size)
static SCM gdbscm_current_arch(void)
arch_smob * arscm_get_arch_smob_arg_unsafe(SCM self, int arg_pos, const char *func_name)
struct type * builtin_int32
struct type * builtin_short
static SCM gdbscm_arch_wide_charset(SCM self)
static SCM gdbscm_arch_bool_type(SCM self)
void gdbscm_init_gsmob(gdb_smob *base)
struct type * builtin_unsigned_long
static struct parser_state * pstate
SCM gdbscm_scm_from_c_string(const char *string)
const char * target_wide_charset(struct gdbarch *gdbarch)
static scm_t_bits arch_smob_tag
static SCM arscm_make_arch_smob(struct gdbarch *gdbarch)
struct type * builtin_int16
static void * arscm_object_data_init(struct gdbarch *gdbarch)
void gdbscm_initialize_arches(void)
static SCM gdbscm_arch_uint64_type(SCM self)
static SCM gdbscm_arch_void_type(SCM self)
static SCM gdbscm_arch_longdouble_type(SCM self)
struct type * builtin_uint32
struct gdbarch * get_current_arch(void)
struct type * builtin_long
static SCM gdbscm_arch_int32_type(SCM self)
struct type * builtin_unsigned_char
static int arscm_is_arch(SCM)
struct type * builtin_bool
struct type * builtin_unsigned_long_long
struct type * builtin_signed_char
void gdbscm_printf(SCM port, const char *format,...) ATTRIBUTE_PRINTF(2
static SCM gdbscm_arch_ulong_type(SCM self)
static SCM gdbscm_arch_double_type(SCM self)
struct type * builtin_unsigned_short
static SCM gdbscm_arch_char_type(SCM self)
static SCM gdbscm_arch_uint16_type(SCM self)
struct type * builtin_char
struct type * builtin_double
static SCM gdbscm_arch_uint8_type(SCM self)
static SCM gdbscm_arch_uint32_type(SCM self)
struct gdbarch * arscm_get_gdbarch(arch_smob *a_smob)
static SCM gdbscm_arch_long_type(SCM self)
static SCM gdbscm_arch_int64_type(SCM self)
static SCM gdbscm_arch_uchar_type(SCM self)
static SCM gdbscm_arch_schar_type(SCM self)
struct type * builtin_long_long
static SCM gdbscm_arch_int16_type(SCM self)
struct type * builtin_int64
const struct bfd_arch_info * gdbarch_bfd_arch_info(struct gdbarch *gdbarch)
struct type * builtin_uint64
struct type * builtin_int8
struct type * builtin_void
struct gdbarch_data * gdbarch_data_register_post_init(gdbarch_data_post_init_ftype *post_init)
SCM arscm_scm_from_arch(struct gdbarch *gdbarch)
struct type * builtin_float
struct type * builtin_int
static SCM gdbscm_arch_charset(SCM self)