Home
last modified time | relevance | path

Searched refs:SG_WORD (Results 1 – 21 of 21) sorted by relevance

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dcompiler.c18 SG_WORD(3),
26 SG_WORD(3),
30 SG_WORD(5),
45 SG_WORD(7),
53 SG_WORD(15),
59 SG_WORD(6),
67 SG_WORD(4),
84 SG_WORD(4),
89 SG_WORD(7),
97 SG_WORD(4),
[all …]
H A Dlib_macro.c14 SG_WORD(3),
18 SG_WORD(5),
24 SG_WORD(2),
29 SG_WORD(-17),
33 SG_WORD(4),
42 SG_WORD(14),
45 SG_WORD(6),
57 SG_WORD(4),
62 SG_WORD(3),
66 SG_WORD(4),
[all …]
H A Dlib_scmlib.c1159 SG_WORD(4),
1171 SG_WORD(4),
1186 SG_WORD(3),
1192 SG_WORD(4),
1207 SG_WORD(3),
1212 SG_WORD(8),
1224 SG_WORD(3),
1230 SG_WORD(6),
1240 SG_WORD(5),
1258 SG_WORD(3),
[all …]
H A Dlib_program.c235 SG_WORD(3),
243 SG_WORD(4),
248 SG_WORD(4),
253 SG_WORD(4),
267 SG_WORD(3),
274 SG_WORD(9),
276 SG_WORD(7),
285 SG_WORD(8),
294 SG_WORD(4),
302 SG_WORD(4),
[all …]
H A Dlib_errors.c292 SG_WORD(4),
299 SG_WORD(4),
304 SG_WORD(5),
310 SG_WORD(4),
317 SG_WORD(3),
321 SG_WORD(4),
326 SG_WORD(2),
335 SG_WORD(4),
342 SG_WORD(3),
350 SG_WORD(4),
[all …]
H A Dlib_arith.c117 SG_WORD(4),
122 SG_WORD(4),
125 SG_WORD(16),
127 SG_WORD(14),
131 SG_WORD(6),
146 SG_WORD(8),
157 SG_WORD(3),
162 SG_WORD(3),
169 SG_WORD(3),
173 SG_WORD(5),
[all …]
H A Dlib_treemap.c257 SG_WORD(4),
263 SG_WORD(4),
269 SG_WORD(4),
276 SG_WORD(4),
285 SG_WORD(4),
295 SG_WORD(8),
312 SG_WORD(4),
317 SG_WORD(4),
331 SG_WORD(8),
342 SG_WORD(9),
[all …]
H A Dlib_fixnums.c223 SG_WORD(5),
230 SG_WORD(5),
238 SG_WORD(5),
245 SG_WORD(5),
253 SG_WORD(4),
258 SG_WORD(3),
267 SG_WORD(6),
279 SG_WORD(4),
284 SG_WORD(3),
293 SG_WORD(6),
[all …]
H A Dcompiler-aux.c130 SG_WORD(SG_UNDEF) /* null */,
132 SG_WORD(3),
134 SG_WORD(SG_UNDEF) /* (core) */,
137 SG_WORD(SG_UNDEF) /* sagittarius */,
139 SG_WORD(3),
141 SG_WORD(SG_UNDEF) /* (sagittarius) */,
144 SG_WORD(SG_UNDEF) /* base */,
146 SG_WORD(3),
148 SG_WORD(SG_UNDEF) /* (core base) */,
151 SG_WORD(SG_UNDEF) /* r6rs-script */,
[all …]
H A Dlib_flonums.c428 SG_WORD(4),
433 SG_WORD(5),
441 SG_WORD(4),
446 SG_WORD(2),
453 SG_WORD(4),
460 SG_WORD(4),
465 SG_WORD(4),
470 SG_WORD(9),
480 SG_WORD(3),
502 SG_WORD(4),
[all …]
H A Dlib_sandbox.c178 SG_WORD(SG_UNDEF) /* #<library (sagittarius sandbox)> */,
191 SG_WORD(SG_UNDEF) /* #<identifier expand-syntax#(core macro)> */,
194 SG_WORD(SG_NIL) /* () */,
196 SG_WORD(SG_NIL) /* () */,
201 SG_WORD(SG_FALSE) /* #f */,
222 SG_WORD(SG_UNDEF) /* #<identifier expand-syntax#(core macro)> */,
225 SG_WORD(8),
228 SG_WORD(SG_UNDEF) /* #<identifier name#(sagittarius sandbox)> */,
246 SG_WORD(SG_NIL) /* () */,
248 SG_WORD(SG_NIL) /* () */,
[all …]
H A Dlib_regex.c105 SG_WORD(6),
112 SG_WORD(5),
116 SG_WORD(SG_UNDEF) /* #<identifier regex-matcher#(sagittarius regex impl)> */,
128 SG_WORD(6),
135 SG_WORD(5),
139 SG_WORD(SG_UNDEF) /* #<identifier regex-matcher#(sagittarius regex impl)> */,
147 SG_WORD(6),
154 SG_WORD(5),
166 SG_WORD(7),
174 SG_WORD(5),
[all …]
H A Dlib_sagittarius.c825 SG_WORD(3),
835 SG_WORD(3),
856 SG_WORD(3),
867 SG_WORD(3),
877 SG_WORD(3),
883 SG_WORD(4),
889 SG_WORD(3),
893 SG_WORD(2),
902 SG_WORD(3),
912 SG_WORD(3),
[all …]
H A Dcode.c103 push(cb, SG_WORD(insn)); in flush()
107 push(cb, SG_WORD(insn)); in flush()
111 push(cb, SG_WORD(0)); in flush()
113 push(cb, SG_WORD(cb->packet.obj)); in flush()
320 code[o] = SG_WORD(d - o); in finish_builder_rec()
334 ret[i + j] = SG_WORD(arg); in finish_builder_rec()
H A Dvminsn.c225 …,id1164));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1165)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
243 (*((PC(vm))-(1)))=(SG_WORD(g));}}}} in CASE()
993 …,id1183));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1184)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
1020 …,id1187));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1188)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
1031 …,id1190));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1191)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
1178 …,id1193));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1194)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
1189 …,id1196));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1197)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
1248 …,id1199));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1200)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
1259 …,id1202));}}}if (SG_GLOCP(v)){{if (SG_FALSEP(s1203)){{(*((PC(vm))-(1)))=(SG_WORD(v));}}v=(SG_GLOC_… in CASE()
H A Dcache.c316 put_word_rec(out, SG_WORD(o), IMMEDIATE_TAG, WORD_SIZE); in emit_immediate()
1282 code[i+j+1] = SG_WORD(new_cb); in link_cb_rec()
2022 code[i] = SG_WORD(o); in read_code()
2023 prev = (ctx->insnP) ? INSN(SG_WORD(o)) : -1; in read_code()
H A Dhashtable.c84 (result) = (SgHashVal)((SG_WORD(val) >> 3)*2654435761UL)
217 SMALL_INT_HASH(hashval, (SgHashVal)SG_WORD(obj)); in equal_hash_rec()
H A Dinstructions.scm144 (set! (pointer (- (PC ,vm) 1)) (SG_WORD ,ret)))
162 (set! (pointer (- (PC vm) 1)) (SG_WORD g))))))
H A Dvm.c1065 code[0] = SG_WORD(MERGE_INSN_VALUE1(APPLY_VALUES, nargs)); in apply_rec()
1066 code[1] = SG_WORD(rest); in apply_rec()
1067 code[2] = SG_WORD(RET); in apply_rec()
1473 static SgWord return_code[1] = {SG_WORD(RET)};
H A Dwriter.c761 Sg_Panic("write: unknown itag object: %08x", SG_WORD(obj)); in write_noptr()
800 Sg_Panic("write: got a bogus object: %08x", SG_WORD(obj)); in write_noptr()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dsagittariusdefs.h316 #define SG_WORD(obj) ((SgWord)(obj)) macro
327 #define SG_TAG1(obj) (SG_WORD(obj) & 0x01)
328 #define SG_TAG2(obj) (SG_WORD(obj) & 0x03)
329 #define SG_TAG3(obj) (SG_WORD(obj) & 0x07)
330 #define SG_TAG4(obj) (SG_WORD(obj) & 0x0f)
331 #define SG_TAG8(obj) (SG_WORD(obj) & 0xff)
342 #define SG_ITAG(obj) (SG_WORD(obj)>>8)
370 #define SG_INT_VALUE(obj) (((long)SG_WORD(obj)) >> 2)
374 #define SG_UINTP(obj) (SG_INTP(obj)&&((long)SG_WORD(obj) >= 0))
381 #define SG_CHAR_VALUE(obj) SG_CHAR(((unsigned long)SG_WORD(obj)) >> 8)