Home
last modified time | relevance | path

Searched refs:SG_UNBOUNDP (Results 1 – 25 of 37) sorted by relevance

12

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dvminsn.c225 …SG_UNBOUNDP(id1164)){{id1164=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1166),… in CASE()
238 …ng(SG_IDENTIFIER_LIBRARY(var),SG_IDENTIFIER_NAME(var),SG_UNBOUND));if (SG_UNBOUNDP(oldval)){{oldva… in CASE()
993 …SG_UNBOUNDP(id1183)){{id1183=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1185),… in CASE()
1020 …SG_UNBOUNDP(id1187)){{id1187=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1189),… in CASE()
1031 …SG_UNBOUNDP(id1190)){{id1190=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1192),… in CASE()
1178 …SG_UNBOUNDP(id1193)){{id1193=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1195),… in CASE()
1189 …SG_UNBOUNDP(id1196)){{id1196=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1198),… in CASE()
1248 …SG_UNBOUNDP(id1199)){{id1199=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1201),… in CASE()
1259 …SG_UNBOUNDP(id1202)){{id1202=(Sg_Apply3((&(Sg_GenericUnboundVariable)),SG_IDENTIFIER_NAME(id1204),… in CASE()
H A Dlib_regex.stub50 (when (SG_UNBOUNDP group) (set! group (SG_MAKE_INT 0)))
58 (when (SG_UNBOUNDP group) (set! group (SG_MAKE_INT 0)))
68 (when (SG_UNBOUNDP group) (set! group (SG_MAKE_INT 0)))
H A Dlib_flonums.stub226 (cond ((SG_UNBOUNDP fl1) (result (Sg_MakeFlonum 0.0)))
227 ((SG_UNBOUNDP fl2)
238 (cond ((SG_UNBOUNDP fl1) (result SG_FL_POSITIVE_ONE))
239 ((SG_UNBOUNDP fl2)
251 (if (SG_UNBOUNDP fl2)
261 (if (SG_UNBOUNDP fl2)
327 (if (SG_UNBOUNDP fl2)
352 (if (SG_UNBOUNDP fl2)
H A Dcompare.c599 if (SG_UNBOUNDP(xe) || SG_UNBOUNDP(ye)) return SG_FALSE; in pre_p()
755 if (SG_UNBOUNDP(xe) || SG_UNBOUNDP(ye)) return SG_FALSE; in fast_p()
931 if (SG_UNBOUNDP(xe) || SG_UNBOUNDP(ye)) return SG_FALSE; in slow_p()
H A Dweak.c108 if (SG_UNBOUNDP(fallback)) { in Sg_WeakVectorRef()
115 if (SG_UNBOUNDP(fallback)) return SG_FALSE; in Sg_WeakVectorRef()
276 if (e && SG_UNBOUNDP(e)) { in key_finalizer()
412 if (!SG_UNBOUNDP(v)) {
H A Dlib_fixnums.stub165 (if (SG_UNBOUNDP o)
236 (cond ((SG_UNBOUNDP fx1) (result (SG_MAKE_INT -1)))
238 (if (SG_UNBOUNDP fx2)
256 (cond ((SG_UNBOUNDP fx1) (result (SG_MAKE_INT 0)))
258 (if (SG_UNBOUNDP fx2)
276 (cond ((SG_UNBOUNDP fx1) (result (SG_MAKE_INT 0)))
278 (if (SG_UNBOUNDP fx2)
H A Dload.c76 if (SG_UNBOUNDP(gloc)) { in Sg_Load()
103 if (SG_UNBOUNDP(gloc)) { in Sg_LoadFromPort()
H A Dkeyword.c111 if (SG_UNBOUNDP(fallback)) { in Sg_GetKeyword()
H A Dlib_core.stub264 (if (SG_UNBOUNDP base)
671 (when (SG_UNBOUNDP fallback)
1759 (when (SG_UNBOUNDP mode)
1790 (if (SG_UNBOUNDP p)
2225 (if (SG_UNBOUNDP p)
2234 (if (SG_UNBOUNDP p)
2316 (when (SG_UNBOUNDP mode)
2446 (if (SG_UNBOUNDP obj)
2472 (if (SG_UNBOUNDP ei2)
2483 (if (SG_UNBOUNDP ei2)
[all …]
H A Dlib_proc.stub68 (if (SG_UNBOUNDP g)
H A Dlib_fixnums.c1440 if (SG_UNBOUNDP(o)){ in sagittarius_fixnums_fx_()
1641 if (!SG_UNBOUNDP(fx1_scm) && !SG_EXACT_INTP(fx1_scm)) in sagittarius_fixnums_fxand()
1650 if (!SG_UNBOUNDP(fx2_scm) && !SG_EXACT_INTP(fx2_scm)) in sagittarius_fixnums_fxand()
1663 if (SG_UNBOUNDP(fx2)){ in sagittarius_fixnums_fxand()
1701 if (!SG_UNBOUNDP(fx1_scm) && !SG_EXACT_INTP(fx1_scm)) in sagittarius_fixnums_fxior()
1710 if (!SG_UNBOUNDP(fx2_scm) && !SG_EXACT_INTP(fx2_scm)) in sagittarius_fixnums_fxior()
1721 if (SG_UNBOUNDP(fx1)){SG_RESULT=(SG_MAKE_INT(0));}else if( in sagittarius_fixnums_fxior()
1723 if (SG_UNBOUNDP(fx2)){ in sagittarius_fixnums_fxior()
1761 if (!SG_UNBOUNDP(fx1_scm) && !SG_EXACT_INTP(fx1_scm)) in sagittarius_fixnums_fxxor()
1770 if (!SG_UNBOUNDP(fx2_scm) && !SG_EXACT_INTP(fx2_scm)) in sagittarius_fixnums_fxxor()
[all …]
H A Dclosure.c204 if (SG_UNBOUNDP(id_or_gloc)) { in check_gref_call()
H A Dpair.c332 if (SG_UNBOUNDP(fallback)) { in Sg_ListTail()
352 if (SG_UNBOUNDP(fallback)) { in Sg_ListRef()
H A Dprofiler.c115 if (SG_UNBOUNDP(e)) { in collect_samples()
H A Dlib_sagittarius.stub144 (if (SG_UNBOUNDP handler)
210 (define-c-proc unbound? (o) ::<boolean> :constant SG_UNBOUNDP)
219 (if (SG_UNBOUNDP paths)
335 (when (SG_UNBOUNDP prefix) (set! prefix NULL))
342 (if (SG_UNBOUNDP other)
502 (cond ((SG_UNBOUNDP path)
1306 (if (SG_UNBOUNDP obj)
1536 ((SG_UNBOUNDP fallback) (result SG_FALSE))
1554 (if (SG_UNBOUNDP fallback)
1584 (unless (SG_UNBOUNDP ,default) (set! v ,default))
[all …]
H A Dlibrary.c985 if (!SG_UNBOUNDP(ret)) return ret; in find_binding()
989 if (SG_UNBOUNDP(ret)) { in find_binding()
1078 if (SG_UNBOUNDP(v)) { in Sg_InsertSandboxBinding()
H A Dlib_flonums.c1748 if (!SG_UNBOUNDP(fl1_scm) && !SG_NUMBERP(fl1_scm)) in sagittarius_flonums_fl_2b()
1757 if (!SG_UNBOUNDP(fl2_scm) && !SG_NUMBERP(fl2_scm)) in sagittarius_flonums_fl_2b()
1769 SG_UNBOUNDP(fl2)){ in sagittarius_flonums_fl_2b()
1801 if (!SG_UNBOUNDP(fl1_scm) && !SG_NUMBERP(fl1_scm)) in sagittarius_flonums_fl_2a()
1810 if (!SG_UNBOUNDP(fl2_scm) && !SG_NUMBERP(fl2_scm)) in sagittarius_flonums_fl_2a()
1822 SG_UNBOUNDP(fl2)){ in sagittarius_flonums_fl_2a()
1859 if (!SG_UNBOUNDP(fl2_scm) && !SG_NUMBERP(fl2_scm)) in sagittarius_flonums_fl_()
1870 if (SG_UNBOUNDP(fl2)){ in sagittarius_flonums_fl_()
1916 if (SG_UNBOUNDP(fl2)){ in sagittarius_flonums_fl_2f()
2421 if (SG_UNBOUNDP(fl2)){ in sagittarius_flonums_fllog()
[all …]
H A Dlib_core.c1998 if (SG_UNBOUNDP(base)){ in core_log()
8964 if ((SG_UNBOUNDP(mode))||( in core_make_transcoder()
9614 if (SG_UNBOUNDP(mode)){{ in core_open_file_input_port()
9788 if (SG_UNBOUNDP(p)){ in core_current_input_port()
10874 if (SG_UNBOUNDP(p)){ in core_current_output_port()
10908 if (SG_UNBOUNDP(p)){ in core_current_error_port()
11358 if (SG_UNBOUNDP(mode)){{ in core_open_file_input_2foutput_port()
11985 if (SG_UNBOUNDP(obj)){ in core_exit()
12063 if (SG_UNBOUNDP(ei2)){ in core_bitwise_and()
12114 if (SG_UNBOUNDP(ei2)){ in core_bitwise_ior()
[all …]
H A Dreader.c1841 if (!SG_UNBOUNDP(sr[i].disp[j].sfunc) || sr[i].disp[j].cfunc) { in add_read_table()
1847 } else if (!SG_UNBOUNDP(sr[i].sfunc)) { in add_read_table()
1930 if (SG_UNBOUNDP(e)) return FALSE; in Sg_ConstantLiteralP()
1940 if (SG_UNBOUNDP(e)) { in Sg_AddConstantLiteral()
2094 return Sg_Values2(SG_UNBOUNDP(r->sfunc) ? SG_UNBOUND : r->sfunc, term); in Sg_GetMacroCharacter()
2155 return SG_UNBOUNDP(r->disp[subc].sfunc) ? SG_UNBOUND : r->disp[subc].sfunc; in Sg_GetDispatchMacroCharacter()
H A Dcache.c258 if (!SG_UNBOUNDP(Sg_HashTableRef(seen, obj, SG_UNBOUND))) return TRUE; in cachable_p()
1622 if (SG_UNBOUNDP(o)) { in make_shared_ref()
1642 if (SG_UNBOUNDP(o)) { in read_lookup()
1736 if (SG_UNBOUNDP(o)) { in get_shared()
2340 if (SG_UNBOUNDP(g)) Sg_Panic("macro-transform wasn't found"); in Sg__PostInitCache()
H A Dlib_proc.c306 if (SG_UNBOUNDP(g)){ in sagittarius_compiler_procedure_find_procedure()
H A Dcore.c673 if (SG_UNBOUNDP(start)) Sg_Panic("`start` is not found"); in Sg_Start()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/crypto/
H A Dcrypto_stub.stub75 (if (SG_UNBOUNDP iv)
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dsagittariusdefs.h359 #define SG_UNBOUNDP(obj) ((obj) == SG_UNBOUND) macro
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/ext/threads/
H A Dthreads_stub.stub101 ((SG_UNBOUNDP thread) (set! owner (Sg_VM)))

12