val                89 ext/binary/binary.c     int val;
val                92 ext/binary/binary.c         || ((val = SCM_INT_VALUE(sval)) < 0)
val                93 ext/binary/binary.c         || (val >= 256)) {
val                96 ext/binary/binary.c     Scm_Putb(val, oport);
val               102 ext/binary/binary.c     int val;
val               105 ext/binary/binary.c         || ((val = SCM_INT_VALUE(sval)) < -128)
val               106 ext/binary/binary.c         || (val >= 128)) {
val               109 ext/binary/binary.c     Scm_Putb(val, oport);
val               188 ext/binary/binary.c     union { char buf[2]; unsigned short val; } v;
val               191 ext/binary/binary.c     return SCM_MAKE_INT(v.val);
val               196 ext/binary/binary.c     union { char buf[2]; short val; } v;
val               199 ext/binary/binary.c     return SCM_MAKE_INT(v.val);
val               204 ext/binary/binary.c     union { char buf[4]; ScmUInt32 val; } v;
val               207 ext/binary/binary.c     return Scm_MakeIntegerFromUI(v.val);
val               212 ext/binary/binary.c     union { char buf[4]; ScmInt32 val; } v;
val               215 ext/binary/binary.c     return Scm_MakeInteger(v.val);
val               220 ext/binary/binary.c     union { char buf[8]; ScmUInt64 val; } v;
val               223 ext/binary/binary.c     return Scm_MakeIntegerU64(v.val);
val               228 ext/binary/binary.c     union { char buf[8]; ScmInt64 val; } v;
val               231 ext/binary/binary.c     return Scm_MakeInteger64(v.val);
val               236 ext/binary/binary.c     union { char buf[4]; float val; } v;
val               239 ext/binary/binary.c     return Scm_MakeFlonum((double)v.val);
val               244 ext/binary/binary.c     union { char buf[8]; double val;} v;
val               247 ext/binary/binary.c     return Scm_MakeFlonum(v.val);
val               256 ext/binary/binary.c     union { char buf[2]; u_short val; } v;
val               265 ext/binary/binary.c     v.val = vv;
val               272 ext/binary/binary.c     union { char buf[2]; short val; } v;
val               281 ext/binary/binary.c     v.val = vv;
val               288 ext/binary/binary.c     union { char buf[4]; ScmUInt32 val; } v;
val               291 ext/binary/binary.c     v.val = Scm_GetIntegerU32Clamp(sval, FALSE, FALSE);
val               298 ext/binary/binary.c     union { char buf[4]; ScmInt32 val; } v;
val               301 ext/binary/binary.c     v.val = Scm_GetInteger32Clamp(sval, FALSE, FALSE);
val               308 ext/binary/binary.c     union { char buf[8]; ScmUInt64 val; } v;
val               311 ext/binary/binary.c     v.val = Scm_GetIntegerU64Clamp(sval, FALSE, FALSE);
val               318 ext/binary/binary.c     union { char buf[8]; ScmInt64 val; } v;
val               321 ext/binary/binary.c     v.val = Scm_GetInteger64Clamp(sval, FALSE, FALSE);
val               328 ext/binary/binary.c     union { char buf[4]; float val; } v;
val               331 ext/binary/binary.c     v.val = (float)Scm_GetDouble(sval);
val               338 ext/binary/binary.c     union { char buf[8]; double val; } v;
val               341 ext/binary/binary.c     v.val = Scm_GetDouble(sval);
val                63 ext/binary/binary.h extern void Scm_WriteBinaryUint8(ScmObj val, ScmObj port, Endian endian);
val                64 ext/binary/binary.h extern void Scm_WriteBinaryUint16(ScmObj val, ScmObj port, Endian endian);
val                65 ext/binary/binary.h extern void Scm_WriteBinaryUint32(ScmObj val, ScmObj port, Endian endian);
val                66 ext/binary/binary.h extern void Scm_WriteBinaryUint64(ScmObj val, ScmObj port, Endian endian);
val                67 ext/binary/binary.h extern void Scm_WriteBinarySint8(ScmObj val, ScmObj port, Endian endian);
val                68 ext/binary/binary.h extern void Scm_WriteBinarySint16(ScmObj val, ScmObj port, Endian endian);
val                69 ext/binary/binary.h extern void Scm_WriteBinarySint32(ScmObj val, ScmObj port, Endian endian);
val                70 ext/binary/binary.h extern void Scm_WriteBinarySint64(ScmObj val, ScmObj port, Endian endian);
val                72 ext/binary/binary.h extern void Scm_WriteBinaryFloat(ScmObj val, ScmObj port, Endian endian);
val                73 ext/binary/binary.h extern void Scm_WriteBinaryDouble(ScmObj val, ScmObj port, Endian endian);
val               670 ext/binary/binarylib.c   ScmObj val;
val               681 ext/binary/binarylib.c   val = (val_scm);
val               695 ext/binary/binarylib.c Scm_WriteBinaryFloat(val, port, endian);
val               706 ext/binary/binarylib.c   ScmObj val;
val               717 ext/binary/binarylib.c   val = (val_scm);
val               731 ext/binary/binarylib.c Scm_WriteBinaryDouble(val, port, endian);
val               185 ext/dbm/gdbm.c   ScmString* val;
val               200 ext/dbm/gdbm.c   val = SCM_STRING(val_scm);
val               214 ext/dbm/gdbm.c TO_DATUM(dval, val);
val               425 ext/dbm/gdbm.c   ScmObj val;
val               434 ext/dbm/gdbm.c   val = (val_scm);
val               440 ext/dbm/gdbm.c if (SCM_EXACTP(val)) ival = Scm_GetUInteger(val);
val               441 ext/dbm/gdbm.c else ival = !SCM_FALSEP(val);
val               152 ext/dbm/ndbm.c   ScmString* val;
val               167 ext/dbm/ndbm.c   val = SCM_STRING(val_scm);
val               181 ext/dbm/ndbm.c TO_DATUM(dval, val);
val               105 ext/dbm/odbm.c   ScmString* val;
val               112 ext/dbm/odbm.c   val = SCM_STRING(val_scm);
val               119 ext/dbm/odbm.c TO_DATUM(dval, val);
val               417 ext/net/net.c          int val;
val               419 ext/net/net.c          SCM_SYSCALL(r, getsockopt(s->fd, level, option, &val, &rrsize));
val               421 ext/net/net.c          return Scm_MakeInteger(val);
val                81 ext/termios/termios.c static void termios_c_cc_set(ScmSysTermios* t, ScmObj val)
val                83 ext/termios/termios.c     if (!SCM_U8VECTORP(val)) {
val                84 ext/termios/termios.c         Scm_Error("cc type must be a u8vector, but got %S", val);
val                86 ext/termios/termios.c     if (SCM_U8VECTOR_SIZE(val) != NCCS) {
val                88 ext/termios/termios.c                   NCCS, SCM_U8VECTOR_SIZE(val));
val                90 ext/termios/termios.c     memcpy(t->term.c_cc, SCM_U8VECTOR_ELEMENTS(val), NCCS);
val               323 ext/threads/mutex.c static void cv_specific_set(ScmConditionVariable *cv, ScmObj val)
val               325 ext/threads/mutex.c     cv->specific = val;
val               112 ext/uvector/gauche/uvector.h extern ScmObj Scm_S8VectorSet(ScmS8Vector *vec, int index, ScmObj val, int clamp);
val               169 ext/uvector/gauche/uvector.h extern ScmObj Scm_U8VectorSet(ScmU8Vector *vec, int index, ScmObj val, int clamp);
val               226 ext/uvector/gauche/uvector.h extern ScmObj Scm_S16VectorSet(ScmS16Vector *vec, int index, ScmObj val, int clamp);
val               283 ext/uvector/gauche/uvector.h extern ScmObj Scm_U16VectorSet(ScmU16Vector *vec, int index, ScmObj val, int clamp);
val               340 ext/uvector/gauche/uvector.h extern ScmObj Scm_S32VectorSet(ScmS32Vector *vec, int index, ScmObj val, int clamp);
val               397 ext/uvector/gauche/uvector.h extern ScmObj Scm_U32VectorSet(ScmU32Vector *vec, int index, ScmObj val, int clamp);
val               454 ext/uvector/gauche/uvector.h extern ScmObj Scm_S64VectorSet(ScmS64Vector *vec, int index, ScmObj val, int clamp);
val               511 ext/uvector/gauche/uvector.h extern ScmObj Scm_U64VectorSet(ScmU64Vector *vec, int index, ScmObj val, int clamp);
val               568 ext/uvector/gauche/uvector.h extern ScmObj Scm_F32VectorSet(ScmF32Vector *vec, int index, ScmObj val, int clamp);
val               625 ext/uvector/gauche/uvector.h extern ScmObj Scm_F64VectorSet(ScmF64Vector *vec, int index, ScmObj val, int clamp);
val               882 ext/uvector/uvector.c ScmObj Scm_S8VectorSet(ScmS8Vector *vec, int index, ScmObj val, int clamp)
val               888 ext/uvector/uvector.c     elt = s8unbox(val, clamp);
val              1086 ext/uvector/uvector.c ScmObj Scm_U8VectorSet(ScmU8Vector *vec, int index, ScmObj val, int clamp)
val              1092 ext/uvector/uvector.c     elt = u8unbox(val, clamp);
val              1290 ext/uvector/uvector.c ScmObj Scm_S16VectorSet(ScmS16Vector *vec, int index, ScmObj val, int clamp)
val              1296 ext/uvector/uvector.c     elt = s16unbox(val, clamp);
val              1494 ext/uvector/uvector.c ScmObj Scm_U16VectorSet(ScmU16Vector *vec, int index, ScmObj val, int clamp)
val              1500 ext/uvector/uvector.c     elt = u16unbox(val, clamp);
val              1698 ext/uvector/uvector.c ScmObj Scm_S32VectorSet(ScmS32Vector *vec, int index, ScmObj val, int clamp)
val              1704 ext/uvector/uvector.c     elt = Scm_GetInteger32Clamp(val, clamp, NULL);
val              1902 ext/uvector/uvector.c ScmObj Scm_U32VectorSet(ScmU32Vector *vec, int index, ScmObj val, int clamp)
val              1908 ext/uvector/uvector.c     elt = Scm_GetIntegerU32Clamp(val, clamp, NULL);
val              2106 ext/uvector/uvector.c ScmObj Scm_S64VectorSet(ScmS64Vector *vec, int index, ScmObj val, int clamp)
val              2112 ext/uvector/uvector.c     elt = Scm_GetInteger64Clamp(val, clamp, NULL);
val              2310 ext/uvector/uvector.c ScmObj Scm_U64VectorSet(ScmU64Vector *vec, int index, ScmObj val, int clamp)
val              2316 ext/uvector/uvector.c     elt = Scm_GetIntegerU64Clamp(val, clamp, NULL);
val              2514 ext/uvector/uvector.c ScmObj Scm_F32VectorSet(ScmF32Vector *vec, int index, ScmObj val, int clamp)
val              2520 ext/uvector/uvector.c     elt = (float)Scm_GetDouble(val);
val              2718 ext/uvector/uvector.c ScmObj Scm_F64VectorSet(ScmF64Vector *vec, int index, ScmObj val, int clamp)
val              2724 ext/uvector/uvector.c     elt = Scm_GetDouble(val);
val              7180 ext/uvector/uvector.c     long val, minval, maxval;
val              7204 ext/uvector/uvector.c         val = SCM_S8VECTOR_ELEMENTS(x)[i];
val              7238 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7239 ext/uvector/uvector.c             val = minval;
val              7242 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7243 ext/uvector/uvector.c             val = maxval;
val              7254 ext/uvector/uvector.c     long val, minval, maxval;
val              7278 ext/uvector/uvector.c         val = SCM_S8VECTOR_ELEMENTS(x)[i];
val              7312 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7313 ext/uvector/uvector.c             val = minval;
val              7314 ext/uvector/uvector.c             SCM_S8VECTOR_ELEMENTS(d)[i] = val;
val              7316 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7317 ext/uvector/uvector.c             val = maxval;
val              7318 ext/uvector/uvector.c             SCM_S8VECTOR_ELEMENTS(d)[i] = val;
val              7328 ext/uvector/uvector.c     long val, minval, maxval;
val              7352 ext/uvector/uvector.c         val = SCM_S8VECTOR_ELEMENTS(x)[i];
val              7386 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7387 ext/uvector/uvector.c             val = minval;
val              7388 ext/uvector/uvector.c             SCM_S8VECTOR_ELEMENTS(x)[i] = val;
val              7390 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7391 ext/uvector/uvector.c             val = maxval;
val              7392 ext/uvector/uvector.c             SCM_S8VECTOR_ELEMENTS(x)[i] = val;
val              7402 ext/uvector/uvector.c     long val, minval, maxval;
val              7426 ext/uvector/uvector.c         val = SCM_U8VECTOR_ELEMENTS(x)[i];
val              7460 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7461 ext/uvector/uvector.c             val = minval;
val              7464 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7465 ext/uvector/uvector.c             val = maxval;
val              7476 ext/uvector/uvector.c     long val, minval, maxval;
val              7500 ext/uvector/uvector.c         val = SCM_U8VECTOR_ELEMENTS(x)[i];
val              7534 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7535 ext/uvector/uvector.c             val = minval;
val              7536 ext/uvector/uvector.c             SCM_U8VECTOR_ELEMENTS(d)[i] = val;
val              7538 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7539 ext/uvector/uvector.c             val = maxval;
val              7540 ext/uvector/uvector.c             SCM_U8VECTOR_ELEMENTS(d)[i] = val;
val              7550 ext/uvector/uvector.c     long val, minval, maxval;
val              7574 ext/uvector/uvector.c         val = SCM_U8VECTOR_ELEMENTS(x)[i];
val              7608 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7609 ext/uvector/uvector.c             val = minval;
val              7610 ext/uvector/uvector.c             SCM_U8VECTOR_ELEMENTS(x)[i] = val;
val              7612 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7613 ext/uvector/uvector.c             val = maxval;
val              7614 ext/uvector/uvector.c             SCM_U8VECTOR_ELEMENTS(x)[i] = val;
val              7624 ext/uvector/uvector.c     long val, minval, maxval;
val              7648 ext/uvector/uvector.c         val = SCM_S16VECTOR_ELEMENTS(x)[i];
val              7682 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7683 ext/uvector/uvector.c             val = minval;
val              7686 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7687 ext/uvector/uvector.c             val = maxval;
val              7698 ext/uvector/uvector.c     long val, minval, maxval;
val              7722 ext/uvector/uvector.c         val = SCM_S16VECTOR_ELEMENTS(x)[i];
val              7756 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7757 ext/uvector/uvector.c             val = minval;
val              7758 ext/uvector/uvector.c             SCM_S16VECTOR_ELEMENTS(d)[i] = val;
val              7760 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7761 ext/uvector/uvector.c             val = maxval;
val              7762 ext/uvector/uvector.c             SCM_S16VECTOR_ELEMENTS(d)[i] = val;
val              7772 ext/uvector/uvector.c     long val, minval, maxval;
val              7796 ext/uvector/uvector.c         val = SCM_S16VECTOR_ELEMENTS(x)[i];
val              7830 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7831 ext/uvector/uvector.c             val = minval;
val              7832 ext/uvector/uvector.c             SCM_S16VECTOR_ELEMENTS(x)[i] = val;
val              7834 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7835 ext/uvector/uvector.c             val = maxval;
val              7836 ext/uvector/uvector.c             SCM_S16VECTOR_ELEMENTS(x)[i] = val;
val              7846 ext/uvector/uvector.c     long val, minval, maxval;
val              7870 ext/uvector/uvector.c         val = SCM_U16VECTOR_ELEMENTS(x)[i];
val              7904 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7905 ext/uvector/uvector.c             val = minval;
val              7908 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7909 ext/uvector/uvector.c             val = maxval;
val              7920 ext/uvector/uvector.c     long val, minval, maxval;
val              7944 ext/uvector/uvector.c         val = SCM_U16VECTOR_ELEMENTS(x)[i];
val              7978 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              7979 ext/uvector/uvector.c             val = minval;
val              7980 ext/uvector/uvector.c             SCM_U16VECTOR_ELEMENTS(d)[i] = val;
val              7982 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              7983 ext/uvector/uvector.c             val = maxval;
val              7984 ext/uvector/uvector.c             SCM_U16VECTOR_ELEMENTS(d)[i] = val;
val              7994 ext/uvector/uvector.c     long val, minval, maxval;
val              8018 ext/uvector/uvector.c         val = SCM_U16VECTOR_ELEMENTS(x)[i];
val              8052 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8053 ext/uvector/uvector.c             val = minval;
val              8054 ext/uvector/uvector.c             SCM_U16VECTOR_ELEMENTS(x)[i] = val;
val              8056 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8057 ext/uvector/uvector.c             val = maxval;
val              8058 ext/uvector/uvector.c             SCM_U16VECTOR_ELEMENTS(x)[i] = val;
val              8068 ext/uvector/uvector.c     long val, minval, maxval;
val              8092 ext/uvector/uvector.c         val = SCM_S32VECTOR_ELEMENTS(x)[i];
val              8126 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8127 ext/uvector/uvector.c             val = minval;
val              8130 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8131 ext/uvector/uvector.c             val = maxval;
val              8142 ext/uvector/uvector.c     long val, minval, maxval;
val              8166 ext/uvector/uvector.c         val = SCM_S32VECTOR_ELEMENTS(x)[i];
val              8200 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8201 ext/uvector/uvector.c             val = minval;
val              8202 ext/uvector/uvector.c             SCM_S32VECTOR_ELEMENTS(d)[i] = val;
val              8204 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8205 ext/uvector/uvector.c             val = maxval;
val              8206 ext/uvector/uvector.c             SCM_S32VECTOR_ELEMENTS(d)[i] = val;
val              8216 ext/uvector/uvector.c     long val, minval, maxval;
val              8240 ext/uvector/uvector.c         val = SCM_S32VECTOR_ELEMENTS(x)[i];
val              8274 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8275 ext/uvector/uvector.c             val = minval;
val              8276 ext/uvector/uvector.c             SCM_S32VECTOR_ELEMENTS(x)[i] = val;
val              8278 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8279 ext/uvector/uvector.c             val = maxval;
val              8280 ext/uvector/uvector.c             SCM_S32VECTOR_ELEMENTS(x)[i] = val;
val              8290 ext/uvector/uvector.c     u_long val, minval, maxval;
val              8314 ext/uvector/uvector.c         val = SCM_U32VECTOR_ELEMENTS(x)[i];
val              8348 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8349 ext/uvector/uvector.c             val = minval;
val              8352 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8353 ext/uvector/uvector.c             val = maxval;
val              8364 ext/uvector/uvector.c     u_long val, minval, maxval;
val              8388 ext/uvector/uvector.c         val = SCM_U32VECTOR_ELEMENTS(x)[i];
val              8422 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8423 ext/uvector/uvector.c             val = minval;
val              8424 ext/uvector/uvector.c             SCM_U32VECTOR_ELEMENTS(d)[i] = val;
val              8426 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8427 ext/uvector/uvector.c             val = maxval;
val              8428 ext/uvector/uvector.c             SCM_U32VECTOR_ELEMENTS(d)[i] = val;
val              8438 ext/uvector/uvector.c     u_long val, minval, maxval;
val              8462 ext/uvector/uvector.c         val = SCM_U32VECTOR_ELEMENTS(x)[i];
val              8496 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              8497 ext/uvector/uvector.c             val = minval;
val              8498 ext/uvector/uvector.c             SCM_U32VECTOR_ELEMENTS(x)[i] = val;
val              8500 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              8501 ext/uvector/uvector.c             val = maxval;
val              8502 ext/uvector/uvector.c             SCM_U32VECTOR_ELEMENTS(x)[i] = val;
val              8512 ext/uvector/uvector.c     ScmInt64 val, minval, maxval;
val              8536 ext/uvector/uvector.c         val = SCM_S64VECTOR_ELEMENTS(x)[i];
val              8570 ext/uvector/uvector.c         if (!mindc && INT64LT(val, minval)) {
val              8571 ext/uvector/uvector.c             val = minval;
val              8574 ext/uvector/uvector.c         if (!maxdc && INT64LT(maxval, val)) {
val              8575 ext/uvector/uvector.c             val = maxval;
val              8586 ext/uvector/uvector.c     ScmInt64 val, minval, maxval;
val              8610 ext/uvector/uvector.c         val = SCM_S64VECTOR_ELEMENTS(x)[i];
val              8644 ext/uvector/uvector.c         if (!mindc && INT64LT(val, minval)) {
val              8645 ext/uvector/uvector.c             val = minval;
val              8646 ext/uvector/uvector.c             SCM_S64VECTOR_ELEMENTS(d)[i] = val;
val              8648 ext/uvector/uvector.c         if (!maxdc && INT64LT(maxval, val)) {
val              8649 ext/uvector/uvector.c             val = maxval;
val              8650 ext/uvector/uvector.c             SCM_S64VECTOR_ELEMENTS(d)[i] = val;
val              8660 ext/uvector/uvector.c     ScmInt64 val, minval, maxval;
val              8684 ext/uvector/uvector.c         val = SCM_S64VECTOR_ELEMENTS(x)[i];
val              8718 ext/uvector/uvector.c         if (!mindc && INT64LT(val, minval)) {
val              8719 ext/uvector/uvector.c             val = minval;
val              8720 ext/uvector/uvector.c             SCM_S64VECTOR_ELEMENTS(x)[i] = val;
val              8722 ext/uvector/uvector.c         if (!maxdc && INT64LT(maxval, val)) {
val              8723 ext/uvector/uvector.c             val = maxval;
val              8724 ext/uvector/uvector.c             SCM_S64VECTOR_ELEMENTS(x)[i] = val;
val              8734 ext/uvector/uvector.c     ScmUInt64 val, minval, maxval;
val              8758 ext/uvector/uvector.c         val = SCM_U64VECTOR_ELEMENTS(x)[i];
val              8792 ext/uvector/uvector.c         if (!mindc && INT64LT(val, minval)) {
val              8793 ext/uvector/uvector.c             val = minval;
val              8796 ext/uvector/uvector.c         if (!maxdc && INT64LT(maxval, val)) {
val              8797 ext/uvector/uvector.c             val = maxval;
val              8808 ext/uvector/uvector.c     ScmUInt64 val, minval, maxval;
val              8832 ext/uvector/uvector.c         val = SCM_U64VECTOR_ELEMENTS(x)[i];
val              8866 ext/uvector/uvector.c         if (!mindc && INT64LT(val, minval)) {
val              8867 ext/uvector/uvector.c             val = minval;
val              8868 ext/uvector/uvector.c             SCM_U64VECTOR_ELEMENTS(d)[i] = val;
val              8870 ext/uvector/uvector.c         if (!maxdc && INT64LT(maxval, val)) {
val              8871 ext/uvector/uvector.c             val = maxval;
val              8872 ext/uvector/uvector.c             SCM_U64VECTOR_ELEMENTS(d)[i] = val;
val              8882 ext/uvector/uvector.c     ScmUInt64 val, minval, maxval;
val              8906 ext/uvector/uvector.c         val = SCM_U64VECTOR_ELEMENTS(x)[i];
val              8940 ext/uvector/uvector.c         if (!mindc && INT64LT(val, minval)) {
val              8941 ext/uvector/uvector.c             val = minval;
val              8942 ext/uvector/uvector.c             SCM_U64VECTOR_ELEMENTS(x)[i] = val;
val              8944 ext/uvector/uvector.c         if (!maxdc && INT64LT(maxval, val)) {
val              8945 ext/uvector/uvector.c             val = maxval;
val              8946 ext/uvector/uvector.c             SCM_U64VECTOR_ELEMENTS(x)[i] = val;
val              8956 ext/uvector/uvector.c     double val, minval, maxval;
val              8980 ext/uvector/uvector.c         val = SCM_F32VECTOR_ELEMENTS(x)[i];
val              9014 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              9015 ext/uvector/uvector.c             val = minval;
val              9018 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              9019 ext/uvector/uvector.c             val = maxval;
val              9030 ext/uvector/uvector.c     double val, minval, maxval;
val              9054 ext/uvector/uvector.c         val = SCM_F32VECTOR_ELEMENTS(x)[i];
val              9088 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              9089 ext/uvector/uvector.c             val = minval;
val              9090 ext/uvector/uvector.c             SCM_F32VECTOR_ELEMENTS(d)[i] = val;
val              9092 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              9093 ext/uvector/uvector.c             val = maxval;
val              9094 ext/uvector/uvector.c             SCM_F32VECTOR_ELEMENTS(d)[i] = val;
val              9104 ext/uvector/uvector.c     double val, minval, maxval;
val              9128 ext/uvector/uvector.c         val = SCM_F32VECTOR_ELEMENTS(x)[i];
val              9162 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              9163 ext/uvector/uvector.c             val = minval;
val              9164 ext/uvector/uvector.c             SCM_F32VECTOR_ELEMENTS(x)[i] = val;
val              9166 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              9167 ext/uvector/uvector.c             val = maxval;
val              9168 ext/uvector/uvector.c             SCM_F32VECTOR_ELEMENTS(x)[i] = val;
val              9178 ext/uvector/uvector.c     double val, minval, maxval;
val              9202 ext/uvector/uvector.c         val = SCM_F64VECTOR_ELEMENTS(x)[i];
val              9236 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              9237 ext/uvector/uvector.c             val = minval;
val              9240 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              9241 ext/uvector/uvector.c             val = maxval;
val              9252 ext/uvector/uvector.c     double val, minval, maxval;
val              9276 ext/uvector/uvector.c         val = SCM_F64VECTOR_ELEMENTS(x)[i];
val              9310 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              9311 ext/uvector/uvector.c             val = minval;
val              9312 ext/uvector/uvector.c             SCM_F64VECTOR_ELEMENTS(d)[i] = val;
val              9314 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              9315 ext/uvector/uvector.c             val = maxval;
val              9316 ext/uvector/uvector.c             SCM_F64VECTOR_ELEMENTS(d)[i] = val;
val              9326 ext/uvector/uvector.c     double val, minval, maxval;
val              9350 ext/uvector/uvector.c         val = SCM_F64VECTOR_ELEMENTS(x)[i];
val              9384 ext/uvector/uvector.c         if (!mindc && (val < minval)) {
val              9385 ext/uvector/uvector.c             val = minval;
val              9386 ext/uvector/uvector.c             SCM_F64VECTOR_ELEMENTS(x)[i] = val;
val              9388 ext/uvector/uvector.c         if (!maxdc && (maxval < val)) {
val              9389 ext/uvector/uvector.c             val = maxval;
val              9390 ext/uvector/uvector.c             SCM_F64VECTOR_ELEMENTS(x)[i] = val;
val                55 ext/uvector/uvectorP.h static inline long range_s8hi(long val, int clamp)
val                58 ext/uvector/uvectorP.h     else range_error("s8", Scm_MakeInteger(val));
val                61 ext/uvector/uvectorP.h static inline long range_s8lo(long val, int clamp)
val                64 ext/uvector/uvectorP.h     else range_error("s8", Scm_MakeInteger(val));
val                67 ext/uvector/uvectorP.h static inline long clamp_s8(long val, int clamp)
val                69 ext/uvector/uvectorP.h     if (val > 127)  return range_s8hi(val, clamp);
val                70 ext/uvector/uvectorP.h     if (val < -128) return range_s8lo(val, clamp);
val                71 ext/uvector/uvectorP.h     return val;
val                74 ext/uvector/uvectorP.h static inline long range_u8hi(long val, int clamp)
val                77 ext/uvector/uvectorP.h     else range_error("u8", Scm_MakeInteger(val));
val                80 ext/uvector/uvectorP.h static inline long range_u8lo(long val, int clamp)
val                83 ext/uvector/uvectorP.h     else range_error("u8", Scm_MakeInteger(val));
val                86 ext/uvector/uvectorP.h static inline long clamp_u8(long val, int clamp)
val                88 ext/uvector/uvectorP.h     if (val > 255)  return range_u8hi(val, clamp);
val                89 ext/uvector/uvectorP.h     if (val < 0)    return range_u8lo(val, clamp);
val                90 ext/uvector/uvectorP.h     return val;
val                93 ext/uvector/uvectorP.h static inline long range_s16hi(long val, int clamp)
val                96 ext/uvector/uvectorP.h     else range_error("s16", Scm_MakeInteger(val));
val                99 ext/uvector/uvectorP.h static inline long range_s16lo(long val, int clamp)
val               102 ext/uvector/uvectorP.h     else range_error("s16", Scm_MakeInteger(val));
val               105 ext/uvector/uvectorP.h static inline long clamp_s16(long val, int clamp)
val               107 ext/uvector/uvectorP.h     if (val > 32767)  return range_s16hi(val, clamp);
val               108 ext/uvector/uvectorP.h     if (val < -32768) return range_s16lo(val, clamp);
val               109 ext/uvector/uvectorP.h     return val;
val               112 ext/uvector/uvectorP.h static inline long range_u16hi(long val, int clamp)
val               115 ext/uvector/uvectorP.h     else range_error("u16", Scm_MakeInteger(val));
val               118 ext/uvector/uvectorP.h static inline long range_u16lo(long val, int clamp)
val               121 ext/uvector/uvectorP.h     else range_error("u16", Scm_MakeInteger(val));
val               124 ext/uvector/uvectorP.h static inline long clamp_u16(long val, int clamp)
val               126 ext/uvector/uvectorP.h     if (val > 65535)  return range_u16hi(val, clamp);
val               127 ext/uvector/uvectorP.h     if (val < 0)      return range_u16lo(val, clamp);
val               128 ext/uvector/uvectorP.h     return val;
val               131 ext/uvector/uvectorP.h static inline long range_s32hi(long val, int clamp)
val               134 ext/uvector/uvectorP.h     else range_error("s32", Scm_MakeInteger(val));
val               137 ext/uvector/uvectorP.h static inline long range_s32lo(long val, int clamp)
val               140 ext/uvector/uvectorP.h     else range_error("s32", Scm_MakeInteger(val));
val               144 ext/uvector/uvectorP.h #define clamp_s32(val, clamp)   (val)
val               146 ext/uvector/uvectorP.h static inline long clamp_s32(long val, int clamp)
val               148 ext/uvector/uvectorP.h     if (val > 2147483647L)  return range_s32hi(val, clamp);
val               149 ext/uvector/uvectorP.h     if (val < -2147483648L) return range_s32lo(val, clamp);
val               150 ext/uvector/uvectorP.h     return val;
val               154 ext/uvector/uvectorP.h static inline long range_u32hi(u_long val, int clamp)
val               157 ext/uvector/uvectorP.h     else range_error("u32", Scm_MakeIntegerU(val));
val               160 ext/uvector/uvectorP.h static inline long range_u32lo(u_long val, int clamp)
val               163 ext/uvector/uvectorP.h     else range_error("u32", Scm_MakeIntegerU(val));
val               167 ext/uvector/uvectorP.h #define clamp_u32(val, clamp)   (val)
val               169 ext/uvector/uvectorP.h static inline long clamp_u32(u_long val, int clamp)
val               171 ext/uvector/uvectorP.h     if (val > 4294967295UL)    return range_u32hi(val, clamp);
val               172 ext/uvector/uvectorP.h     return val;
val               176 ext/uvector/uvectorP.h static inline ScmInt64 range_s64hi(ScmInt64 val, int clamp)
val               179 ext/uvector/uvectorP.h         SCM_SET_INT64_MAX(val);
val               180 ext/uvector/uvectorP.h         return val;
val               182 ext/uvector/uvectorP.h     else range_error("s64", Scm_MakeInteger64(val));
val               185 ext/uvector/uvectorP.h static inline ScmInt64 range_s64lo(ScmInt64 val, int clamp)
val               188 ext/uvector/uvectorP.h         SCM_SET_INT64_MIN(val);
val               189 ext/uvector/uvectorP.h         return val;
val               191 ext/uvector/uvectorP.h     else range_error("s64", Scm_MakeInteger64(val));
val               194 ext/uvector/uvectorP.h static inline ScmUInt64 range_u64hi(ScmUInt64 val, int clamp)
val               197 ext/uvector/uvectorP.h         SCM_SET_UINT64_MAX(val);
val               198 ext/uvector/uvectorP.h         return val;
val               200 ext/uvector/uvectorP.h     else range_error("u64", Scm_MakeIntegerU64(val));
val               203 ext/uvector/uvectorP.h static inline ScmUInt64 range_u64lo(ScmUInt64 val, int clamp)
val               206 ext/uvector/uvectorP.h         SCM_SET_INT64_ZERO(val);
val               207 ext/uvector/uvectorP.h         return val;
val               209 ext/uvector/uvectorP.h     else range_error("u64", Scm_MakeIntegerU64(val));
val               217 ext/uvector/uvectorP.h     long val;
val               218 ext/uvector/uvectorP.h     if (!SCM_INTP(obj)) val = Scm_GetInteger(obj); /* clamped to long */
val               219 ext/uvector/uvectorP.h     else                val = SCM_INT_VALUE(obj);
val               220 ext/uvector/uvectorP.h     return clamp_s8(val, clamp);
val               225 ext/uvector/uvectorP.h     long val;
val               226 ext/uvector/uvectorP.h     if (!SCM_INTP(obj)) val = Scm_GetInteger(obj); /* clamped to long */
val               227 ext/uvector/uvectorP.h     else                val = SCM_INT_VALUE(obj);
val               228 ext/uvector/uvectorP.h     return clamp_u8(val, clamp);
val               233 ext/uvector/uvectorP.h     long val;
val               234 ext/uvector/uvectorP.h     if (!SCM_INTP(obj)) val = Scm_GetInteger(obj); /* clamped to long */
val               235 ext/uvector/uvectorP.h     else                val = SCM_INT_VALUE(obj);
val               236 ext/uvector/uvectorP.h     return clamp_s16(val, clamp);
val               237 ext/uvector/uvectorP.h     return val;
val               242 ext/uvector/uvectorP.h     long val;
val               243 ext/uvector/uvectorP.h     if (!SCM_INTP(obj)) val = Scm_GetInteger(obj); /* clamped to long */
val               244 ext/uvector/uvectorP.h     else                val = SCM_INT_VALUE(obj);
val               245 ext/uvector/uvectorP.h     return clamp_u16(val, clamp);
val               148 ext/uvector/uvlib.c   ScmObj val;
val               162 ext/uvector/uvlib.c   val = (val_scm);
val               170 ext/uvector/uvlib.c SCM_RETURN(Scm_S8VectorSet(v, i, val, clamp_arg(clamp)));
val               354 ext/uvector/uvlib.c   ScmObj val;
val               367 ext/uvector/uvlib.c   val = (val_scm);
val               384 ext/uvector/uvlib.c   filler = s8unbox(val, SCM_CLAMP_ERROR);
val               597 ext/uvector/uvlib.c   ScmObj val;
val               611 ext/uvector/uvlib.c   val = (val_scm);
val               619 ext/uvector/uvlib.c SCM_RETURN(Scm_U8VectorSet(v, i, val, clamp_arg(clamp)));
val               803 ext/uvector/uvlib.c   ScmObj val;
val               816 ext/uvector/uvlib.c   val = (val_scm);
val               833 ext/uvector/uvlib.c   filler = u8unbox(val, SCM_CLAMP_ERROR);
val              1046 ext/uvector/uvlib.c   ScmObj val;
val              1060 ext/uvector/uvlib.c   val = (val_scm);
val              1068 ext/uvector/uvlib.c SCM_RETURN(Scm_S16VectorSet(v, i, val, clamp_arg(clamp)));
val              1252 ext/uvector/uvlib.c   ScmObj val;
val              1265 ext/uvector/uvlib.c   val = (val_scm);
val              1282 ext/uvector/uvlib.c   filler = s16unbox(val, SCM_CLAMP_ERROR);
val              1495 ext/uvector/uvlib.c   ScmObj val;
val              1509 ext/uvector/uvlib.c   val = (val_scm);
val              1517 ext/uvector/uvlib.c SCM_RETURN(Scm_U16VectorSet(v, i, val, clamp_arg(clamp)));
val              1701 ext/uvector/uvlib.c   ScmObj val;
val              1714 ext/uvector/uvlib.c   val = (val_scm);
val              1731 ext/uvector/uvlib.c   filler = u16unbox(val, SCM_CLAMP_ERROR);
val              1944 ext/uvector/uvlib.c   ScmObj val;
val              1958 ext/uvector/uvlib.c   val = (val_scm);
val              1966 ext/uvector/uvlib.c SCM_RETURN(Scm_S32VectorSet(v, i, val, clamp_arg(clamp)));
val              2150 ext/uvector/uvlib.c   ScmObj val;
val              2163 ext/uvector/uvlib.c   val = (val_scm);
val              2180 ext/uvector/uvlib.c   filler = Scm_GetInteger32Clamp(val, SCM_CLAMP_ERROR, NULL);
val              2393 ext/uvector/uvlib.c   ScmObj val;
val              2407 ext/uvector/uvlib.c   val = (val_scm);
val              2415 ext/uvector/uvlib.c SCM_RETURN(Scm_U32VectorSet(v, i, val, clamp_arg(clamp)));
val              2599 ext/uvector/uvlib.c   ScmObj val;
val              2612 ext/uvector/uvlib.c   val = (val_scm);
val              2629 ext/uvector/uvlib.c   filler = Scm_GetIntegerU32Clamp(val, SCM_CLAMP_ERROR, NULL);
val              2842 ext/uvector/uvlib.c   ScmObj val;
val              2856 ext/uvector/uvlib.c   val = (val_scm);
val              2864 ext/uvector/uvlib.c SCM_RETURN(Scm_S64VectorSet(v, i, val, clamp_arg(clamp)));
val              3048 ext/uvector/uvlib.c   ScmObj val;
val              3061 ext/uvector/uvlib.c   val = (val_scm);
val              3078 ext/uvector/uvlib.c   filler = Scm_GetInteger64Clamp(val, SCM_CLAMP_ERROR, NULL);
val              3291 ext/uvector/uvlib.c   ScmObj val;
val              3305 ext/uvector/uvlib.c   val = (val_scm);
val              3313 ext/uvector/uvlib.c SCM_RETURN(Scm_U64VectorSet(v, i, val, clamp_arg(clamp)));
val              3497 ext/uvector/uvlib.c   ScmObj val;
val              3510 ext/uvector/uvlib.c   val = (val_scm);
val              3527 ext/uvector/uvlib.c   filler = Scm_GetIntegerU64Clamp(val, SCM_CLAMP_ERROR, NULL);
val              3740 ext/uvector/uvlib.c   ScmObj val;
val              3754 ext/uvector/uvlib.c   val = (val_scm);
val              3762 ext/uvector/uvlib.c SCM_RETURN(Scm_F32VectorSet(v, i, val, clamp_arg(clamp)));
val              3946 ext/uvector/uvlib.c   ScmObj val;
val              3959 ext/uvector/uvlib.c   val = (val_scm);
val              3976 ext/uvector/uvlib.c   filler = (float)Scm_GetDouble(val);
val              4189 ext/uvector/uvlib.c   ScmObj val;
val              4203 ext/uvector/uvlib.c   val = (val_scm);
val              4211 ext/uvector/uvlib.c SCM_RETURN(Scm_F64VectorSet(v, i, val, clamp_arg(clamp)));
val              4395 ext/uvector/uvlib.c   ScmObj val;
val              4408 ext/uvector/uvlib.c   val = (val_scm);
val              4425 ext/uvector/uvlib.c   filler = Scm_GetDouble(val);
val               383 gc/aix_irix_threads.c           int val = sizeof(regbuf);
val               385 gc/aix_irix_threads.c 			  		   sizeof(pinfo), regbuf, &val);
val               402 gc/aix_irix_threads.c           GC_push_all_eager((ptr_t)regbuf, ((ptr_t)regbuf)+val);
val               138 gc/os_dep.c    # define LONGJMP(env, val) siglongjmp(env, val)
val               142 gc/os_dep.c    # define LONGJMP(env, val) longjmp(env, val)
val               139 src/bignum.c   ScmObj Scm_MakeBignumFromSI(long val)
val               142 src/bignum.c       if (val == LONG_MIN) {
val               146 src/bignum.c       } else if (val < 0) {
val               149 src/bignum.c           b->values[0] = -val;
val               153 src/bignum.c           b->values[0] = val;
val               158 src/bignum.c   ScmObj Scm_MakeBignumFromUI(u_long val)
val               162 src/bignum.c       b->values[0] = val;
val               190 src/bignum.c   ScmObj Scm_MakeBignumFromDouble(double val)
val               195 src/bignum.c       if (val >= LONG_MIN && val <= LONG_MAX) {
val               196 src/bignum.c           return Scm_MakeBignumFromSI((long)val);
val               199 src/bignum.c       mantissa = Scm_DecodeFlonum(val, &exponent, &sign);
val               201 src/bignum.c           Scm_Error("can't convert %lf to an integer", val);
val               299 src/char.c         int i, val = 0;
val               305 src/char.c                     return val;
val               308 src/char.c             val = val * 16 + Scm_DigitToInt(buf[i], 16);
val               310 src/char.c         return (ScmChar)val;
val               319 src/char.c         int i, c, val = 0, dig;
val               330 src/char.c             val = val * 16 + dig;
val               336 src/char.c             return (ScmChar)val;
val                62 src/class.c                                          ScmObj val);
val               528 src/class.c    static void class_name_set(ScmClass *klass, ScmObj val)
val               530 src/class.c        klass->name = val;
val               538 src/class.c    static void class_cpl_set(ScmClass *klass, ScmObj val)
val               545 src/class.c        if (!SCM_PAIRP(val)) goto err;
val               547 src/class.c        if (SCM_CAR(val) != SCM_OBJ(klass)) goto err;
val               550 src/class.c        cp = SCM_CDR(val);
val               554 src/class.c        klass->cpl = Scm_CopyList(val);
val               561 src/class.c                        Scm_Error("class precedence list has more than one C-defined base class (except <object>): %S", val);
val               574 src/class.c            Scm_Error("class precedence list doesn't have a base class: %S", val);
val               587 src/class.c                  "and ending by the class <top>: %S", val);
val               595 src/class.c    static void class_direct_supers_set(ScmClass *klass, ScmObj val)
val               598 src/class.c        SCM_FOR_EACH(vp, val) {
val               603 src/class.c        klass->directSupers = val;
val               611 src/class.c    static void class_direct_slots_set(ScmClass *klass, ScmObj val)
val               614 src/class.c        SCM_FOR_EACH(vp, val) {
val               619 src/class.c        klass->directSlots = val;
val               627 src/class.c    static void class_slots_set(ScmClass *klass, ScmObj val)
val               630 src/class.c        SCM_FOR_EACH(vp, val) {
val               635 src/class.c        klass->slots = val;
val               643 src/class.c    static void class_accessors_set(ScmClass *klass, ScmObj val)
val               646 src/class.c        SCM_FOR_EACH(vp, val) {
val               652 src/class.c        klass->accessors = val;
val               685 src/class.c    static void class_initargs_set(ScmClass *klass, ScmObj val)
val               687 src/class.c        int len = Scm_Length(val);
val               689 src/class.c            Scm_Error("class-initargs must be a list of even number of elements, but got %S", val);
val               691 src/class.c        klass->initargs = val;
val               699 src/class.c    static void class_defined_modules_set(ScmClass *klass, ScmObj val)
val               702 src/class.c        SCM_FOR_EACH(cp, val) {
val               706 src/class.c        klass->modules = val;
val               709 src/class.c        Scm_Error("list of modules required, bot got %S", val);
val              1157 src/class.c    static inline void scheme_slot_set(ScmObj obj, int number, ScmObj val)
val              1162 src/class.c        SCM_INSTANCE_SLOTS(obj)[number] = val;
val              1174 src/class.c    void Scm_InstanceSlotSet(ScmObj obj, int number, ScmObj val)
val              1176 src/class.c        scheme_slot_set(obj, number, val);
val              1229 src/class.c    #define SLOT_MISSING4(klass, obj, slot, val)            \
val              1231 src/class.c                    SCM_LIST4(SCM_OBJ(klass), obj, slot, val))
val              1282 src/class.c        ScmObj val = SCM_UNBOUND;
val              1284 src/class.c            val = sa->getter(obj);
val              1286 src/class.c            val = scheme_slot_ref(obj, sa->slotNumber);
val              1306 src/class.c            return SCM_MAKE_BOOL(!(SCM_UNBOUNDP(val) || SCM_UNDEFINEDP(val)));
val              1308 src/class.c            if (SCM_UNBOUNDP(val) || SCM_UNDEFINEDP(val)) {
val              1311 src/class.c                return val;
val              1433 src/class.c                                   ScmObj val)
val              1436 src/class.c            sa->setter(obj, val);
val              1438 src/class.c            scheme_slot_set(obj, sa->slotNumber, val);
val              1440 src/class.c            return Scm_VMApply(sa->schemeSetter, SCM_LIST2(obj, val));
val              1462 src/class.c    ScmObj Scm_VMSlotSet(ScmObj obj, ScmObj slot, ScmObj val)
val              1470 src/class.c            data[2] = val;
val              1475 src/class.c        if (sa == NULL) return SLOT_MISSING4(klass, obj, slot, val);
val              1476 src/class.c        else            return slot_set_using_accessor(obj, sa, val);
val              1497 src/class.c    ScmObj Scm_VMSlotSetUsingAccessor(ScmObj obj, ScmSlotAccessor *sa, ScmObj val)
val              1509 src/class.c            data[2] = val;
val              1514 src/class.c        return slot_set_using_accessor(obj, sa, val);
val              1537 src/class.c        ScmObj val = args[3];
val              1544 src/class.c        if (sa == NULL) return SLOT_MISSING4(klass, obj, slot, val);
val              1545 src/class.c        else            return slot_set_using_accessor(obj, sa, val);
val              1647 src/class.c                ScmObj val = Scm_GetKeyword(acc->initKeyword, initargs, SCM_UNDEFINED);
val              1648 src/class.c                if (!SCM_UNDEFINEDP(val)) {
val              1649 src/class.c                    acc->setter(instance, val);
val              1755 src/class.c    static void slot_accessor_slot_number_set(ScmSlotAccessor *sa, ScmObj val)
val              1758 src/class.c        if (!SCM_INTP(val) || ((n = SCM_INT_VALUE(val)) < 0))
val              1759 src/class.c            Scm_Error("small positive integer required, but got %S", val);
val              1935 src/class.c    static void generic_name_set(ScmGeneric *gf, ScmObj val)
val              1937 src/class.c        gf->common.info = val;
val              1945 src/class.c    static void generic_methods_set(ScmGeneric *gf, ScmObj val)
val              1947 src/class.c        gf->methods = val;
val              2250 src/class.c    static void method_generic_set(ScmMethod *m, ScmObj val)
val              2252 src/class.c        if (SCM_GENERICP(val))
val              2253 src/class.c            m->generic = SCM_GENERIC(val);
val              2255 src/class.c            Scm_Error("generic function required, but got %S", val);
val              2267 src/class.c    static void method_specializers_set(ScmMethod *m, ScmObj val)
val              2269 src/class.c        int len = Scm_Length(val);
val              2271 src/class.c            Scm_Error("specializer list doesn't match body's lambda list:", val);
val              2275 src/class.c            m->specializers = class_list_to_array(val, len);
val              2488 src/class.c        ScmObj val = args[1];
val              2492 src/class.c            return Scm_VMSlotSet(obj, ca->name, val);
val              2494 src/class.c        return slot_set_using_accessor(obj, ca, val);
val               201 src/compaux.c  static void   identifier_name_set(ScmObj obj, ScmObj val)
val               203 src/compaux.c      if (!SCM_SYMBOLP(val)) {
val               204 src/compaux.c          Scm_Error("symbol required, but got %S", val);
val               206 src/compaux.c      SCM_IDENTIFIER(obj)->name = SCM_SYMBOL(val);
val               214 src/compaux.c  static void   identifier_module_set(ScmObj obj, ScmObj val)
val               216 src/compaux.c      if (!SCM_MODULEP(val)) {
val               217 src/compaux.c          Scm_Error("module required, but got %S", val);
val               219 src/compaux.c      SCM_IDENTIFIER(obj)->module = SCM_MODULE(val);
val               227 src/compaux.c  static void   identifier_env_set(ScmObj obj, ScmObj val)
val               229 src/compaux.c      if (!SCM_LISTP(val)) {
val               230 src/compaux.c          Scm_Error("list required, but got %S", val);
val               232 src/compaux.c      SCM_IDENTIFIER(obj)->env = val;
val               108 src/error.c    static void message_set(ScmMessageCondition *obj, ScmObj val)
val               110 src/error.c        obj->message = val;
val               196 src/error.c    static void syserror_number_set(ScmSystemError *obj, ScmObj val)
val               198 src/error.c        if (!SCM_INTP(val)) {
val               199 src/error.c            Scm_Error("small integer required, but got %S", val);
val               201 src/error.c        obj->error_number = SCM_INT_VALUE(val);
val               210 src/error.c    static void readerror_port_set(ScmReadError *obj, ScmObj val)
val               212 src/error.c        if (SCM_IPORTP(val)) {
val               213 src/error.c            obj->port = SCM_PORT(val);
val               215 src/error.c        else if (SCM_FALSEP(val)) {
val               219 src/error.c            Scm_Error("input port or #f required, but got %S", val);
val               228 src/error.c    static void readerror_line_set(ScmReadError *obj, ScmObj val)
val               230 src/error.c        if (!SCM_INTP(val)){
val               231 src/error.c            Scm_Error("small integer required, but got %S", val);
val               233 src/error.c        obj->line = SCM_INT_VALUE(val);
val               241 src/error.c    static void readerror_dummy_set(ScmReadError *obj, ScmObj val)
val               252 src/error.c    static void porterror_port_set(ScmPortError *obj, ScmObj val)
val               254 src/error.c        if (!SCM_PORTP(val) && !SCM_FALSEP(val)) {
val               255 src/error.c            Scm_Error("port or #f required, but got %S", val);
val               257 src/error.c        obj->port = SCM_FALSEP(val)? NULL : SCM_PORT(val);
val              2844 src/extlib.c     ScmObj val;
val              2853 src/extlib.c     val = (val_scm);
val              2857 src/extlib.c   SCM_RESULT = Scm_WeakVectorSet(wv, index, val);
val              2929 src/extlib.c     ScmObj val;
val              2932 src/extlib.c     val = (val_scm);
val              2936 src/extlib.c    SCM_RESULT = (val);
val              1673 src/gauche.h   SCM_EXTERN ScmObj Scm_WeakVectorSet(ScmWeakVector *v, int index, ScmObj val);
val              1689 src/gauche.h                                              void *key, int op, void *val);
val              1868 src/gauche.h   #define SCM_DEFINE(module, cstr, val)           \
val              1871 src/gauche.h                  SCM_OBJ(val))
val              1915 src/gauche.h   #define SCM_GLOC_SET(gloc, val) \
val              1916 src/gauche.h       ((gloc)->setter? (gloc)->setter((gloc), (val)) : ((gloc)->value = (val)))
val              1920 src/gauche.h   SCM_EXTERN ScmObj Scm_GlocConstSetter(ScmGloc *g, ScmObj val);
val              2039 src/gauche.h   SCM_EXTERN ScmObj Scm_MakeBignumFromSI(long val);
val              2040 src/gauche.h   SCM_EXTERN ScmObj Scm_MakeBignumFromUI(u_long val);
val              2042 src/gauche.h   SCM_EXTERN ScmObj Scm_MakeBignumFromDouble(double val);
val              2645 src/gauche.h   SCM_EXTERN time_t Scm_GetSysTime(ScmObj val);
val               130 src/gauche/class.h 					     ScmObj val);
val               136 src/gauche/class.h SCM_EXTERN void   Scm_InstanceSlotSet(ScmObj obj, int number, ScmObj val);
val                71 src/gauche/mingw-compat.h #define siglongjmp(jbuf, val)  longjmp(jbuf, val)
val                64 src/hash.c     #define SMALL_INT_HASH(result, val) \
val                65 src/hash.c         ((result) = (val)*2654435761UL)
val                67 src/hash.c     #define ADDRESS_HASH(result, val) \
val                68 src/hash.c         ((result) = (SCM_WORD(val) >> 3) * 2654435761UL)
val                82 src/hash.c     static unsigned int round2up(unsigned int val)
val                85 src/hash.c         while (n < val) {
val              1238 src/intlib.c     ScmObj val;
val              1248 src/intlib.c     val = (val_scm);
val              1251 src/intlib.c      if (SCM_UNBOUNDP(val)) {
val              1254 src/intlib.c        if (!SCM_INTP(val)) Scm_Error("integer required, but got %S", val);
val              1256 src/intlib.c        Scm_VM()->evalSituation = SCM_INT_VALUE(val);
val              1130 src/load.c     #define DEF(rec, sym, val) \
val              1131 src/load.c         rec = SCM_GLOC(Scm_Define(m, SCM_SYMBOL(sym), val))
val                34 src/moplib.c     ScmObj val = Scm_SymbolValue(module, name);
val                35 src/moplib.c     if (!Scm_TypeP(val, SCM_CLASS_GENERIC)) {
val                36 src/moplib.c       if (SCM_SUBRP(val) || SCM_CLOSUREP(val)) {
val                37 src/moplib.c         val = Scm_MakeBaseGeneric(SCM_OBJ(name), call_fallback_proc, val);
val                39 src/moplib.c         val = Scm_MakeBaseGeneric(SCM_OBJ(name), NULL, NULL);
val                42 src/moplib.c     Scm_Define(module, name, val);
val                43 src/moplib.c     SCM_RETURN(val);
val               478 src/number.c       u_long val[2];
val               480 src/number.c       val[0] = i.lo;
val               481 src/number.c       val[1] = i.hi;
val               482 src/number.c       return Scm_MakeBignumFromUIArray(0, val, 2); /* bignum checks sign */
val               484 src/number.c       u_long val[2];
val               485 src/number.c       val[0] = (uint64_t)i & ULONG_MAX;
val               486 src/number.c       val[1] = (uint64_t)i >> 32;
val               487 src/number.c       if (val[1] == 0 && val[0] <= LONG_MAX) return Scm_MakeInteger(val[0]);
val               488 src/number.c       return Scm_NormalizeBignum(SCM_BIGNUM(Scm_MakeBignumFromUIArray(0, val, 2)));
val               495 src/number.c       u_long val[2];
val               497 src/number.c       val[0] = i.lo;
val               498 src/number.c       val[1] = i.hi;
val               499 src/number.c       return Scm_MakeBignumFromUIArray(1, val, 2);
val               501 src/number.c       u_long val[2];
val               502 src/number.c       val[0] = (uint64_t)i & ULONG_MAX;
val               503 src/number.c       val[1] = (uint64_t)i >> 32;
val               504 src/number.c       if (val[1] == 0) return Scm_MakeIntegerU(val[0]);
val               505 src/number.c       return Scm_MakeBignumFromUIArray(1, val, 2);
val               764 src/number.c           long val = SCM_INT_VALUE(obj);
val               765 src/number.c           obj = Scm_MakeFlonum(1.0/(double)val);
val               767 src/number.c           double val = Scm_BignumToDouble(SCM_BIGNUM(obj));
val               768 src/number.c           obj = Scm_MakeFlonum(1.0/val);
val               770 src/number.c           double val = SCM_FLONUM_VALUE(obj);
val               771 src/number.c           obj = Scm_MakeFlonum(1.0/val);
val              1927 src/number.c   static void double_print(char *buf, int buflen, double val, int plus_sign)
val              1931 src/number.c       if (val == 0.0) {
val              1935 src/number.c       } else if (SCM_IS_INF(val)) {
val              1936 src/number.c           if (val < 0.0) strcpy(buf, "#i-1/0");
val              1940 src/number.c       } else if (SCM_IS_NAN(val)) {
val              1945 src/number.c       if (val < 0.0) *buf++ = '-', buflen--;
val              1957 src/number.c           if (val < 0) val = -val;
val              1960 src/number.c           f = Scm_DecodeFlonum(val, &exp, &sign);
val              1990 src/number.c           est = (int)ceil(log10(val) - 0.1);
val              1016 src/read.c             ScmObj val;
val              1027 src/read.c             val = read_item(port, ctx);
val              1028 src/read.c             SCM_READ_REFERENCE(ref)->value = val;
val              1029 src/read.c             return val;
val               214 src/symbol.c   ScmObj Scm_GlocConstSetter(ScmGloc *gloc, ScmObj val)
val               788 src/system.c   static void time_type_set(ScmTime *t, ScmObj val)
val               790 src/system.c       if (!SCM_SYMBOLP(val)) {
val               791 src/system.c           Scm_Error("time type must be a symbol, but got %S", val);
val               793 src/system.c       t->type = val;
val               801 src/system.c   static void time_sec_set(ScmTime *t, ScmObj val)
val               803 src/system.c       if (!SCM_REALP(val)) {
val               804 src/system.c           Scm_Error("real number required, but got %S", val);
val               806 src/system.c       t->sec = Scm_GetInteger(val);
val               814 src/system.c   static void time_nsec_set(ScmTime *t, ScmObj val)
val               817 src/system.c       if (!SCM_REALP(val)) {
val               818 src/system.c           Scm_Error("real number required, but got %S", val);
val               820 src/system.c       if ((l = Scm_GetInteger(val)) >= 1000000000) {
val               845 src/system.c       double val = (double)t;
val               846 src/system.c       return Scm_MakeFlonum(val);
val               850 src/system.c   time_t Scm_GetSysTime(ScmObj val)
val               852 src/system.c       if (SCM_TIMEP(val)) {
val               854 src/system.c           return (time_t)SCM_TIME(val)->sec;
val               856 src/system.c           return (time_t)((double)SCM_TIME(val)->sec +
val               857 src/system.c                           (double)SCM_TIME(val)->nsec/1.0e9);
val               859 src/system.c       } else if (SCM_NUMBERP(val)) {
val               861 src/system.c           return (time_t)Scm_GetUInteger(val);
val               863 src/system.c           return (time_t)Scm_GetDouble(val);
val               866 src/system.c           Scm_Error("bad time value: either a <time> object or a real number is required, but got %S", val);
val               947 src/system.c     static void SCM_CPP_CAT(name, _set)(ScmSysTm *tm, ScmObj val) {       \
val               948 src/system.c       if (!SCM_EXACTP(val))                                               \
val               949 src/system.c         Scm_Error("exact integer required, but got %S", val);             \
val               950 src/system.c       tm->tm.name = Scm_GetInteger(val);                                  \
val              1330 src/system.c           int val = SCM_INT_VALUE(timeout);
val              1331 src/system.c           if (val < 0) goto badtv;
val              1332 src/system.c           tm->tv_sec = val / 1000000;
val              1333 src/system.c           tm->tv_usec = val % 1000000;
val              1344 src/system.c           long val = Scm_GetInteger(timeout);
val              1345 src/system.c           if (val < 0) goto badtv;
val              1346 src/system.c           tm->tv_sec = val / 1000000;
val              1347 src/system.c           tm->tv_usec = val % 1000000;
val               463 src/test-arith.c int test_scm_c_scm(const char *msg, ScmObj expect, ScmObj val)
val               466 src/test-arith.c     if (Scm_EqualP(expect, val)) {
val               469 src/test-arith.c         Scm_Printf(SCM_CUROUT, "ERROR: got %S\n", val);
val               474 src/test-arith.c int test_true(const char *msg, int val)
val               477 src/test-arith.c     if (val) {
val               480 src/test-arith.c         Scm_Printf(SCM_CUROUT, "ERROR: got %d\n", val);
val               708 src/vm.c       #define SWITCH(val) goto *dispatch_table[val];
val               718 src/vm.c       #define SWITCH(val) switch (val)
val              2235 src/vm.c                       ScmObj val = ENV_DATA(ENV, 0);
val              2236 src/vm.c                       if (SCM_INTP(val)) {
val              2237 src/vm.c                           imm += SCM_INT_VALUE(val);
val              2246 src/vm.c                           VAL0 = Scm_Add(SCM_MAKE_INT(imm), val, SCM_NIL);
val              2253 src/vm.c                       ScmObj val = ENV_DATA(ENV, 1);
val              2254 src/vm.c                       if (SCM_INTP(val)) {
val              2255 src/vm.c                           imm += SCM_INT_VALUE(val);
val              2264 src/vm.c                           VAL0 = Scm_Add(SCM_MAKE_INT(imm), val, SCM_NIL);
val              2271 src/vm.c                       ScmObj val = ENV_DATA(ENV, 2);
val              2272 src/vm.c                       if (SCM_INTP(val)) {
val              2273 src/vm.c                           imm += SCM_INT_VALUE(val);
val              2282 src/vm.c                           VAL0 = Scm_Add(SCM_MAKE_INT(imm), val, SCM_NIL);
val              2289 src/vm.c                       ScmObj val = ENV_DATA(ENV, 3);
val              2290 src/vm.c                       if (SCM_INTP(val)) {
val              2291 src/vm.c                           imm += SCM_INT_VALUE(val);
val              2300 src/vm.c                           VAL0 = Scm_Add(SCM_MAKE_INT(imm), val, SCM_NIL);
val              2307 src/vm.c                       ScmObj val = ENV_DATA(ENV, 4);
val              2308 src/vm.c                       if (SCM_INTP(val)) {
val              2309 src/vm.c                           imm += SCM_INT_VALUE(val);
val              2318 src/vm.c                           VAL0 = Scm_Add(SCM_MAKE_INT(imm), val, SCM_NIL);
val               991 src/write.c        ScmObj val;
val              1016 src/write.c                        val = SCM_CAR(args);
val              1018 src/write.c                        SCM_ASSERT(SCM_EXACTP(val));
val              1022 src/write.c                                 Scm_GetInteger(val));
val              1029 src/write.c                        val = SCM_CAR(args);
val              1031 src/write.c                        SCM_ASSERT(SCM_EXACTP(val));
val              1035 src/write.c                                 Scm_GetUInteger(val));
val              1042 src/write.c                        val = SCM_CAR(args);
val              1044 src/write.c                        SCM_ASSERT(SCM_FLONUMP(val));
val              1048 src/write.c                                 Scm_GetDouble(val));
val              1055 src/write.c                        val = SCM_CAR(args);
val              1057 src/write.c                        SCM_ASSERT(SCM_STRINGP(val));
val              1058 src/write.c                        Scm_PutsUnsafe(SCM_STRING(val), out);
val              1063 src/write.c                        for (len = SCM_STRING_BODY_LENGTH(SCM_STRING_BODY(val));
val              1078 src/write.c                        val = SCM_CAR(args);
val              1080 src/write.c                        SCM_ASSERT(SCM_EXACTP(val));
val              1084 src/write.c                                 (void*)Scm_GetUInteger(val));
val              1093 src/write.c                        val = SCM_CAR(args);
val              1101 src/write.c                            int n = Scm_WriteCircular(val, SCM_OBJ(out), mode, width);
val              1109 src/write.c                            format_write(val, out, &wctx, sharedp);
val              1111 src/write.c                            int n = Scm_WriteLimited(val, SCM_OBJ(out), mode, width);
val              1119 src/write.c                            format_write(val, out, &wctx, sharedp);
val              1126 src/write.c                        val = SCM_CAR(args);
val              1128 src/write.c                        SCM_ASSERT(SCM_EXACTP(val));
val              1129 src/write.c                        Scm_PutcUnsafe(Scm_GetInteger(val), out);
val              1178 src/write.c                        signed int val = va_arg(ap, signed int);
val              1179 src/write.c                        SCM_APPEND1(h, t, Scm_MakeInteger(val));
val              1184 src/write.c                        unsigned long val = va_arg(ap, unsigned long);
val              1185 src/write.c                        SCM_APPEND1(h, t, Scm_MakeIntegerU(val));
val              1190 src/write.c                        double val = va_arg(ap, double);
val              1191 src/write.c                        SCM_APPEND1(h, t, Scm_MakeFlonum(val));
val              1196 src/write.c                        char *val = va_arg(ap, char *);
val              1198 src/write.c                        if (val != NULL) SCM_APPEND1(h, t, SCM_MAKE_STR(val));
val              1208 src/write.c                        void *val = va_arg(ap, void *);
val              1209 src/write.c                        SCM_APPEND1(h, t, Scm_MakeIntegerU((unsigned long)val));