/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/ |
H A D | lib_proc.c | 38 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_name() 61 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_inliner() 86 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_inliner_setX() 110 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_reqargs() 133 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_optional() 156 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_optionalP() 179 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_transparentP() 209 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_no_side_effectP() 239 if (!SG_PROCEDUREP(arg0_scm)) in sagittarius_compiler_procedure_procedure_errorP() 274 SG_RESULT=(((SG_PROCEDUREP(arg0))&&( in sagittarius_compiler_procedure_inlineP()
|
H A D | subr.c | 124 if (SG_PROCEDUREP(proc)) { in Sg_Setter() 134 if (SG_PROCEDUREP(proc)) { in Sg_HasSetter()
|
H A D | lib_regex.stub | 94 (SG_PROCEDUREP replacement)) 104 (SG_PROCEDUREP replacement)) 114 (SG_PROCEDUREP replacement))
|
H A D | lib_clos.stub | 119 (unless (or (SG_FALSEP getter) (SG_PROCEDUREP getter)) 123 (unless (or (SG_FALSEP setter) (SG_PROCEDUREP setter)) 127 (unless (or (SG_FALSEP bound?) (SG_PROCEDUREP bound?))
|
H A D | lib_proc.stub | 62 (result (and (SG_PROCEDUREP arg0)
|
H A D | port.c | 1911 if (SG_PROCEDUREP(SG_CUSTOM_PORT(self)->flush)) { in custom_flush() 1919 if (SG_PROCEDUREP(SG_CUSTOM_PORT(self)->close)) { in custom_close() 1930 if (SG_PROCEDUREP(SG_CUSTOM_PORT(self)->ready)) { in custom_ready() 1941 if (!SG_PROCEDUREP(SG_CUSTOM_PORT(self)->getPosition)) { in custom_port_position() 1967 if (!SG_PROCEDUREP(SG_CUSTOM_PORT(port)->setPosition)) { in custom_binary_set_port_position() 2003 if (!SG_PROCEDUREP(SG_CUSTOM_PORT(port)->setPosition)) { in custom_textual_set_port_position() 2079 if (SG_PROCEDUREP(proc)) { in wrap_custom_set_procedure() 2336 #define PROC_OR_FALSE(o) (SG_FALSEP(o) || SG_PROCEDUREP(o)) 3056 SG_PROCEDUREP(SG_CUSTOM_PORT(port)->getPosition); in Sg_HasPortPosition() 3065 SG_PROCEDUREP(SG_CUSTOM_PORT(port)->setPosition); in Sg_HasSetPortPosition()
|
H A D | closure.c | 213 if (!SG_PROCEDUREP(proc)) return SG_CLOSURE_SIDE_EFFECT; in check_gref_call()
|
H A D | cache.c | 283 (SG_PROCEDUREP(klass->creader) && SG_PROCEDUREP(klass->cwriter))); in cachable_p() 489 return klass->cacheScanner != NULL || SG_PROCEDUREP(klass->cscanner); in interesting_p() 553 if (SG_PROCEDUREP(klass->cscanner)) { in write_cache_scan() 952 if (SG_PROCEDUREP(klass->cwriter) && SG_LIBRARYP(library)) { in write_object_cache() 1715 if (SG_PROCEDUREP(SG_CLASS(klass)->creader)) { in read_user_defined_object()
|
H A D | lib_clos.c | 743 if ((!((SG_FALSEP(getter))||(SG_PROCEDUREP(getter))))){{ in sagittarius_clos__25make_slot_accessor() 749 if ((!((SG_FALSEP(setter))||(SG_PROCEDUREP(setter))))){{ in sagittarius_clos__25make_slot_accessor() 755 if ((!((SG_FALSEP(boundP))||(SG_PROCEDUREP(boundP))))){{ in sagittarius_clos__25make_slot_accessor()
|
H A D | vmcall.c | 150 if (MOSTLY_FALSE(!SG_PROCEDUREP(AC(vm)))) {
|
H A D | lib_core.c | 767 SG_RESULT=(SG_PROCEDUREP(o)); in core_procedureP() 5532 if (!SG_PROCEDUREP(proc_scm)) in core_apply() 5574 if (!SG_PROCEDUREP(proc_scm)) in core_call_2fcc() 5597 if (!SG_PROCEDUREP(proc_scm)) in core_call_with_current_continuation() 9826 if (!SG_PROCEDUREP(read_scm)) in core_make_custom_binary_input_port() 9892 if (!SG_PROCEDUREP(read_scm)) in core_make_custom_textual_input_port() 10942 if (!SG_PROCEDUREP(write_scm)) in core_make_custom_binary_output_port() 10995 if (!SG_PROCEDUREP(write_scm)) in core_make_custom_textual_output_port() 11429 if (!SG_PROCEDUREP(read_scm)) in core_make_custom_binary_input_2foutput_port() 11434 if (!SG_PROCEDUREP(write_scm)) in core_make_custom_binary_input_2foutput_port() [all …]
|
H A D | clos.c | 1196 if (boundp && SG_PROCEDUREP(accessor->boundP)) { in slot_ref_rec() 1203 } else if (!SG_PROCEDUREP(accessor->getterS)) { in slot_ref_rec() 1252 if (!SG_PROCEDUREP(accessor->setterS)) { in slot_set_rec() 1663 if (!SG_PROCEDUREP(proc)) { in class_cache_reader_set() 1676 if (!SG_PROCEDUREP(proc)) { in class_cache_writer_set() 1689 if (!SG_PROCEDUREP(proc)) { in class_cache_scanner_set()
|
H A D | lib_regex.c | 761 SG_PROCEDUREP(replacement))))){{ in sagittarius_regex_impl__25regex_replace_all() 798 SG_PROCEDUREP(replacement))))){{ in sagittarius_regex_impl__25regex_replace_first() 842 SG_PROCEDUREP(replacement))))){{ in sagittarius_regex_impl__25regex_replace()
|
H A D | lib_sagittarius.c | 2213 if (!SG_PROCEDUREP(p_scm)) in sagittarius_arity() 3035 if (!SG_PROCEDUREP(proc_scm)) in sagittarius_setter_SETTER() 4583 if (!SG_PROCEDUREP(proc_scm)) in sagittarius_hashtable_updateX() 5470 if (!SG_PROCEDUREP(read_scm)) in sagittarius_make_custom_binary_bidirectional_port() 5529 if (!SG_PROCEDUREP(read_scm)) in sagittarius_make_custom_textual_bidirectional_port() 5584 if (!SG_PROCEDUREP(g_scm)) in sagittarius_make_codec() 5589 if (!SG_PROCEDUREP(p_scm)) in sagittarius_make_codec() 6205 if (!SG_PROCEDUREP(c_scm)) in sagittarius_disasm() 7646 if (!SG_PROCEDUREP(proc_scm)) in sagittarius__25set_macro_character() 7773 if (!SG_PROCEDUREP(proc_scm)) in sagittarius__25set_dispatch_macro_character() [all …]
|
H A D | hashtable.c | 945 if (!SG_PROCEDUREP(SG_COMPARATOR(comparator)->hashFn) || in Sg_MakeHashTableWithComparator() 946 !SG_PROCEDUREP(SG_COMPARATOR(comparator)->eqFn)) { in Sg_MakeHashTableWithComparator()
|
H A D | lib_treemap.c | 1026 if (!SG_PROCEDUREP(cmp_scm)) in sagittarius_treemap_make_rb_treemap() 1059 if ((!((SG_PROCEDUREP(p))&&( in sagittarius_treemap_make_rb_treemap_2fcomparator() 1377 if (!SG_PROCEDUREP(proc_scm)) in sagittarius_treemap_treemap_updateX() 1479 if (!SG_PROCEDUREP(failure_scm)) in sagittarius_treemap_treemap_higher_entry() 1516 if (!SG_PROCEDUREP(failure_scm)) in sagittarius_treemap_treemap_lower_entry()
|
H A D | vm.c | 608 if (!SG_PROCEDUREP(cl)) return; in format_stack_trace() 1713 if (SG_PROCEDUREP(cl)) { in get_stack_trace() 1754 if (!SG_PROCEDUREP(cl)) { in get_stack_trace() 2053 ASSERT(SG_PROCEDUREP(program)); in evaluate_safe()
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/crypto/ |
H A D | crypto.c | 298 if (!SG_PROCEDUREP(SG_CIPHER_SPI(spi)->keysize)) { in Sg_VMCipherSuggestKeysize() 449 } else if (SG_PROCEDUREP(SG_CIPHER_SPI(crypto->spi)->updateAAD)) { in Sg_VMCipherUpdateAAD() 483 } else if (SG_PROCEDUREP(SG_CIPHER_SPI(crypto->spi)->tag)) { in Sg_VMCipherTag() 518 if (!SG_PROCEDUREP(SG_CIPHER_SPI(crypto->spi)->signer)) { in Sg_VMCipherSignature() 537 if (!SG_PROCEDUREP(SG_CIPHER_SPI(crypto->spi)->verifier)) { in Sg_VMCipherVerify() 685 if (!SG_PROCEDUREP(value)) { in ci_encrypt_set() 693 if (!SG_PROCEDUREP(value)) { in ci_decrypt_set() 701 if (SG_FALSEP(value) || SG_PROCEDUREP(value)) { in ci_padder_set() 736 if (SG_FALSEP(value) || SG_PROCEDUREP(value)) { in ci_updateAAD_set() 745 if (SG_FALSEP(value) || SG_PROCEDUREP(value)) { in ci_tag_set()
|
H A D | hash.c | 345 if (!SG_PROCEDUREP(value)) { in uh_init_set() 352 if (!SG_PROCEDUREP(value)) { in uh_process_set() 359 if (!SG_PROCEDUREP(value)) { in uh_done_set()
|
H A D | random.c | 271 if (!SG_PROCEDUREP(value)) { in up_seed_set() 278 if (!SG_PROCEDUREP(value)) { in up_read_set()
|
H A D | crypto_stub.stub | 35 (SG_PROCEDUREP padder))
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/ |
H A D | subr.h | 97 #define SG_PROCEDUREP(obj) \ macro 137 (SG_PROCEDUREP(obj) && SG_PROCEDURE_TYPE(obj) == SG_PROC_SUBR)
|
H A D | closure.h | 44 #define SG_CLOSUREP(obj) (SG_PROCEDUREP(obj) && (SG_PROCEDURE_TYPE(obj)) == SG_PROC_CLOSURE)
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/socket/ |
H A D | tls_socket_stub.stub | 90 (unless (or (SG_FALSEP callback) (SG_PROCEDUREP callback)) 112 (unless (or (SG_BOOLP proc) (SG_PROCEDUREP proc))
|
H A D | tls_openssl.c | 528 if (SG_PROCEDUREP(verifier)) { in verify_callback()
|