Searched refs:SCM_STRUCT_SLOT_REF (Results 1 – 11 of 11) sorted by relevance
/dports/lang/guile2/guile-2.2.7/libguile/ |
H A D | struct.h | 128 #define SCM_STRUCT_SLOT_REF(X,I) (SCM_STRUCT_SLOTS (X)[(I)]) macro 136 #define SCM_VTABLE_LAYOUT(X) (SCM_STRUCT_SLOT_REF ((X), scm_vtable_index_layout)) 144 #define SCM_VTABLE_INSTANCE_PRINTER(X) (SCM_STRUCT_SLOT_REF (X, scm_vtable_index_instance_printer)) 146 #define SCM_VTABLE_NAME(X) (SCM_STRUCT_SLOT_REF (X, scm_vtable_index_name)) 164 #define SCM_STRUCT_PROCEDURE(X) (SCM_STRUCT_SLOT_REF (X, scm_applicable_struct_index_procedure)) 166 #define SCM_STRUCT_SETTER(X) (SCM_STRUCT_SLOT_REF (X, scm_applicable_struct_index_setter…
|
H A D | stacks.h | 40 #define SCM_STACK_LENGTH(obj) (scm_to_long (SCM_STRUCT_SLOT_REF (obj,0))) 42 #define SCM_STACK_ID(obj) (SCM_STRUCT_SLOT_REF (obj,1)) 44 #define SCM_STACK_FRAME(obj) (SCM_STRUCT_SLOT_REF (obj,2))
|
H A D | goops.h | 69 #define SCM_SLOT(x, i) (SCM_STRUCT_SLOT_REF (x, i))
|
H A D | vm-engine.c | 2788 RETURN (SCM_STRUCT_SLOT_REF (obj, index)); in VM_NAME() 2866 RETURN (SCM_STRUCT_SLOT_REF (obj, idx)); in VM_NAME()
|
/dports/lang/guile/guile-3.0.7/libguile/ |
H A D | struct.h | 114 #define SCM_STRUCT_SLOT_REF(X,I) (SCM_STRUCT_SLOTS (X)[(I)]) macro 129 #define SCM_VTABLE_LAYOUT(X) (SCM_STRUCT_SLOT_REF ((X), scm_vtable_index_layout)) 137 #define SCM_VTABLE_INSTANCE_PRINTER(X) (SCM_STRUCT_SLOT_REF (X, scm_vtable_index_instance_printer)) 139 #define SCM_VTABLE_NAME(X) (SCM_STRUCT_SLOT_REF (X, scm_vtable_index_name)) 156 #define SCM_STRUCT_PROCEDURE(X) (SCM_STRUCT_SLOT_REF (X, scm_applicable_struct_index_procedure)) 158 #define SCM_STRUCT_SETTER(X) (SCM_STRUCT_SLOT_REF (X, scm_applicable_struct_index_setter…
|
H A D | stacks.h | 39 #define SCM_STACK_LENGTH(obj) (scm_to_long (SCM_STRUCT_SLOT_REF (obj,0))) 41 #define SCM_STACK_ID(obj) (SCM_STRUCT_SLOT_REF (obj,1)) 43 #define SCM_STACK_FRAME(obj) (SCM_STRUCT_SLOT_REF (obj,2))
|
H A D | exceptions.c | 216 SCM exns = SCM_STRUCT_SLOT_REF (obj, 0); in extract_exception() 234 return SCM_STRUCT_SLOT_REF (exn, 0); in scm_exception_kind() 244 return SCM_STRUCT_SLOT_REF (exn, 1); in scm_exception_args() 299 return scm_to_int (SCM_STRUCT_SLOT_REF (exn, 0)); in quit_exception_code()
|
H A D | goops.h | 79 #define SCM_SLOT(x, i) (SCM_STRUCT_SLOT_REF (x, i))
|
H A D | hash.c | 254 hash ^= scm_raw_ihash (SCM_STRUCT_SLOT_REF (obj, field_num), in scm_i_struct_hash()
|
H A D | struct.c | 625 return SCM_STRUCT_SLOT_REF (handle, p);
|
H A D | goops.c | 197 return SCM_STRUCT_SLOT_REF (x, nfields - 1); in get_indirect_slots()
|