/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/srfi/69/ |
H A D | hash.c | 200 res = sexp_scan_bucket(ctx, sexp_vector_ref(buckets, i), obj, eq_fn); in sexp_hash_table_cell() 212 sexp_vector_set(buckets, i, sexp_cons(ctx, res, sexp_vector_ref(buckets, i))); in sexp_hash_table_cell() 227 res = sexp_scan_bucket(ctx, sexp_vector_ref(buckets, i), obj, eq_fn); in sexp_hash_table_delete() 230 if (res == sexp_vector_ref(buckets, i)) { in sexp_hash_table_delete() 233 for (p=sexp_vector_ref(buckets, i); sexp_cdr(p)!=res; p=sexp_cdr(p)) in sexp_hash_table_delete()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/chibi/io/ |
H A D | port.c | 15 #define sexp_cookie_ctx(vec) sexp_vector_ref((sexp)vec, SEXP_ZERO) 16 #define sexp_cookie_buffer(vec) sexp_vector_ref((sexp)vec, SEXP_ONE) 17 #define sexp_cookie_read(vec) sexp_vector_ref((sexp)vec, SEXP_TWO) 18 #define sexp_cookie_write(vec) sexp_vector_ref((sexp)vec, SEXP_THREE) 19 #define sexp_cookie_seek(vec) sexp_vector_ref((sexp)vec, SEXP_FOUR) 20 #define sexp_cookie_close(vec) sexp_vector_ref((sexp)vec, SEXP_FIVE)
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/chibi/ |
H A D | signal.c | 23 handler = sexp_vector_ref(sexp_global(ctx, SEXP_G_SIGNAL_HANDLERS), in sexp_call_sigaction() 48 oldaction = sexp_vector_ref(sexp_global(ctx, SEXP_G_SIGNAL_HANDLERS), signum); in sexp_set_signal_action()
|
H A D | disasm.c | 145 sexp_car(sexp_vector_ref(src, sexp_make_fixnum(src_off)))))) { in disasm() 146 src_here = sexp_cdr(sexp_vector_ref(src, sexp_make_fixnum(src_off))); in disasm()
|
H A D | weak.c | 40 return sexp_vector_ref(v, k);
|
H A D | heap-stats.c | 55 sexp_print_simple(ctx, sexp_vector_ref(x, i), out, depth-1); in sexp_print_simple()
|
H A D | json.c | 396 tmp = json_write(ctx, self, sexp_vector_ref(obj, sexp_make_fixnum(i)), out); in json_write_array()
|
H A D | ast.c | 167 res = sexp_vector_ref(res, sexp_fx_sub(k, SEXP_TWO)); in sexp_get_opcode_param_type()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/include/chibi/ |
H A D | sexp.h | 921 #define sexp_port_buffer(x) (sexp_vector_ref(sexp_port_cookie(x), SEXP_ONE)) 922 #define sexp_port_reader(x) (sexp_vector_ref(sexp_port_cookie(x), SEXP_TWO)) 923 #define sexp_port_writer(x) (sexp_vector_ref(sexp_port_cookie(x), SEXP_THREE)) 924 #define sexp_port_seeker(x) (sexp_vector_ref(sexp_port_cookie(x), SEXP_FOUR)) 925 #define sexp_port_closer(x) (sexp_vector_ref(sexp_port_cookie(x), SEXP_FIVE)) 1138 #define sexp_vector_ref(x,i) (sexp_vector_data(x)[sexp_unbox_fixnum(i)]) macro 1409 #define sexp_context_bc(x) (sexp_vector_ref(sexp_context_specific(x), SEXP_ZERO)) 1410 #define sexp_context_fv(x) (sexp_vector_ref(sexp_context_specific(x), SEXP_ONE)) 1411 #define sexp_context_lambda(x) (sexp_vector_ref(sexp_context_specific(x), SEXP_TWO)) 1413 #define sexp_context_depth(x) (sexp_vector_ref(sexp_context_specific(x), SEXP_FOUR)) [all …]
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/srfi/95/ |
H A D | qsort.c | 140 …res = sexp_object_compare(ctx, sexp_vector_ref(a, sexp_make_fixnum(i)), sexp_vector_ref(b, sexp_ma… in sexp_object_compare()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/ |
H A D | vm.c | 36 if (sexp_unbox_fixnum(sexp_car(sexp_vector_ref(src, sexp_make_fixnum(i)))) > ip) in sexp_lookup_source_info() 37 return sexp_cdr(sexp_vector_ref(src, sexp_make_fixnum(i-1))); in sexp_lookup_source_info() 38 return sexp_cdr(sexp_vector_ref(src, sexp_make_fixnum(sexp_vector_length(src)-1))); in sexp_lookup_source_info() 943 && sexp_vector_ref(v, sexp_make_fixnum(d)) == b; in sexp_check_type() 1195 tmp2 = sexp_restore_stack(ctx, sexp_vector_ref(cp, 0)); in sexp_apply() 1448 _PUSH(sexp_vector_ref(cp, sexp_make_fixnum(_SWORD0))); in sexp_apply() 1462 _ARG2 = sexp_vector_ref(_ARG1, _ARG2); in sexp_apply() 1660 tmp1 = sexp_vector_ref(sexp_type_getters(_ARG1), _ARG3); in sexp_apply() 1689 tmp1 = sexp_vector_ref(sexp_type_setters(_ARG1), _ARG3); in sexp_apply()
|
H A D | main.c | 223 advise = sexp_vector_ref(advise, SEXP_ONE); in check_exception() 581 if (sexp_vectorp(env)) env = sexp_vector_ref(env, SEXP_ONE); in run_main()
|
H A D | eval.c | 631 if (sexp_contains_syntax_p_bound(sexp_vector_ref(x, sexp_make_fixnum(i)), depth-1)) in sexp_contains_syntax_p_bound() 652 …sexp_vector_set(x, sexp_make_fixnum(i), sexp_strip_synclos_bound(ctx, sexp_vector_ref(x, sexp_make… in sexp_strip_synclos_bound()
|
H A D | sexp.c | 406 tmp = sexp_vector_ref(cpl, sexp_make_fixnum(i)); in sexp_register_simple_type_op()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/chibi/crypto/ |
H A D | sha2.c | 136 sha_context_tag = sexp_unbox_fixnum(sexp_vector_ref(sexp_opcode_argn_type(self), SEXP_ZERO)); in sexp_start_sha()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/srfi/18/ |
H A D | threads.c | 350 return sexp_vector_ref(sexp_global(ctx, SEXP_G_SIGNAL_HANDLERS), signum); in sexp_get_signal_handler()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/doc/ |
H A D | chibi.scrbl | 797 \item{\ccode{sexp_vector_ref(vec, i)} - the \var{i}'th object of vector \var{vec}}
|