Home
last modified time | relevance | path

Searched refs:SG_STRINGP (Results 1 – 25 of 33) sorted by relevance

12

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/crypto/
H A Dmath_stub.stub69 (unless (or (SG_HASH_P h) (SG_STRINGP h))
72 (when (SG_STRINGP h) (set! h (Sg_MakeHash (SG_STRING h))))
77 (SG_STRINGP h))
80 (when (SG_STRINGP h) (set! h (Sg_MakeHash (SG_STRING h))))
85 (SG_STRINGP h))
88 (when (SG_STRINGP h) (set! h (Sg_MakeHash (SG_STRING h))))
H A Dhash.c306 if (SG_STRINGP(name)) { in Sg_LookupHash()
387 if (!SG_STRINGP(value) && !SG_FALSEP(value)) { in uh_oid_set()
H A Drandom.c251 if (SG_STRINGP(name)) { in Sg_LookupPrng()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dcompare.c149 return SG_MAKE_BOOL(SG_STRINGP(args[0]));
156 if (!SG_STRINGP(args[0])) { in string_hash()
167 if (!SG_STRINGP(args[0]) || !SG_STRINGP(args[1])) { in string_eq()
180 if (!SG_STRINGP(args[0]) || !SG_STRINGP(args[1])) { in string_cmp()
317 if (SG_STRINGP(x) && SG_STRINGP(y)) in Sg_Compare()
456 if (SG_STRINGP(x)) {
457 if (!SG_STRINGP(y)) return FALSE;
562 if (SG_STRINGP(x)) { in pre_p()
563 if (!SG_STRINGP(y)) { in pre_p()
721 if (SG_STRINGP(x)) { in fast_p()
[all …]
H A Dlib_regex.stub92 (unless (or (and (SG_STRINGP replacement) (SG_TEXT_MATCHER m))
102 (unless (or (and (SG_STRINGP replacement) (SG_TEXT_MATCHER m))
112 (unless (or (and (SG_STRINGP replacement) (SG_TEXT_MATCHER m))
H A Dfile.c297 if (SG_STRINGP(SG_CAR(p))) { in convert_star()
431 !(SG_STRINGP(SG_CAR(pat)) && in glob_match1()
446 if (SG_STRINGP(p)) { in glob_match1()
496 } else if (SG_STRINGP(SG_CAAR(pat)) && SG_NULLP(SG_CDAR(pat))) { in glob_match()
H A Dlib_sagittarius.c3778 if (!SG_STRINGP(p_scm)) in sagittarius_directory_name()
4005 if (!SG_STRINGP(s1_scm)) in sagittarius_string_scan()
4082 if (!SG_STRINGP(s_scm)) in sagittarius__25maybe_substring()
4129 if (!SG_STRINGP(s_scm)) in sagittarius_string_titlecase_2fspecial_casing()
4172 if (!SG_STRINGP(s_scm)) in sagittarius_literal_stringP()
4201 if (!SG_STRINGP(s_scm)) in sagittarius_string_TOistring()
5313 SG_STRINGP(p)){ in sagittarius_format()
5357 SG_STRINGP(p)){ in sagittarius_format_2fss()
5465 if (!SG_STRINGP(id_scm)) in sagittarius_make_custom_binary_bidirectional_port()
5524 if (!SG_STRINGP(id_scm)) in sagittarius_make_custom_textual_bidirectional_port()
[all …]
H A Dstring.c159 ASSERT(SG_STRINGP(r)); in makestring()
331 if (!SG_STRINGP(SG_CAR(cp))) { in Sg_StringAppend()
577 return SG_STRINGP(obj); in Sg_IsString()
H A Dsymbol.c57 ASSERT(SG_STRINGP(obj->name)); in symbol_print()
H A Dlib_regex.c250 if (!SG_STRINGP(p_scm)) in sagittarius_regex_impl_compile_regex()
759 if ((!((((SG_STRINGP(replacement))&&(SG_TEXT_MATCHER(m)))||( in sagittarius_regex_impl__25regex_replace_all()
796 if ((!((((SG_STRINGP(replacement))&&(SG_TEXT_MATCHER(m)))||( in sagittarius_regex_impl__25regex_replace_first()
840 if ((!((((SG_STRINGP(replacement))&&(SG_TEXT_MATCHER(m)))||( in sagittarius_regex_impl__25regex_replace()
987 if (!SG_STRINGP(s_scm)) in sagittarius_regex_impl_parse_char_set_string()
1086 if (!SG_STRINGP(text_scm)) in sagittarius_regex_impl_regex_text_matcher()
H A Dlibrary.c198 if (SG_STRINGP(name)) return Sg_Intern(name); in convert_name_to_symbol()
1111 if (SG_STRINGP(path)) { in Sg_FindDefaultDirectiveByPath()
1133 if (SG_STRINGP(conf)) { in Sg_AddLoadSuffix()
1136 if (SG_STRINGP(SG_CAR(conf)) && SG_SYMBOLP(SG_CDR(conf))) { in Sg_AddLoadSuffix()
H A Dlib_core.c727 SG_RESULT=(SG_STRINGP(o)); in core_stringP()
2628 if (!SG_STRINGP(s_scm)) in core_string_TOnumber()
4340 if (!SG_STRINGP(z_scm)) in core_string_TOsymbol()
4625 if (!SG_STRINGP(s_scm)) in core_string_length()
4654 if (!SG_STRINGP(s_scm)) in core_string_ref()
4878 if (!SG_STRINGP(s_scm)) in core_substring()
4963 if (!SG_STRINGP(s_scm)) in core_string_TOlist()
5057 if (!SG_STRINGP(s_scm)) in core_string_copy()
5929 if (!SG_STRINGP(s_scm)) in core_string_upcase()
5978 if (!SG_STRINGP(s_scm)) in core_string_downcase()
[all …]
H A Dload.c231 if (SG_STRINGP(initfn)) { in get_initfn_name()
H A Dcache.c246 (!SG_PTRP(obj) || SG_SYMBOLP(obj) || SG_STRINGP(obj) || \
480 (SG_STRINGP(obj) || SG_SYMBOLP(obj) || SG_KEYWORDP(obj) || \
509 if (SG_STRINGP(obj) || SG_SYMBOLP(obj) || SG_KEYWORDP(obj)) { in write_cache_scan()
858 if (!(!SG_PTRP(o) || SG_SYMBOLP(o) || SG_STRINGP(o) || in write_object_cache()
870 } else if (SG_STRINGP(o)) { in write_object_cache()
H A Dlib_sagittarius.stub225 (unless (SG_STRINGP path)
597 (cond ((SG_STRINGP s2) (result (Sg_StringScan s1 (SG_STRING s2) rmode)))
990 ((SG_STRINGP p)
1011 ((SG_STRINGP p)
1293 (cond ((SG_STRINGP value)
1688 (SG_STRINGP ,val))
1700 (unless (SG_STRINGP arg)
1704 (unless (or (SG_STRINGP directory) (SG_FALSEP directory))
1716 (when (SG_STRINGP directory) (set! d (SG_STRING directory)))
H A Dtranscoder.c298 if (!SG_STRINGP(r)) { in Sg_TranscoderRead()
H A Dexceptions.c863 if (SG_STRINGP(v)) { in describe_simple()
869 if (SG_STRINGP(v)) { in describe_simple()
H A Dhashtable.c221 } else if (SG_STRINGP(obj)) { in equal_hash_rec()
437 if (!SG_STRINGP(key)) { in string_access()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dstring.h65 #define SG_STRINGP(obj) SG_XTYPEP(obj, SG_CLASS_STRING) macro
68 (SG_STRINGP(obj) && SG_STRING(obj)->immutablep)
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/os/posix/
H A Dsystem.c610 } else if (SG_STRINGP(*port) || SG_EQ(*port, SG_KEYWORD_NULL)) { in init_fd()
614 if (SG_STRINGP(*port)) { in init_fd()
650 if (SG_STRINGP(*port)) { in init_fd()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/os/win/
H A Dsystem.c518 } else if (SG_STRINGP(*port) || SG_EQ(*port, SG_KEYWORD_NULL)) { in init_fd()
524 if (SG_STRINGP(*port)) { in init_fd()
565 if (SG_STRINGP(*port)) { in init_fd()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/threads/
H A Dthreads_stub.stub152 (unless (or (SG_FALSEP name) (SG_STRINGP name))
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/ffi/
H A Dsagittarius-ffi.c1019 } else if (SG_STRINGP(obj)) { in push_ffi_type_value()
1235 if (SG_STRINGP(v)) { \ in convert_scheme_to_c_value()
1549 || SG_STRINGP(arg) || SG_CALLBACKP(arg)) { in set_ffi_varargs_parameter_types()
1573 } else if (SG_STRINGP(arg)) { in push_varargs_ffi_type_value()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/odbc/
H A Dodbc.c308 } else if (SG_STRINGP(value)) { in Sg_BindParameter()
811 if (!SG_STRINGP(SG_CAR(cp))) { in string_join()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/socket/
H A Dsocket_stub.stub11 `(unless (or (SG_STRINGP ,o)

12