Home
last modified time | relevance | path

Searched refs:SG_OBJ (Results 1 – 25 of 87) sorted by relevance

1234

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dbuiltin-symbols.h5 #define SG_SYMBOL_QUOTE SG_OBJ(&Sg_BuiltinSymbols[0])
7 #define SG_SYMBOL_UNQUOTE SG_OBJ(&Sg_BuiltinSymbols[2])
9 #define SG_SYMBOL_SYNTAX SG_OBJ(&Sg_BuiltinSymbols[4])
13 #define SG_SYMBOL_DEFINE SG_OBJ(&Sg_BuiltinSymbols[8])
15 #define SG_SYMBOL_LET SG_OBJ(&Sg_BuiltinSymbols[10])
19 #define SG_SYMBOL_SET SG_OBJ(&Sg_BuiltinSymbols[14])
21 #define SG_SYMBOL_DOT SG_OBJ(&Sg_BuiltinSymbols[16])
26 #define SG_SYMBOL_IF SG_OBJ(&Sg_BuiltinSymbols[21])
27 #define SG_SYMBOL_AND SG_OBJ(&Sg_BuiltinSymbols[22])
28 #define SG_SYMBOL_OR SG_OBJ(&Sg_BuiltinSymbols[23])
[all …]
H A Dbuiltin-keywords.h5 #define SG_KEYWORD_LAMBDA_LIST SG_OBJ(&Sg_BuiltinKeywords[0])
6 #define SG_KEYWORD_QUALIFIER SG_OBJ(&Sg_BuiltinKeywords[1])
8 #define SG_KEYWORD_GENERIC SG_OBJ(&Sg_BuiltinKeywords[3])
9 #define SG_KEYWORD_PROCEDURE SG_OBJ(&Sg_BuiltinKeywords[4])
11 #define SG_KEYWORD_PRIMARY SG_OBJ(&Sg_BuiltinKeywords[6])
12 #define SG_KEYWORD_BEFORE SG_OBJ(&Sg_BuiltinKeywords[7])
13 #define SG_KEYWORD_AFTER SG_OBJ(&Sg_BuiltinKeywords[8])
14 #define SG_KEYWORD_AROUND SG_OBJ(&Sg_BuiltinKeywords[9])
18 #define SG_KEYWORD_ALL SG_OBJ(&Sg_BuiltinKeywords[13])
21 #define SG_KEYWORD_PIPE SG_OBJ(&Sg_BuiltinKeywords[16])
[all …]
H A Dsagittariusdefs.h315 #define SG_OBJ(obj) ((SgObject)(obj)) macro
347 #define SG_FALSE SG_OBJ(SG__MAKE_ITAG(0)) /* #f */
348 #define SG_TRUE SG_OBJ(SG__MAKE_ITAG(1)) /* #t */
349 #define SG_NIL SG_OBJ(SG__MAKE_ITAG(2)) /* '() */
350 #define SG_EOF SG_OBJ(SG__MAKE_ITAG(3)) /* eof-object */
351 #define SG_UNDEF SG_OBJ(SG__MAKE_ITAG(4)) /* undefined */
352 #define SG_UNBOUND SG_OBJ(SG__MAKE_ITAG(5)) /* unbound */
371 #define SG_MAKE_INT(obj) SG_OBJ(((long)((unsigned long)(obj) << 2) + 1))
373 #define SG_ENSURE_INT(obj) SG_OBJ((long)(obj) | 1)
382 #define SG_MAKE_CHAR(obj) SG_OBJ(((unsigned long)(obj) << 8) + 0x03)
[all …]
H A Dcollection.h73 #define SG_DICT_ENTRY_KEY(e) SG_OBJ((e)->key)
74 #define SG_DICT_ENTRY_VALUE(e) SG_OBJ((e)->value)
76 SG_OBJ((e)->value = (intptr_t)v)
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dcompiler.c164 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[4])) /* #<code-builder #f (0 0 3)> */,
356 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[21])) /* #<code-builder #f (0 0 2)> */,
1173 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[69])) /* #<code-builder #f (0 0 4)> */,
1196 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[70])) /* #<code-builder #f (1 0 4)> */,
1288 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[72])) /* #<code-builder #f (0 0 6)> */,
1308 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[73])) /* #<code-builder #f (1 0 1)> */,
1401 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[75])) /* #<code-builder #f (0 0 7)> */,
1421 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[76])) /* #<code-builder #f (1 0 1)> */,
1532 SG_WORD(SG_OBJ(&sg__rc_cgen8923.d14398[78])) /* #<code-builder #f (0 0 7)> */,
56802 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen8923.d14398[791]));
[all …]
H A Dlib_macro.c1584 SG_WORD(SG_OBJ(&sg__rc_cgen8687.d8803[39])) /* #<code-builder #f (2 0 1)> */,
7655 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[0]), SG_FALSE, 3, 0, 0, 14, 20),
7658 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[20]), SG_FALSE, 2, 0, 0, 10, 8),
7667 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[107]), SG_FALSE, 1, 0, 0, 7, 2),
7685 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[250]), SG_FALSE, 1, 0, 0, 8, 4),
7688 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[254]), SG_FALSE, 1, 0, 0, 7, 2),
7706 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[559]), SG_FALSE, 0, 0, 0, 7, 5),
7718 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[711]), SG_FALSE, 1, 0, 0, 8, 4),
7721 (SgWord *)SG_OBJ(&sg__rc_cgen8687.d8801[715]), SG_FALSE, 1, 0, 0, 8, 4),
7992 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen8687.d8803[111]));
[all …]
H A Dlib_errors.c1143 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[0]), SG_FALSE, 1, 0, 0, 14, 42),
1146 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[42]), SG_FALSE, 1, 0, 0, 10, 15),
1149 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[57]), SG_FALSE, 1, 0, 0, 20, 81),
1188 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[662]), SG_FALSE, 3, 0, 0, 13, 8),
1194 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[680]), SG_FALSE, 3, 0, 0, 13, 8),
1197 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[688]), SG_FALSE, 3, 0, 0, 13, 8),
1203 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[739]), SG_FALSE, 3, 0, 0, 13, 8),
1206 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[747]), SG_FALSE, 4, 0, 0, 15, 9),
1209 (SgWord *)SG_OBJ(&sg__rc_cgen14489.d14514[756]), SG_FALSE, 0, 0, 0, 0, 92),
1213 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen14489.d14515[22]));
[all …]
H A Dlib_scmlib.c6414 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[0]), SG_FALSE, 2, 0, 0, 16, 31),
6426 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[96]), SG_FALSE, 1, 0, 0, 9, 9),
6432 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[130]), SG_FALSE, 1, 0, 0, 9, 9),
6450 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[536]), SG_FALSE, 1, 0, 0, 9, 6),
6468 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[668]), SG_FALSE, 1, 0, 2, 9, 7),
6471 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[675]), SG_FALSE, 1, 0, 1, 8, 4),
6480 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[735]), SG_FALSE, 1, 0, 2, 9, 7),
6483 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[742]), SG_FALSE, 1, 0, 1, 8, 4),
6492 (SgWord *)SG_OBJ(&sg__rc_cgen8126.d8227[804]), SG_FALSE, 1, 0, 1, 8, 4),
6730 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen8126.d8228[104]));
[all …]
H A Dlib_arith.c149 SG_WORD(SG_OBJ(&sg__rc_cgen14520.d14530[0])) /* #<code-builder #f (1 0 1)> */,
217 SG_WORD(SG_OBJ(&sg__rc_cgen14520.d14530[2])) /* #<code-builder #f (1 0 1)> */,
490 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[0]), SG_FALSE, 1, 0, 1, 12, 29),
493 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[29]), SG_FALSE, 0, 1, 0, 19, 39),
496 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[68]), SG_FALSE, 1, 0, 1, 12, 29),
499 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[97]), SG_FALSE, 0, 1, 0, 26, 58),
502 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[155]), SG_FALSE, 2, 0, 0, 15, 18),
505 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[173]), SG_FALSE, 2, 0, 0, 15, 18),
514 (SgWord *)SG_OBJ(&sg__rc_cgen14520.d14529[342]), SG_FALSE, 0, 0, 0, 0, 28),
518 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen14520.d14530[8]));
[all …]
H A Dlib_program.c417 SG_WORD(SG_OBJ(&sg__rc_cgen14535.d14547[2])) /* #<code-builder repl (0 0 1)> */,
749 SG_WORD(SG_OBJ(&sg__rc_cgen14535.d14547[3])) /* #<code-builder script (3 0 0)> */,
753 SG_WORD(SG_OBJ(&sg__rc_cgen14535.d14547[4])) /* #<code-builder start (3 0 0)> */,
762 (SgWord *)SG_OBJ(&sg__rc_cgen14535.d14546[0]), SG_FALSE, 1, 0, 0, 9, 13),
765 (SgWord *)SG_OBJ(&sg__rc_cgen14535.d14546[13]), SG_FALSE, 1, 0, 0, 26, 101),
768 (SgWord *)SG_OBJ(&sg__rc_cgen14535.d14546[114]), SG_FALSE, 0, 0, 1, 16, 68),
771 (SgWord *)SG_OBJ(&sg__rc_cgen14535.d14546[182]), SG_FALSE, 3, 0, 0, 51, 264),
774 (SgWord *)SG_OBJ(&sg__rc_cgen14535.d14546[446]), SG_FALSE, 3, 0, 0, 25, 49),
777 (SgWord *)SG_OBJ(&sg__rc_cgen14535.d14546[495]), SG_FALSE, 0, 0, 0, 0, 34),
781 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen14535.d14547[5]));
[all …]
H A Dlib_treemap.c450 SG_WORD(SG_OBJ(&sg__rc_cgen13336.d13567[6])) /* #<code-builder #f (3 0 1)> */,
472 SG_WORD(SG_OBJ(&sg__rc_cgen13336.d13567[8])) /* #<code-builder #f (3 0 1)> */,
945 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[0]), SG_FALSE, 1, 0, 0, 12, 19),
948 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[19]), SG_FALSE, 1, 0, 0, 9, 9),
951 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[28]), SG_FALSE, 1, 0, 0, 9, 9),
960 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[179]), SG_FALSE, 2, 0, 0, 8, 5),
990 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[433]), SG_FALSE, 2, 0, 0, 8, 5),
993 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[438]), SG_FALSE, 2, 0, 1, 9, 4),
999 (SgWord *)SG_OBJ(&sg__rc_cgen13336.d13566[485]), SG_FALSE, 2, 0, 1, 9, 4),
1584 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen13336.d13567[23]));
[all …]
H A Dcharset.c111 return SG_OBJ(cs); in charset_cache_reader()
159 return SG_OBJ(dest); in Sg_CharSetCopy()
213 return SG_OBJ(cs); in Sg_CharSetAddRange()
236 return SG_OBJ(cs); in Sg_CharSetAddRange()
241 return SG_OBJ(cs); in Sg_CharSetAddRange()
245 return SG_OBJ(cs); in Sg_CharSetAddRange()
268 return SG_OBJ(dest); in Sg_CharSetAdd()
289 Sg_TreeMapCoreSet(cs->large, SG_OBJ(last+1), SG_OBJ(e->key-1), 0); in Sg_CharSetComplement()
294 Sg_TreeMapCoreSet(cs->large, SG_OBJ(last+1), SG_OBJ(SG_CHAR_MAX), 0); in Sg_CharSetComplement()
296 return SG_OBJ(cs); in Sg_CharSetComplement()
[all …]
H A Dlib_sandbox.c288 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[0]), SG_FALSE, 1, 0, 0, 10, 8),
291 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[8]), SG_FALSE, 0, 0, 0, 0, 8),
294 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[16]), SG_FALSE, 1, 0, 0, 10, 8),
297 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[24]), SG_FALSE, 1, 0, 0, 13, 16),
300 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[40]), SG_FALSE, 0, 0, 0, 0, 7),
303 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[47]), SG_FALSE, 1, 0, 0, 10, 8),
306 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[55]), SG_FALSE, 1, 0, 0, 11, 13),
309 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[68]), SG_FALSE, 1, 0, 0, 10, 8),
312 (SgWord *)SG_OBJ(&sg__rc_cgen13257.d13264[76]), SG_FALSE, 1, 0, 0, 14, 24),
373 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen13257.d13265[1]));
[all …]
H A Dcompiler-aux.c234 (SgWord *)SG_OBJ(&sg__rc_cgen8820.d8845[0]), SG_FALSE, 1, 0, 0, 14, 36),
237 (SgWord *)SG_OBJ(&sg__rc_cgen8820.d8845[36]), SG_FALSE, 0, 0, 0, 0, 66),
241 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen8820.d8846[1]));
295 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[2] = SG_WORD(sg__rc_cgen8820.d8844[3]); in Sg__Init_sagittarius_compiler_util()
296 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[6] = SG_WORD(sg__rc_cgen8820.d8844[5]); in Sg__Init_sagittarius_compiler_util()
297 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[9] = SG_WORD(sg__rc_cgen8820.d8844[8]); in Sg__Init_sagittarius_compiler_util()
298 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[13] = SG_WORD(sg__rc_cgen8820.d8844[10]); in Sg__Init_sagittarius_compiler_util()
299 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[16] = SG_WORD(sg__rc_cgen8820.d8844[12]); in Sg__Init_sagittarius_compiler_util()
300 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[20] = SG_WORD(sg__rc_cgen8820.d8844[14]); in Sg__Init_sagittarius_compiler_util()
301 ((SgWord*)SG_OBJ(&sg__rc_cgen8820.d8845[0]))[23] = SG_WORD(sg__rc_cgen8820.d8844[16]); in Sg__Init_sagittarius_compiler_util()
[all …]
H A Dlib_fixnums.c878 (SgWord *)SG_OBJ(&sg__rc_cgen10978.d11569[0]), SG_FALSE, 2, 0, 0, 11, 15),
881 (SgWord *)SG_OBJ(&sg__rc_cgen10978.d11569[15]), SG_FALSE, 2, 0, 0, 11, 15),
884 (SgWord *)SG_OBJ(&sg__rc_cgen10978.d11569[30]), SG_FALSE, 3, 0, 0, 25, 114),
896 (SgWord *)SG_OBJ(&sg__rc_cgen10978.d11569[624]), SG_FALSE, 0, 0, 0, 0, 28),
1668 SG_RESULT=(SG_OBJ((((intptr_t )(fx1)))&( in sagittarius_fixnums_fxand()
1674 {SgObject ret=SG_OBJ((((intptr_t )(fx1)))&( in sagittarius_fixnums_fxand()
1728 SG_RESULT=(SG_OBJ((((intptr_t )(fx1)))|( in sagittarius_fixnums_fxior()
1734 {SgObject ret=SG_OBJ((((intptr_t )(fx1)))|( in sagittarius_fixnums_fxior()
1794 {SgObject ret=SG_OBJ((((intptr_t )(fx1)))^( in sagittarius_fixnums_fxxor()
2328 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen10978.d11570[6]));
[all …]
H A Dsubr.c76 return SG_OBJ(s); in Sg_MakeSubr()
86 return SG_OBJ(s); in Sg_MakeSubrFull()
101 return SG_OBJ(theNullProc); in Sg_NullProc()
110 proc->setter = SG_OBJ(setter); in Sg_SetterSet()
112 return SG_OBJ(proc); in Sg_SetterSet()
118 return Sg_VMApply(SG_OBJ(&Sg_GenericObjectSetter), in object_setter()
119 Sg_Cons(SG_OBJ(data), args[0])); in object_setter()
H A Dlib_flonums.c826 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[0]), SG_FALSE, 1, 0, 0, 9, 13),
829 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[13]), SG_FALSE, 2, 0, 0, 10, 12),
832 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[25]), SG_FALSE, 2, 0, 0, 14, 38),
835 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[63]), SG_FALSE, 1, 0, 0, 9, 6),
838 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[69]), SG_FALSE, 1, 0, 1, 9, 5),
841 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[74]), SG_FALSE, 1, 0, 0, 11, 40),
844 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[114]), SG_FALSE, 2, 0, 0, 11, 15),
847 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[129]), SG_FALSE, 2, 0, 0, 11, 15),
850 (SgWord *)SG_OBJ(&sg__rc_cgen11571.d12057[144]), SG_FALSE, 0, 0, 0, 0, 251),
3284 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen11571.d12058[8]));
[all …]
H A Dclos.c649 return SG_OBJ(sac); in Sg_MakeSlotAccessor()
1227 return Sg_VMSlotRef(SG_OBJ(data[0]), SG_OBJ(data[1])); in vmslot_ref_cc()
1266 return Sg_VMSlotSet(SG_OBJ(data[0]), SG_OBJ(data[1]), SG_OBJ(data[2])); in vmslot_set_cc()
1340 return Sg_VMSlotBoundP(SG_OBJ(data[0]), SG_OBJ(data[1])); in vmslot_boundp_cc()
1882 return SG_OBJ(gf); in generic_allocate()
1912 return SG_OBJ(gf); in Sg_MakeBaseGeneric()
1953 SG_OBJ(gf), h), in Sg_NoNextMethod()
2077 return SG_OBJ(nm); in Sg_MakeNextMethod()
2483 SG_OBJ(c)); in allocate_impl()
2758 return SG_OBJ(m); in method_initialize_impl()
[all …]
H A Dweak.c101 return SG_OBJ(v); in Sg_MakeWeakVector()
259 return SG_OBJ(val); in weak_hashtable_ref()
311 Sg_UnregisterFinalizer(SG_OBJ(key));
341 return SG_OBJ(val);
351 base = Sg_GCBase(SG_OBJ(key));
389 return SG_OBJ(val);
441 return SG_OBJ(wh);
512 SgObject table = SG_OBJ(core->data);
514 SgObject key = SG_OBJ(e->key);
539 return SG_OBJ(wh);
[all …]
H A Dstring.c174 r = Sg_HashTableSet(stable, SG_OBJ(z), SG_OBJ(z), in makestring()
178 r = SG_OBJ(z); in makestring()
200 return SG_OBJ(z); in Sg_MakeStringC()
211 return SG_OBJ(z); in Sg_ReserveString()
217 return SG_OBJ(z); in Sg_MakeEmptyString()
250 r = Sg_HashTableSet(stable, SG_OBJ(r), SG_OBJ(r), in Sg_StringIntern()
309 return SG_OBJ(z); in Sg_StringAppend2()
321 return SG_OBJ(p); in Sg_StringAppendC()
347 return SG_OBJ(r); in Sg_StringAppend()
404 return SG_OBJ(s); in Sg_CopyString()
[all …]
H A Dsymbol.c90 e = Sg_HashTableRef(obtable, SG_OBJ(name), SG_FALSE); in Sg_MakeSymbol()
103 if (!interned) return SG_OBJ(sym); in Sg_MakeSymbol()
106 e = Sg_HashTableSet(obtable, SG_OBJ(name), SG_OBJ(sym), SG_HASH_NO_OVERWRITE); in Sg_MakeSymbol()
132 return SG_OBJ(sym); in Sg_Gensym()
H A Dlib_regex.c124 SG_WORD(SG_OBJ(&sg__rc_cgen12127.d12134[0])) /* #<code-builder make-replacer (2 1 1)> */,
188 SG_WORD(SG_OBJ(&sg__rc_cgen12127.d12134[1])) /* #<code-builder make-replacer (1 0 0)> */,
195 SG_WORD(SG_OBJ(&sg__rc_cgen12127.d12134[2])) /* #<code-builder make-replacer (2 1 1)> */,
217 (SgWord *)SG_OBJ(&sg__rc_cgen12127.d12133[0]), SG_FALSE, 2, 1, 1, 15, 19),
220 (SgWord *)SG_OBJ(&sg__rc_cgen12127.d12133[19]), SG_FALSE, 1, 0, 0, 7, 4),
223 (SgWord *)SG_OBJ(&sg__rc_cgen12127.d12133[23]), SG_FALSE, 2, 1, 1, 15, 19),
226 (SgWord *)SG_OBJ(&sg__rc_cgen12127.d12133[42]), SG_FALSE, 2, 1, 1, 15, 19),
229 (SgWord *)SG_OBJ(&sg__rc_cgen12127.d12133[61]), SG_FALSE, 3, 1, 0, 17, 21),
232 (SgWord *)SG_OBJ(&sg__rc_cgen12127.d12133[82]), SG_FALSE, 0, 0, 0, 0, 28),
1165 SG_CODE_BUILDER(SG_OBJ(&sg__rc_cgen12127.d12134[5]));
[all …]
H A Dhashtable.c406 return Sg_EqvHash(SG_OBJ(key), 0); in eqv_hash()
411 return Sg_EqvP(SG_OBJ(key), SG_OBJ(k2)); in eqv_compare()
421 return Sg_EqualP(SG_OBJ(key), SG_OBJ(k2)); in equal_compare()
434 SgObject key = SG_OBJ(k); in string_access()
449 SgObject ee = SG_OBJ(e->key); in string_access()
508 SG_CALL_SUBR2(ret, compare, SG_OBJ(key), SG_OBJ(k2)); in general_compare()
510 ret = Sg_Apply2(table->generalCompare, SG_OBJ(key), SG_OBJ(k2)); in general_compare()
754 return SG_OBJ(ht); in hash_cache_reader()
855 return SG_OBJ(dst); in hashtable_copy()
921 return SG_OBJ(table); in Sg_InitHashTableSimple()
[all …]
H A Dexceptions.c160 return SG_OBJ(c); in Sg_ConditionAllocate()
217 return SG_OBJ(c); in syntax_allocate()
265 return SG_OBJ(c); in message_allocate()
297 return SG_OBJ(c); in irr_allocate()
327 return SG_OBJ(c); in who_allocate()
380 return SG_OBJ(c); in port_allocate()
411 return SG_OBJ(c); in enc_allocate()
453 return SG_OBJ(c); in pos_allocate()
483 return SG_OBJ(c); in fn_allocate()
546 return SG_OBJ(c); in comp_allocate()
[all …]
H A Dpair.c64 return SG_OBJ(z); in Sg_Cons()
79 SG_SET_CAR(z, SG_OBJ(y)); in Sg_Acons()
81 return SG_OBJ(z); in Sg_Acons()
105 start = SG_OBJ(make_pair()); in Sg_VaList()
111 item = SG_OBJ(make_pair()); in Sg_VaList()
298 result = SG_OBJ(p); in Sg_Reverse()
304 result = SG_OBJ(p); in Sg_Reverse()
547 SG_OBJ(&list_transpose_s_stub)); in Sg__InitPair()
551 SG_OBJ(&list_transpose_p_stub)); in Sg__InitPair()

1234