z 52 examples/mqueue-cpp/mqueue.cpp set<MQueue*>::iterator z = find_if(knownQueues.begin(),
z 55 examples/mqueue-cpp/mqueue.cpp if (z == knownQueues.end()) return NULL;
z 56 examples/mqueue-cpp/mqueue.cpp return *z;
z 134 ext/binary/binary.c do { char z; if (SWAP_REQUIRED(endian)) CSWAP(v.buf, z, 0, 1); } while (0)
z 137 ext/binary/binary.c do { char z; \
z 139 ext/binary/binary.c CSWAP(v.buf, z, 0, 3); \
z 140 ext/binary/binary.c CSWAP(v.buf, z, 1, 2); \
z 145 ext/binary/binary.c do { char z; \
z 147 ext/binary/binary.c CSWAP(v.buf, z, 0, 7); \
z 148 ext/binary/binary.c CSWAP(v.buf, z, 1, 6); \
z 149 ext/binary/binary.c CSWAP(v.buf, z, 2, 5); \
z 150 ext/binary/binary.c CSWAP(v.buf, z, 3, 4); \
z 159 ext/binary/binary.c do { char z; \
z 161 ext/binary/binary.c CSWAP(v.buf, z, 0, 3); \
z 162 ext/binary/binary.c CSWAP(v.buf, z, 1, 2); \
z 163 ext/binary/binary.c CSWAP(v.buf, z, 4, 7); \
z 164 ext/binary/binary.c CSWAP(v.buf, z, 5, 6); \
z 166 ext/binary/binary.c CSWAP(v.buf, z, 0, 4); \
z 167 ext/binary/binary.c CSWAP(v.buf, z, 1, 5); \
z 168 ext/binary/binary.c CSWAP(v.buf, z, 2, 6); \
z 169 ext/binary/binary.c CSWAP(v.buf, z, 3, 7); \
z 174 ext/binary/binary.c do { char z; \
z 176 ext/binary/binary.c CSWAP(v.buf, z, 0, 7); \
z 177 ext/binary/binary.c CSWAP(v.buf, z, 1, 6); \
z 178 ext/binary/binary.c CSWAP(v.buf, z, 2, 5); \
z 179 ext/binary/binary.c CSWAP(v.buf, z, 3, 4); \
z 124 ext/dbm/gdbm.c ScmGdbm *z = SCM_NEW(ScmGdbm);
z 125 ext/dbm/gdbm.c SCM_SET_CLASS(z, SCM_CLASS_GDBM);
z 126 ext/dbm/gdbm.c Scm_RegisterFinalizer(SCM_OBJ(z), gdbm_finalize, NULL);
z 127 ext/dbm/gdbm.c z->name = SCM_OBJ(name);
z 128 ext/dbm/gdbm.c z->dbf = gdbm_open(Scm_GetString(name), size, rwmode, fmode, NULL);
z 129 ext/dbm/gdbm.c if (z->dbf == NULL) Scm_SysError("couldn't open gdbm file %S", name);
z 130 ext/dbm/gdbm.c SCM_RETURN(SCM_OBJ(z));
z 92 ext/dbm/ndbm.c ScmNdbm *z = SCM_NEW(ScmNdbm);
z 93 ext/dbm/ndbm.c SCM_SET_CLASS(z, SCM_CLASS_NDBM);
z 94 ext/dbm/ndbm.c Scm_RegisterFinalizer(SCM_OBJ(z), ndbm_finalize, NULL);
z 95 ext/dbm/ndbm.c z->name = SCM_OBJ(name);
z 96 ext/dbm/ndbm.c z->dbf = dbm_open(Scm_GetString(name), flags, mode);
z 97 ext/dbm/ndbm.c if (z->dbf == NULL) Scm_SysError("couldn't open ndbm file %S", name);
z 98 ext/dbm/ndbm.c SCM_RETURN(SCM_OBJ(z));
z 148 ext/digest/md5c.c #define F1(x, y, z) (z ^ (x & (y ^ z)))
z 149 ext/digest/md5c.c #define F2(x, y, z) F1(z, x, y)
z 150 ext/digest/md5c.c #define F3(x, y, z) (x ^ y ^ z)
z 151 ext/digest/md5c.c #define F4(x, y, z) (y ^ (x | ~z))
z 154 ext/digest/md5c.c #define MD5STEP(f, w, x, y, z, data, s) \
z 155 ext/digest/md5c.c ( w += f(x, y, z) + data, w = w<<s | w>>(32-s), w += x )
z 82 ext/digest/sha.c #define f1(x,y,z) ( z ^ (x & (y ^ z) ) ) /* Rounds 0-19 */
z 83 ext/digest/sha.c #define f2(x,y,z) ( x ^ y ^ z ) /* Rounds 20-39 */
z 84 ext/digest/sha.c #define f3(x,y,z) ( (x & y) + (z & (x ^ y) ) ) /* Rounds 40-59 */
z 85 ext/digest/sha.c #define f4(x,y,z) ( x ^ y ^ z ) /* Rounds 60-79 */
z 133 gc/cord/cordtest.c CORD w, z;
z 138 gc/cord/cordtest.c z = CORD_catn(3,y,y,y);
z 139 gc/cord/cordtest.c if (CORD_cmp(w,z) != 0) ABORT("CORD_catn comparison wrong");
z 143 gc/cord/cordtest.c z = CORD_balance(x);
z 144 gc/cord/cordtest.c if (CORD_cmp(x,z) != 0) ABORT("balanced string comparison wrong");
z 145 gc/cord/cordtest.c if (CORD_cmp(x,CORD_cat(z, CORD_nul(13))) >= 0) ABORT("comparison 2");
z 146 gc/cord/cordtest.c if (CORD_cmp(CORD_cat(x, CORD_nul(13)), z) <= 0) ABORT("comparison 3");
z 147 gc/cord/cordtest.c if (CORD_cmp(x,CORD_cat(z, "13")) >= 0) ABORT("comparison 4");
z 149 gc/cord/cordtest.c if (CORD_put(z,f) == EOF) ABORT("CORD_put failed");
z 152 gc/cord/cordtest.c if (CORD_len(w) != CORD_len(z)) ABORT("file length wrong");
z 153 gc/cord/cordtest.c if (CORD_cmp(w,z) != 0) ABORT("file comparison wrong");
z 156 gc/cord/cordtest.c z = CORD_from_file_lazy(f1b = fopen(FNAME1, "rb"));
z 157 gc/cord/cordtest.c if (CORD_cmp(w,z) != 0) ABORT("File conversions differ");
z 716 src/bignum.c ScmObj z = Scm_MakeFlonum(Scm_BignumToDouble(r));
z 717 src/bignum.c return Scm_Add(z, v, SCM_CDR(args));
z 739 src/bignum.c ScmObj z = Scm_MakeFlonum(Scm_BignumToDouble(r));
z 740 src/bignum.c return Scm_Subtract(z, v, SCM_CDR(args));
z 1138 src/bignum.c static ScmBignum *bignum_and(ScmBignum *z, ScmBignum *x, ScmBignum *y,
z 1143 src/bignum.c z->values[i] = x->values[i] & y->values[i];
z 1146 src/bignum.c for (; i < xsize; i++) z->values[i] = x->values[i];
z 1148 src/bignum.c for (; i < ysize; i++) z->values[i] = y->values[i];
z 1150 src/bignum.c return z;
z 1158 src/bignum.c ScmBignum *xx, *yy, *z;
z 1162 src/bignum.c z = bignum_and(make_bignum(minsize), x, y, minsize, 0, 0);
z 1163 src/bignum.c return Scm_NormalizeBignum(z);
z 1166 src/bignum.c z = bignum_and(make_bignum(xsize), x, yy, minsize, xsize, 0);
z 1167 src/bignum.c return Scm_NormalizeBignum(z);
z 1172 src/bignum.c z = bignum_and(make_bignum(ysize), xx, y, minsize, 0, ysize);
z 1173 src/bignum.c return Scm_NormalizeBignum(z);
z 1178 src/bignum.c z = bignum_and(make_bignum(zsize), xx, yy, minsize, xsize, ysize);
z 1179 src/bignum.c SCM_BIGNUM_SIGN(z) = -1;
z 1180 src/bignum.c bignum_2scmpl(z);
z 1181 src/bignum.c return Scm_NormalizeBignum(z);
z 1189 src/bignum.c static ScmBignum *bignum_ior(ScmBignum *z, ScmBignum *x, ScmBignum *y,
z 1194 src/bignum.c z->values[i] = x->values[i] | y->values[i];
z 1197 src/bignum.c for (; i < xsize; i++) z->values[i] = x->values[i];
z 1199 src/bignum.c for (; i < ysize; i++) z->values[i] = y->values[i];
z 1201 src/bignum.c return z;
z 1209 src/bignum.c ScmBignum *xx, *yy, *z;
z 1214 src/bignum.c z = bignum_ior(make_bignum(zsize), x, y, minsize, xsize, ysize);
z 1215 src/bignum.c return Scm_NormalizeBignum(z);
z 1218 src/bignum.c z = bignum_ior(make_bignum(ysize), x, yy, minsize, 0, ysize);
z 1219 src/bignum.c SCM_BIGNUM_SIGN(z) = -1;
z 1220 src/bignum.c bignum_2scmpl(z);
z 1221 src/bignum.c return Scm_NormalizeBignum(z);
z 1226 src/bignum.c z = bignum_ior(make_bignum(xsize), xx, y, minsize, xsize, 0);
z 1227 src/bignum.c SCM_BIGNUM_SIGN(z) = -1;
z 1228 src/bignum.c bignum_2scmpl(z);
z 1229 src/bignum.c return Scm_NormalizeBignum(z);
z 1233 src/bignum.c z = bignum_ior(make_bignum(minsize), xx, yy, minsize, 0, 0);
z 1234 src/bignum.c SCM_BIGNUM_SIGN(z) = -1;
z 1235 src/bignum.c bignum_2scmpl(z);
z 1236 src/bignum.c return Scm_NormalizeBignum(z);
z 208 src/core.c void Scm_RegisterFinalizer(ScmObj z, ScmFinalizerProc finalizer, void *data)
z 211 src/core.c GC_REGISTER_FINALIZER_NO_ORDER(z, (GC_finalization_proc)finalizer,
z 215 src/core.c void Scm_UnregisterFinalizer(ScmObj z)
z 218 src/core.c GC_REGISTER_FINALIZER_NO_ORDER(z, (GC_finalization_proc)NULL, NULL,
z 342 src/gauche.h typedef void (*ScmFinalizerProc)(ScmObj z, void *data);
z 343 src/gauche.h SCM_EXTERN void Scm_RegisterFinalizer(ScmObj z, ScmFinalizerProc finalizer,
z 345 src/gauche.h SCM_EXTERN void Scm_UnregisterFinalizer(ScmObj z);
z 2194 src/gauche.h SCM_EXTERN ScmObj Scm_Magnitude(ScmObj z);
z 2195 src/gauche.h SCM_EXTERN ScmObj Scm_Angle(ScmObj z);
z 520 src/hash.c ScmHashTable *z;
z 528 src/hash.c z = SCM_NEW(ScmHashTable);
z 529 src/hash.c SCM_SET_CLASS(z, klass);
z 530 src/hash.c z->buckets = b;
z 531 src/hash.c z->numBuckets = initSize;
z 532 src/hash.c z->numEntries = 0;
z 533 src/hash.c z->type = type;
z 534 src/hash.c z->accessfn = accessfn;
z 535 src/hash.c z->hashfn = hashfn;
z 536 src/hash.c z->cmpfn = cmpfn;
z 537 src/hash.c z->data = data;
z 538 src/hash.c for (i=initSize, z->numBucketsLog2=0; i > 1; i /= 2) {
z 539 src/hash.c z->numBucketsLog2++;
z 541 src/hash.c for (i=0; i<initSize; i++) z->buckets[i] = NULL;
z 542 src/hash.c return SCM_OBJ(z);
z 62 src/list.c ScmPair *z;
z 63 src/list.c SCM_MALLOC_WORDS(z, sizeof(ScmPair)/sizeof(GC_word), ScmPair*);
z 64 src/list.c SCM_SET_CAR(z, car);
z 65 src/list.c SCM_SET_CDR(z, cdr);
z 66 src/list.c return SCM_OBJ(z);
z 71 src/list.c ScmPair *y, *z;
z 73 src/list.c SCM_MALLOC_WORDS(z, sizeof(ScmPair)/sizeof(GC_word), ScmPair*);
z 76 src/list.c SCM_SET_CAR(z, SCM_OBJ(y));
z 77 src/list.c SCM_SET_CDR(z, cdr);
z 78 src/list.c return SCM_OBJ(z);
z 282 src/number.c ScmObj Scm_Magnitude(ScmObj z)
z 285 src/number.c if (SCM_REALP(z)) {
z 286 src/number.c m = fabs(Scm_GetDouble(z));
z 287 src/number.c } else if (!SCM_COMPLEXP(z)) {
z 288 src/number.c Scm_Error("number required, but got %S", z);
z 291 src/number.c double r = SCM_COMPLEX_REAL(z);
z 292 src/number.c double i = SCM_COMPLEX_IMAG(z);
z 298 src/number.c ScmObj Scm_Angle(ScmObj z)
z 301 src/number.c if (SCM_REALP(z)) {
z 302 src/number.c a = (Scm_Sign(z) < 0)? M_PI : 0.0;
z 303 src/number.c } else if (!SCM_COMPLEXP(z)) {
z 304 src/number.c Scm_Error("number required, but got %S", z);
z 307 src/number.c double r = SCM_COMPLEX_REAL(z);
z 308 src/number.c double i = SCM_COMPLEX_IMAG(z);
z 2312 src/number.c static double algorithmR(ScmObj f, int e, double z)
z 2316 src/number.c m = Scm_DecodeFlonum(z, &k, &s);
z 884 src/portapi.c long z = (long)o;
z 886 src/portapi.c z += (long)(p->src.istr.current - p->src.istr.start);
z 888 src/portapi.c z += (long)(p->src.istr.end - p->src.istr.start);
z 890 src/portapi.c if (z < 0 || z > (long)(p->src.istr.end - p->src.istr.start)) {
z 893 src/portapi.c p->src.istr.current = p->src.istr.start + z;
z 932 src/stdlib.c double z;
z 941 src/stdlib.c z = Scm_GetDouble(z_scm);
z 952 src/stdlib.c SCM_RESULT = Scm_MakeFlonum(atan(z));
z 955 src/stdlib.c SCM_RESULT = Scm_MakeFlonum(atan2(z, Scm_GetDouble(x)));
z 1115 src/stdlib.c ScmObj z;
z 1118 src/stdlib.c z = (z_scm);
z 1120 src/stdlib.c if (SCM_EXACTP(z)) { SCM_RETURN(Scm_Values2(z, SCM_MAKE_INT(0))); }
z 1121 src/stdlib.c else if (SCM_FLONUMP(z)) { SCM_RETURN(Scm_Values2(z, Scm_MakeFlonum(0.0))); }
z 1122 src/stdlib.c else if (!SCM_COMPLEXP(z)) {
z 1123 src/stdlib.c Scm_Error("number required, but got %S", z);
z 1125 src/stdlib.c } else { SCM_RETURN(Scm_Values2(Scm_MakeFlonum(SCM_COMPLEX_REAL(z)), Scm_MakeFlonum(SCM_COMPLEX_IMAG(z))));}
z 1135 src/stdlib.c ScmObj z;
z 1139 src/stdlib.c z = (z_scm);
z 1141 src/stdlib.c if (SCM_REALP(z)) SCM_RETURN(z);
z 1142 src/stdlib.c SCM_ASSERT(SCM_COMPLEXP(z));
z 1143 src/stdlib.c SCM_RETURN(Scm_MakeFlonum(SCM_COMPLEX_REAL(z)));
z 1153 src/stdlib.c ScmObj z;
z 1157 src/stdlib.c z = (z_scm);
z 1159 src/stdlib.c if (SCM_EXACTP(z)) SCM_RETURN(SCM_MAKE_INT(0));
z 1160 src/stdlib.c else if (SCM_REALP(z)) SCM_RETURN(Scm_MakeFlonum(0.0));
z 1161 src/stdlib.c SCM_ASSERT(SCM_COMPLEXP(z));
z 1162 src/stdlib.c SCM_RETURN(Scm_MakeFlonum(SCM_COMPLEX_IMAG(z)));
z 1172 src/stdlib.c ScmObj z;
z 1175 src/stdlib.c z = (z_scm);
z 1179 src/stdlib.c SCM_RESULT = Scm_Magnitude(z);
z 1191 src/stdlib.c ScmObj z;
z 1194 src/stdlib.c z = (z_scm);
z 1198 src/stdlib.c SCM_RESULT = Scm_Angle(z);
z 1276 src/vm.c ScmObj *z, cp, clo = SCM_UNDEFINED;
z 1286 src/vm.c z = (ScmObj*)e - nlocals;
z 1289 src/vm.c *z++ = clo = Scm_MakeClosure(SCM_CAR(cp), e);
z 1291 src/vm.c *z++ = SCM_CAR(cp);
z 1402 src/vm.c ScmObj z;
z 1403 src/vm.c POP_ARG(z);
z 1404 src/vm.c if (!SCM_EQ(VAL0, z)) {
z 1414 src/vm.c ScmObj z;
z 1415 src/vm.c FETCH_OPERAND(z);
z 1417 src/vm.c if (!SCM_EQ(VAL0, z)) {
z 1427 src/vm.c ScmObj z;
z 1428 src/vm.c POP_ARG(z);
z 1429 src/vm.c if (!Scm_EqvP(VAL0, z)) {
z 1439 src/vm.c ScmObj z;
z 1440 src/vm.c FETCH_OPERAND(z);
z 1442 src/vm.c if (!Scm_EqvP(VAL0, z)) {
z 3871 src/vm.c ScmObj z = *vmsb;
z 3872 src/vm.c if ((hb < (GC_PTR)z && (GC_PTR)z < spb)
z 3873 src/vm.c || ((GC_PTR)z > sbe && (GC_PTR)z < he)) {
z 3874 src/vm.c e = GC_mark_and_push((GC_PTR)z, e, mark_sp_limit, (GC_PTR)addr);