Searched refs:SG_CPP_CAT (Results 1 – 13 of 13) sorted by relevance
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/ |
H A D | instruction.c | 44 static InsnInfo SG_CPP_CAT(name, _INSN) = {#name, name, val, argc, src, label}; in Sg_LookupInsnName() 50 case name : info = & SG_CPP_CAT(name, _INSN); break; in Sg_LookupInsnName()
|
H A D | unicode.c | 647 const int size = array_sizeof(SG_CPP_CAT(s_, name)); \ 650 if (SG_CPP_CAT(s_, name)[i].in == ch) { \ 651 return (SgChar)(SG_CPP_CAT(s_, name)[i].out); \ 666 const int size = array_sizeof(SG_CPP_CAT(s_, name)); \ 669 if (SG_CPP_CAT(s_, name)[i].in == ch) { \ 679 static int SG_CPP_CAT(name, _property_p) (SgChar ch) \ 685 if (SG_CPP_CAT(s_, name)[i].in <= ch && \ 686 SG_CPP_CAT(s_, name)[i].out <= ch) { \ 926 const int size = array_sizeof(SG_CPP_CAT(s_, name)); \ 928 if (ch < SG_CPP_CAT(s_, name)[0].in) return -1; \ [all …]
|
H A D | gc-incl.inc | 75 static void SG_CPP_CAT(type, _dumper)(void *data) { \ 82 static void SG_CPP_CAT(type, _dumper)(void *data) { \ 87 Sg_AddCleanupHandler(SG_CPP_CAT(type, _dumper), NULL)
|
H A D | compare.c | 67 static SgObject SG_CPP_CAT(comparator_, field)(SgObject c) \ 106 static SgObject SG_CPP_CAT(name, _proc)(SgObject *args, int argc, void *data) \ 110 static SG_DEFINE_SUBR(SG_CPP_CAT(name, _proc_stub), 2, 0, \ 111 SG_CPP_CAT(name, _proc), SG_FALSE, NULL); 121 static SgObject SG_CPP_CAT(name, _hash_proc) \ in DEF_EQ_PROC() 133 static SG_DEFINE_SUBR(SG_CPP_CAT(name, _hash_proc_stub), 1, 1, \ 134 SG_CPP_CAT(name, _hash_proc), SG_FALSE, NULL);
|
H A D | charset.c | 450 const int size_ = array_sizeof(SG_CPP_CAT(s_, name)); \ in install_charsets() 454 int32_t start = SG_CPP_CAT(s_, name)[i_].start; \ in install_charsets() 455 int32_t end = SG_CPP_CAT(s_, name)[i_].end; \ in install_charsets()
|
H A D | bytevector.c | 289 ret = (SG_CPP_CAT(gene, S))(value); \ in bytevector_ref() 292 ret = (SG_CPP_CAT(gene, U))(value); \ in bytevector_ref()
|
H A D | reader.c | 1971 #define SCHEME_OBJ(NAME) SG_CPP_CAT(NAME, _stub) 1972 #define STUB_NAME(NAME) SG_CPP_CAT(NAME, stub) 2247 (R)[(CH)].sfunc = SG_OBJ(&SG_CPP_CAT(FN, _stub))) 2253 (R)[(CH)].sfunc = SG_OBJ(&SG_CPP_CAT(FN, _stub)))
|
H A D | regex_match.c | 62 SG_CPP_CAT(Sg_RegexBinary, name) 93 SG_CPP_CAT(Sg_RegexText, name)
|
H A D | vm.c | 850 SgObject SG_CPP_CAT(Sg_, name)(SgObject o, SgObject e) \ 2531 #define DEFINSN(insn, vals, argc, src, label) && SG_CPP_CAT(label_, insn), in run_loop()
|
H A D | bignum.c | 1042 SgObject SG_CPP_CAT(op, SI)(SgBignum *x, long y) \
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/ |
H A D | sagittariusdefs.h | 48 #define SG_CPP_CAT(a, b) a##b macro
|
H A D | exceptions.h | 345 static void SG_CPP_CAT(name, _set)(type *e, SgObject v) { \
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/os/win/ |
H A D | file.c | 838 #define _U(s) SG_CPP_CAT(L, s)
|