/dports/lang/mit-scheme/mit-scheme-9.2/src/microcode/ |
H A D | edwin.h | 33 (lookup_external_string ((VECTOR_REF ((group), 1)), (len_r))) 36 #define GROUP_GAP_START(group) (FIXNUM_TO_ULONG (VECTOR_REF ((group), 2))) 37 #define GROUP_GAP_LENGTH(group) (FIXNUM_TO_ULONG (VECTOR_REF ((group), 3))) 38 #define GROUP_GAP_END(group) (FIXNUM_TO_ULONG (VECTOR_REF ((group), 4))) 40 #define GROUP_START_MARK(group) (VECTOR_REF ((group), 6)) 41 #define GROUP_END_MARK(group) (VECTOR_REF ((group), 7)) 42 #define GROUP_MODIFIED_P(group) (VECTOR_REF ((group), 16)) 45 #define MARK_GROUP(mark) (VECTOR_REF ((mark), 1)) 46 #define MARK_INDEX(mark) (UNSIGNED_FIXNUM_TO_LONG (VECTOR_REF ((mark), 2))) 47 #define MARK_LEFT_INSERTING(mark) ((VECTOR_REF ((mark), 3)) != SHARP_F)
|
H A D | prosenv.c | 106 (ts . second) = (integer_to_ulong (VECTOR_REF (vec, 1))); in DECODE_TIME_BODY() 107 (ts . minute) = (integer_to_ulong (VECTOR_REF (vec, 2))); in DECODE_TIME_BODY() 108 (ts . hour) = (integer_to_ulong (VECTOR_REF (vec, 3))); in DECODE_TIME_BODY() 109 (ts . day) = (integer_to_ulong (VECTOR_REF (vec, 4))); in DECODE_TIME_BODY() 110 (ts . month) = (integer_to_ulong (VECTOR_REF (vec, 5))); in DECODE_TIME_BODY() 111 (ts . year) = (integer_to_ulong (VECTOR_REF (vec, 6))); in DECODE_TIME_BODY() 114 = (((len > 8) && (INTEGER_P (VECTOR_REF (vec, 8)))) in DECODE_TIME_BODY() 115 ? (integer_to_long (VECTOR_REF (vec, 8))) in DECODE_TIME_BODY() 119 && (INTEGER_P (VECTOR_REF (vec, 9))) in DECODE_TIME_BODY() 120 && (integer_to_long_p (VECTOR_REF (vec, 9)))) in DECODE_TIME_BODY() [all …]
|
H A D | utils.c | 68 = (VECTOR_REF (interrupt_masks, interrupt_number)); in compute_interrupt_handler_mask() 135 interrupt_handlers = (VECTOR_REF (fixed_objects, SYSTEM_INTERRUPT_VECTOR)); in setup_interrupt() 136 interrupt_masks = (VECTOR_REF (fixed_objects, FIXOBJ_INTERRUPT_MASK_VECTOR)); in setup_interrupt() 145 interrupt_handler = (VECTOR_REF (interrupt_handlers, interrupt_number)); in setup_interrupt() 344 && ((VECTOR_REF (argument, 0)) in error_with_argument() 602 error_vector = (VECTOR_REF (fixed_objects, SYSTEM_ERROR_VECTOR)); in Do_Micro_Error() 606 handler = (VECTOR_REF (error_vector, error_code)); in Do_Micro_Error() 608 handler = (VECTOR_REF (error_vector, ERR_BAD_ERROR_CODE)); in Do_Micro_Error() 910 = (VECTOR_REF (fixed_objects, Primitive_Profiling_Table)); in record_primitive_entry() 917 (1 + (integer_to_ulong (VECTOR_REF (table, index)))))); in record_primitive_entry()
|
H A D | term.c | 78 = (VECTOR_REF (fixed_objects, Termination_Proc_Vector)); in attempt_termination_backout() 83 SCHEME_OBJECT Handler = (VECTOR_REF (Term_Vector, code)); in attempt_termination_backout() 275 ? (VECTOR_REF (fixed_objects, FIXOBJ_EDWIN_AUTO_SAVE)) in edwin_auto_save() 322 ? (VECTOR_REF (fixed_objects, FIXOBJ_FILES_TO_DELETE)) in delete_temp_files()
|
H A D | interp.c | 187 (MEMORY_REF ((VECTOR_REF (fixed_objects, STEPPER_STATE)), HUNK_CXR0)) 190 (MEMORY_REF ((VECTOR_REF (fixed_objects, STEPPER_STATE)), HUNK_CXR1)) 193 (MEMORY_REF ((VECTOR_REF (fixed_objects, STEPPER_STATE)), HUNK_CXR2)) 793 handler = (VECTOR_REF (fixed_objects, TRAP_HANDLER)); in Interpret() 868 && ((VECTOR_REF (data, frame_size)) != SHARP_F) in Interpret() 869 && ((VECTOR_REF (data, 0)) in Interpret() 870 == (VECTOR_REF (fixed_objects, ARITY_DISPATCHER_TAG)))) in Interpret() 872 Function = (VECTOR_REF (data, frame_size)); in Interpret()
|
H A D | cmpint.c | 614 && ((VECTOR_REF (data, 0)) in DEFINE_SCHEME_UTILITY_2() 615 == (VECTOR_REF (fixed_objects, ARITY_DISPATCHER_TAG))) in DEFINE_SCHEME_UTILITY_2() 616 && ((VECTOR_REF (data, frame_size)) != SHARP_F)) in DEFINE_SCHEME_UTILITY_2() 618 procedure = (VECTOR_REF (data, frame_size)); in DEFINE_SCHEME_UTILITY_2() 737 (VECTOR_REF (fixed_objects, CC_ERROR_PROCEDURE)), in DEFINE_SCHEME_UTILITY_1() 1447 && (CC_ENTRY_P (VECTOR_REF (data, frame_size))) in apply_compiled_from_primitive() 1448 && ((VECTOR_REF (data, 0)) in apply_compiled_from_primitive() 1451 procedure = (VECTOR_REF (data, frame_size)); in apply_compiled_from_primitive() 2354 && ((VECTOR_REF (data, frame_size)) != SHARP_F) in make_uuo_link() 2355 && ((VECTOR_REF (data, 0)) in make_uuo_link() [all …]
|
H A D | pruxffi.c | 52 SCM high = (VECTOR_REF (alien, 1)); in is_alien() 53 SCM low = (VECTOR_REF (alien, 2)); in is_alien() 63 unsigned long high = (FIXNUM_TO_ULONG (VECTOR_REF (alien, 1))); in alien_address() 64 unsigned long low = (FIXNUM_TO_ULONG (VECTOR_REF (alien, 2))); in alien_address() 776 handler = (VECTOR_REF (fixed_objects, CALLBACK_HANDLER)); in valid_callback_handler()
|
H A D | prmhash.c | 332 salt = (VECTOR_REF (parameters, 0)); in UNARY_OPERATION() 333 count = (VECTOR_REF (parameters, 1)); in UNARY_OPERATION() 361 SCHEME_OBJECT a = (VECTOR_REF (parameters, (2 + i))); in UNARY_OPERATION()
|
H A D | prntio.c | 120 = (arg_to_channel ((VECTOR_REF (channel_vector, (index))), argno)); in object_to_channel_vector() 225 (*hide_windows_p) = (OBJECT_TO_BOOLEAN (VECTOR_REF (options, 0))); in parse_subprocess_options()
|
H A D | intern.c | 54 SCHEME_OBJECT obarray = (VECTOR_REF (fixed_objects, OBARRAY)); in find_symbol_internal() 93 obarray = (VECTOR_REF (fixed_objects, OBARRAY)); in replace_symbol_bucket_type()
|
H A D | syntax.c | 797 temp = (VECTOR_REF (state_argument, SSF_STATE_DEPTH)); 803 temp = (VECTOR_REF (state_argument, SSF_STATE_IN_STRING_P)); 812 temp = (VECTOR_REF (state_argument, SSF_STATE_COMMENT_STATE)); 853 quoted = ((VECTOR_REF (state_argument, SSF_STATE_QUOTED_P)) != SHARP_F); 857 temp = (VECTOR_REF (state_argument, SSF_STATE_COMMENT_START));
|
H A D | ntsig.c | 473 iv = (VECTOR_REF (fov, SYSTEM_INTERRUPT_VECTOR)); in NT_initialize_fov() 474 imv = (VECTOR_REF (fov, FIXOBJ_INTERRUPT_MASK_VECTOR)); in NT_initialize_fov()
|
H A D | syntax.h | 105 (VECTOR_REF ((table), ((index) & 0xFF)))
|
H A D | purify.c | 73 daemon = (VECTOR_REF (fixed_objects, GC_DAEMON));
|
H A D | history.h | 54 #define READ_DUMMY_HISTORY() VECTOR_REF (fixed_objects, DUMMY_HISTORY)
|
/dports/net/serveez/serveez-0.2.2/src/gi-sup/ |
H A D | humdrum.h | 47 #define VECTOR_REF scm_c_vector_ref 100 #define VECTOR_REF(v,ix) gh_vector_ref (v, NUM_ULONG (ix))
|
/dports/lang/mosh/mosh-0.2.7/src/ |
H A D | Instruction.h | 88 VECTOR_REF = 2414, enumerator 348 case VECTOR_REF: in toString()
|
/dports/textproc/uim-gtk/uim-d1ac9d9/uim/ |
H A D | uim-scm-abbrev.h | 93 #define VECTOR_REF uim_scm_vector_ref macro
|
/dports/textproc/uim-qt5/uim-d1ac9d9/uim/ |
H A D | uim-scm-abbrev.h | 93 #define VECTOR_REF uim_scm_vector_ref macro
|
/dports/textproc/uim-m17nlib/uim-d1ac9d9/uim/ |
H A D | uim-scm-abbrev.h | 93 #define VECTOR_REF uim_scm_vector_ref macro
|
/dports/textproc/uim-el/uim-d1ac9d9/uim/ |
H A D | uim-scm-abbrev.h | 93 #define VECTOR_REF uim_scm_vector_ref macro
|
/dports/textproc/uim-gtk3/uim-d1ac9d9/uim/ |
H A D | uim-scm-abbrev.h | 93 #define VECTOR_REF uim_scm_vector_ref macro
|
/dports/japanese/uim-anthy/uim-d1ac9d9/uim/ |
H A D | uim-scm-abbrev.h | 93 #define VECTOR_REF uim_scm_vector_ref macro
|
/dports/lang/guile2/guile-2.2.7/libguile/ |
H A D | eval.c | 154 #define VECTOR_REF(v, i) (SCM_SIMPLE_VECTOR_REF (v, i)) macro 169 return VECTOR_REF (env, 0); in next_rib() 185 return VECTOR_REF (env, width + 1); in env_ref() 277 env_set (new_env, 0, i, EVAL1 (VECTOR_REF (inits, i), env)); in eval() 295 SCM loc = VECTOR_REF (locs, i); in eval()
|
/dports/lang/guile/guile-3.0.7/libguile/ |
H A D | eval.c | 160 #define VECTOR_REF(v, i) (SCM_SIMPLE_VECTOR_REF (v, i)) macro 175 return VECTOR_REF (env, 0); in next_rib() 191 return VECTOR_REF (env, width + 1); in env_ref() 282 env_set (new_env, 0, i, EVAL1 (VECTOR_REF (inits, i), env)); in eval() 300 SCM loc = VECTOR_REF (locs, i); in eval()
|