args 51 ext/threads/threads.c static ScmObj thread_error_handler(ScmObj *args, int nargs, void *data) args 80 ext/uvector/uvlib.c ScmObj args; args 84 ext/uvector/uvlib.c args = (args_scm); args 86 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS8Vector(args, SCM_CLAMP_ERROR)); args 529 ext/uvector/uvlib.c ScmObj args; args 533 ext/uvector/uvlib.c args = (args_scm); args 535 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU8Vector(args, SCM_CLAMP_ERROR)); args 978 ext/uvector/uvlib.c ScmObj args; args 982 ext/uvector/uvlib.c args = (args_scm); args 984 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS16Vector(args, SCM_CLAMP_ERROR)); args 1427 ext/uvector/uvlib.c ScmObj args; args 1431 ext/uvector/uvlib.c args = (args_scm); args 1433 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU16Vector(args, SCM_CLAMP_ERROR)); args 1876 ext/uvector/uvlib.c ScmObj args; args 1880 ext/uvector/uvlib.c args = (args_scm); args 1882 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS32Vector(args, SCM_CLAMP_ERROR)); args 2325 ext/uvector/uvlib.c ScmObj args; args 2329 ext/uvector/uvlib.c args = (args_scm); args 2331 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU32Vector(args, SCM_CLAMP_ERROR)); args 2774 ext/uvector/uvlib.c ScmObj args; args 2778 ext/uvector/uvlib.c args = (args_scm); args 2780 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToS64Vector(args, SCM_CLAMP_ERROR)); args 3223 ext/uvector/uvlib.c ScmObj args; args 3227 ext/uvector/uvlib.c args = (args_scm); args 3229 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToU64Vector(args, SCM_CLAMP_ERROR)); args 3672 ext/uvector/uvlib.c ScmObj args; args 3676 ext/uvector/uvlib.c args = (args_scm); args 3678 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToF32Vector(args, SCM_CLAMP_ERROR)); args 4121 ext/uvector/uvlib.c ScmObj args; args 4125 ext/uvector/uvlib.c args = (args_scm); args 4127 ext/uvector/uvlib.c SCM_RETURN(Scm_ListToF64Vector(args, SCM_CLAMP_ERROR)); args 161 gc/cord/cordprnt.c int CORD_vsprintf(CORD * out, CORD format, va_list args) args 196 gc/cord/cordprnt.c pos_ptr = va_arg(args, int *); args 200 gc/cord/cordprnt.c pos_ptr = va_arg(args, long *); args 204 gc/cord/cordprnt.c pos_ptr = va_arg(args, short *); args 210 gc/cord/cordprnt.c if (width == VARIABLE) width = va_arg(args, int); args 211 gc/cord/cordprnt.c if (prec == VARIABLE) prec = va_arg(args, int); args 212 gc/cord/cordprnt.c arg = va_arg(args, CORD); args 236 gc/cord/cordprnt.c c = (char)va_arg(args, int); args 243 gc/cord/cordprnt.c char * str = va_arg(args, char *); args 262 gc/cord/cordprnt.c __va_copy(vsprintf_args, args); args 265 gc/cord/cordprnt.c va_copy(vsprintf_args, args); args 267 gc/cord/cordprnt.c vsprintf_args = args; args 270 gc/cord/cordprnt.c if (width == VARIABLE) width = va_arg(args, int); args 271 gc/cord/cordprnt.c if (prec == VARIABLE) prec = va_arg(args, int); args 293 gc/cord/cordprnt.c (void) va_arg(args, int); args 295 gc/cord/cordprnt.c (void) va_arg(args, long); args 300 gc/cord/cordprnt.c (void) va_arg(args, char *); args 307 gc/cord/cordprnt.c (void) va_arg(args, double); args 343 gc/cord/cordprnt.c va_list args; args 346 gc/cord/cordprnt.c va_start(args, format); args 347 gc/cord/cordprnt.c result = CORD_vsprintf(out, format, args); args 348 gc/cord/cordprnt.c va_end(args); args 354 gc/cord/cordprnt.c va_list args; args 358 gc/cord/cordprnt.c va_start(args, format); args 359 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); args 360 gc/cord/cordprnt.c va_end(args); args 365 gc/cord/cordprnt.c int CORD_vfprintf(FILE * f, CORD format, va_list args) args 370 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); args 377 gc/cord/cordprnt.c va_list args; args 381 gc/cord/cordprnt.c va_start(args, format); args 382 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); args 383 gc/cord/cordprnt.c va_end(args); args 388 gc/cord/cordprnt.c int CORD_vprintf(CORD format, va_list args) args 393 gc/cord/cordprnt.c result = CORD_vsprintf(&out, format, args); args 73 gc/cord/cordxtra.c va_list args; args 76 gc/cord/cordxtra.c va_start(args, nargs); args 78 gc/cord/cordxtra.c register CORD next = va_arg(args, CORD); args 81 gc/cord/cordxtra.c va_end(args); args 36 gc/gcc_support.c # define PROTO( args ) args args 38 gc/gcc_support.c # define PROTO( args ) () args 319 gc/include/cord.h int CORD_vsprintf(CORD * out, CORD format, va_list args); args 321 gc/include/cord.h int CORD_vfprintf(FILE * f, CORD format, va_list args); args 323 gc/include/cord.h int CORD_vprintf(CORD format, va_list args); args 36 gc/include/gc.h # define GC_PROTO(args) args args 40 gc/include/gc.h # define GC_PROTO(args) () args 463 gc/win32_threads.c thread_args *args; args 468 gc/win32_threads.c args = GC_malloc_uncollectable(sizeof(thread_args)); args 470 gc/win32_threads.c if (0 == args) { args 476 gc/win32_threads.c args -> start = lpStartAddress; args 477 gc/win32_threads.c args -> param = lpParameter; args 481 gc/win32_threads.c args, dwCreationFlags, args 490 gc/win32_threads.c thread_args *args = (thread_args *)arg; args 500 gc/win32_threads.c ret = args->start (args->param); args 504 gc/win32_threads.c GC_free(args); args 532 gc/win32_threads.c main_thread_args args = { args 543 gc/win32_threads.c NULL, 0, main_thread_start, &args, 0, &thread_id); args 560 gc/win32_threads.c main_thread_args * args = (main_thread_args *) arg; args 562 gc/win32_threads.c return (DWORD) GC_WinMain (args->hInstance, args->hPrevInstance, args 563 gc/win32_threads.c args->lpCmdLine, args->nShowCmd); args 702 src/bignum.c ScmObj Scm_BignumAddN(ScmBignum *bx, ScmObj args) args 705 src/bignum.c for (;SCM_PAIRP(args); args = SCM_CDR(args)) { args 706 src/bignum.c ScmObj v = SCM_CAR(args); args 717 src/bignum.c return Scm_Add(z, v, SCM_CDR(args)); args 720 src/bignum.c return Scm_Add(Scm_NormalizeBignum(r), v, SCM_CDR(args)); args 725 src/bignum.c ScmObj Scm_BignumSubN(ScmBignum *bx, ScmObj args) args 728 src/bignum.c for (;SCM_PAIRP(args); args = SCM_CDR(args)) { args 729 src/bignum.c ScmObj v = SCM_CAR(args); args 740 src/bignum.c return Scm_Subtract(z, v, SCM_CDR(args)); args 896 src/bignum.c ScmObj Scm_BignumMulN(ScmBignum *bx, ScmObj args) args 899 src/bignum.c for (; SCM_PAIRP(args); args = SCM_CDR(args)) { args 900 src/bignum.c ScmObj v = SCM_CAR(args); args 911 src/bignum.c return Scm_Multiply(f, v, SCM_CDR(args)); args 408 src/class.c static ScmObj allocate(ScmNextMethod *nm, ScmObj *args, int nargs, void *d) args 410 src/class.c ScmClass *c = SCM_CLASS(args[0]); args 415 src/class.c return c->allocate(c, args[1]); args 427 src/class.c static ScmObj class_compute_cpl(ScmNextMethod *nm, ScmObj *args, int nargs, args 430 src/class.c ScmClass *c = SCM_CLASS(args[0]); args 1400 src/class.c static ScmObj slot_ref_using_class(ScmNextMethod *nm, ScmObj *args, args 1403 src/class.c ScmClass *klass = SCM_CLASS(args[0]); args 1404 src/class.c ScmObj obj = args[1]; args 1405 src/class.c ScmObj slot = args[2]; args 1531 src/class.c static ScmObj slot_set_using_class(ScmNextMethod *nm, ScmObj *args, args 1534 src/class.c ScmClass *klass = SCM_CLASS(args[0]); args 1535 src/class.c ScmObj obj = args[1]; args 1536 src/class.c ScmObj slot = args[2]; args 1537 src/class.c ScmObj val = args[3]; args 1600 src/class.c static ScmObj slot_bound_using_class_p(ScmNextMethod *nm, ScmObj *args, args 1603 src/class.c ScmClass *klass = SCM_CLASS(args[0]); args 1604 src/class.c ScmObj obj = args[1]; args 1605 src/class.c ScmObj slot = args[2]; args 1633 src/class.c static ScmObj builtin_initialize(ScmObj *args, int nargs, ScmGeneric *gf) args 1638 src/class.c instance = args[0]; args 1639 src/class.c initargs = args[1]; args 1843 src/class.c static ScmObj object_initialize(ScmNextMethod *nm, ScmObj *args, int nargs, args 1846 src/class.c ScmObj obj = args[0]; args 1847 src/class.c ScmObj initargs = args[1]; args 1884 src/class.c static ScmObj object_compare_default(ScmNextMethod *nm, ScmObj *args, args 1965 src/class.c ScmObj Scm_NoNextMethod(ScmObj *args, int nargs, ScmGeneric *gf) args 1968 src/class.c SCM_OBJ(gf), Scm_ArrayToList(args, nargs)); args 1979 src/class.c ScmObj Scm_InvalidApply(ScmObj *args, int nargs, ScmGeneric *gf) args 1981 src/class.c Scm_Error("invalid application: %S", Scm_ArrayToList(args, nargs)); args 1986 src/class.c ScmObj Scm_ComputeApplicableMethods(ScmGeneric *gf, ScmObj *args, int nargs) args 1999 src/class.c for (ap = args, sp = m->specializers, n = 0; args 2010 src/class.c ScmObj *args, args 2014 src/class.c ScmGeneric *gf = SCM_GENERIC(args[0]); args 2015 src/class.c ScmObj arglist = args[1], ap; args 2060 src/class.c static ScmObj method_more_specific_p(ScmNextMethod *nm, ScmObj *args, args 2063 src/class.c ScmMethod *x = SCM_METHOD(args[0]); args 2064 src/class.c ScmMethod *y = SCM_METHOD(args[1]); args 2065 src/class.c ScmObj targlist = args[2], tp; args 2096 src/class.c ScmObj Scm_SortMethods(ScmObj methods, ScmObj *args, int nargs) args 2114 src/class.c for (i=0; i<nargs; i++) targs[i] = Scm_ClassOf(args[i]); args 2160 src/class.c static ScmObj method_initialize(ScmNextMethod *nm, ScmObj *args, int nargs, args 2163 src/class.c ScmMethod *m = SCM_METHOD(args[0]); args 2165 src/class.c ScmObj initargs = args[1]; args 2306 src/class.c static ScmObj generic_updatedirectmethod(ScmNextMethod *nm, ScmObj *args, args 2309 src/class.c return Scm_UpdateDirectMethod(SCM_METHOD(args[0]), args 2310 src/class.c SCM_CLASS(args[1]), args 2311 src/class.c SCM_CLASS(args[2])); args 2367 src/class.c static ScmObj generic_addmethod(ScmNextMethod *nm, ScmObj *args, int nargs, args 2370 src/class.c return Scm_AddMethod(SCM_GENERIC(args[0]), SCM_METHOD(args[1])); args 2412 src/class.c static ScmObj generic_deletemethod(ScmNextMethod *nm, ScmObj *args, int nargs, args 2415 src/class.c return Scm_DeleteMethod(SCM_GENERIC(args[0]), SCM_METHOD(args[1])); args 2432 src/class.c ScmObj *args, int nargs, int copyArgs) args 2440 src/class.c nm->args = SCM_NEW_ARRAY(ScmObj, nargs); args 2441 src/class.c memcpy(nm->args, args, sizeof(ScmObj)*nargs); args 2443 src/class.c nm->args = args; args 2452 src/class.c ScmObj args = Scm_ArrayToList(nm->args, nm->nargs); args 2453 src/class.c Scm_Printf(out, "#<next-method %S %S>", nm->methods, args); args 2466 src/class.c static ScmObj accessor_get_proc(ScmNextMethod *nm, ScmObj *args, int nargs, args 2469 src/class.c ScmObj obj = args[0]; args 2484 src/class.c static ScmObj accessor_set_proc(ScmNextMethod *nm, ScmObj *args, int nargs, args 2487 src/class.c ScmObj obj = args[0]; args 2488 src/class.c ScmObj val = args[1]; args 2501 src/class.c static ScmObj accessor_method_initialize(ScmNextMethod *nm, ScmObj *args, args 2504 src/class.c ScmMethod *m = SCM_METHOD(method_initialize(nm, args, nargs, data)); args 2505 src/class.c ScmObj initargs = args[1]; args 118 src/code.c static ScmObj execute_toplevels(ScmObj *args, int nargs, void *cv) args 320 src/core.c va_list args; args 321 src/core.c va_start(args, msg); args 322 src/core.c vfprintf(stderr, msg, args); args 323 src/core.c va_end(args); args 491 src/error.c va_list args; args 501 src/error.c va_start(args, msg); args 502 src/error.c Scm_Vprintf(SCM_PORT(ostr), msg, args, TRUE); args 503 src/error.c va_end(args); args 551 src/error.c va_list args; args 558 src/error.c va_start(args, msg); args 559 src/error.c Scm_Vprintf(SCM_PORT(ostr), msg, args, TRUE); args 560 src/error.c va_end(args); args 588 src/error.c va_list args; args 593 src/error.c va_start(args, msg); args 594 src/error.c Scm_Vprintf(SCM_PORT(ostr), msg, args, TRUE); args 595 src/error.c va_end(args); args 642 src/error.c va_list args; args 644 src/error.c va_start(args, msg); args 645 src/error.c Scm_Vprintf(SCM_PORT(ostr), msg, args, TRUE); args 646 src/error.c va_end(args); args 652 src/error.c void Scm_FWarn(ScmString *fmt, ScmObj args) args 655 src/error.c Scm_Format(SCM_PORT(ostr), fmt, args, TRUE); args 140 src/extlib.c ScmObj args; args 148 src/extlib.c args = (args_scm); args 151 src/extlib.c SCM_FOR_EACH(cp, args) { args 168 src/extlib.c ScmObj args; args 176 src/extlib.c args = (args_scm); args 179 src/extlib.c SCM_FOR_EACH(cp, args) { args 196 src/extlib.c ScmObj args; args 204 src/extlib.c args = (args_scm); args 207 src/extlib.c SCM_FOR_EACH(cp, args) { args 385 src/extlib.c ScmObj args; args 391 src/extlib.c args = (args_scm); args 394 src/extlib.c Scm_MinMax(arg0, args, &min, &max); args 579 src/extlib.c ScmObj args; args 583 src/extlib.c args = (args_scm); args 586 src/extlib.c if (SCM_PAIRP(args)) { args 587 src/extlib.c SCM_FOR_EACH(cp, args) { args 4361 src/extlib.c ScmObj args; args 4368 src/extlib.c args = (args_scm); args 4370 src/extlib.c Scm_FWarn(fmt, args); args 4766 src/extlib.c static ScmObj hash_table_iter(ScmObj *args, int nargs, void *data) args 4770 src/extlib.c ScmObj eofval = args[0]; args 5232 src/extlib.c ScmObj args; args 5243 src/extlib.c args = (args_scm); args 5248 src/extlib.c Scm_Format(port, fmt, args, shared); args 399 src/gauche.h SCM_EXTERN ScmObj Scm_Apply(ScmObj proc, ScmObj args); args 400 src/gauche.h SCM_EXTERN ScmObj Scm_Values(ScmObj args); args 419 src/gauche.h SCM_EXTERN ScmObj Scm_VMApply(ScmObj proc, ScmObj args); args 428 src/gauche.h SCM_EXTERN ScmObj Scm_VMCall(ScmObj *args, int argcnt, void *data); args 841 src/gauche.h SCM_EXTERN ScmObj Scm_Append(ScmObj args); args 1600 src/gauche.h SCM_EXTERN void Scm_Format(ScmPort *port, ScmString *fmt, ScmObj args, int ss); args 1603 src/gauche.h SCM_EXTERN void Scm_Vprintf(ScmPort *port, const char *fmt, va_list args, args 2065 src/gauche.h SCM_EXTERN ScmObj Scm_BignumAddN(ScmBignum *bx, ScmObj args); args 2068 src/gauche.h SCM_EXTERN ScmObj Scm_BignumSubN(ScmBignum *bx, ScmObj args); args 2071 src/gauche.h SCM_EXTERN ScmObj Scm_BignumMulN(ScmBignum *bx, ScmObj args); args 2159 src/gauche.h SCM_EXTERN ScmObj Scm_Add(ScmObj arg1, ScmObj arg2, ScmObj args); args 2160 src/gauche.h SCM_EXTERN ScmObj Scm_Subtract(ScmObj arg1, ScmObj arg2, ScmObj args); args 2161 src/gauche.h SCM_EXTERN ScmObj Scm_Multiply(ScmObj arg1, ScmObj arg2, ScmObj args); args 2162 src/gauche.h SCM_EXTERN ScmObj Scm_Divide(ScmObj arg1, ScmObj arg2, ScmObj args); args 2176 src/gauche.h SCM_EXTERN void Scm_MinMax(ScmObj arg0, ScmObj args, ScmObj *min, ScmObj *max); args 2311 src/gauche.h ScmObj (*fallback)(ScmObj *args, int nargs, ScmGeneric *gf); args 2335 src/gauche.h SCM_EXTERN ScmObj Scm_NoNextMethod(ScmObj *args, int nargs, ScmGeneric *gf); args 2336 src/gauche.h SCM_EXTERN ScmObj Scm_NoOperation(ScmObj *args, int nargs, ScmGeneric *gf); args 2337 src/gauche.h SCM_EXTERN ScmObj Scm_InvalidApply(ScmObj *args, int nargs, ScmGeneric *gf); args 2347 src/gauche.h ScmObj (*func)(ScmNextMethod *nm, ScmObj *args, int nargs, void * data); args 2374 src/gauche.h ScmObj *args; /* original arguments */ args 2384 src/gauche.h SCM_EXTERN ScmObj Scm_ForEach1(ScmObj proc, ScmObj args); args 2385 src/gauche.h SCM_EXTERN ScmObj Scm_ForEach(ScmObj proc, ScmObj arg1, ScmObj args); args 2386 src/gauche.h SCM_EXTERN ScmObj Scm_Map1(ScmObj proc, ScmObj args); args 2387 src/gauche.h SCM_EXTERN ScmObj Scm_Map(ScmObj proc, ScmObj arg1, ScmObj args); args 2468 src/gauche.h SCM_EXTERN void Scm_FWarn(ScmString *fmt, ScmObj args); args 2726 src/gauche.h SCM_EXTERN ScmObj Scm_SysExec(ScmString *file, ScmObj args, args 114 src/gauche/class.h ScmObj *args, args 116 src/gauche/class.h SCM_EXTERN ScmObj Scm_SortMethods(ScmObj methods, ScmObj *args, int nargs); args 118 src/gauche/class.h ScmObj *args, int nargs, int copyArgs); args 307 src/list.c ScmObj Scm_Append(ScmObj args) args 310 src/list.c SCM_FOR_EACH(cp, args) { args 123 src/load.c static ScmObj load_after(ScmObj *args, int nargs, void *data) args 160 src/load.c static ScmObj load_body(ScmObj *args, int nargs, void *data) args 215 src/load.c static ScmObj load_from_port(ScmObj *args, int argc, void *data) args 221 src/load.c if (!SCM_IPORTP(args[0])) { args 222 src/load.c Scm_Error("input port required, but got %S", args[0]); args 224 src/load.c port = SCM_PORT(args[0]); args 225 src/load.c paths = Scm_GetKeyword(key_paths, args[1], SCM_FALSE); args 226 src/load.c env = Scm_GetKeyword(key_environment, args[1], SCM_FALSE); args 391 src/load.c static ScmObj load(ScmObj *args, int argc, void *data) args 397 src/load.c if (!SCM_STRINGP(args[0])) { args 398 src/load.c Scm_Error("string required, but got %S", args[0]); args 400 src/load.c file = SCM_STRING(args[0]); args 401 src/load.c paths = Scm_GetKeyword(key_paths, args[1], SCM_FALSE); args 402 src/load.c env = Scm_GetKeyword(key_environment, args[1], SCM_FALSE); args 403 src/load.c if (SCM_FALSEP(Scm_GetKeyword(key_error_if_not_found, args[1], SCM_TRUE))) args 405 src/load.c if (!SCM_FALSEP(Scm_GetKeyword(key_ignore_coding, args[1], SCM_FALSE))) args 13 src/moplib.c static ScmObj call_fallback_proc(ScmObj *args, int nargs, ScmGeneric *gf) args 16 src/moplib.c ScmObj arglist = Scm_ArrayToList(args, nargs); args 57 src/moplib.c ScmObj args; args 66 src/moplib.c args = (args_scm); args 68 src/moplib.c ScmObj mp, *argv; int nargs = Scm_Length(args); args 75 src/moplib.c argv = Scm_ListToArray(args, &nargs, NULL, TRUE); args 109 src/number.c static ScmObj bad_number_method(ScmObj *args, int nargs, ScmGeneric *gf) args 113 src/number.c Scm_Error("operation %s is not defined on object %S", fn, args[0]); args 116 src/number.c fn, args[0], args[1]); args 119 src/number.c fn, Scm_ArrayToList(args, nargs)); args 865 src/number.c #define APPLY_GENERIC_ARITH(v, gf, arg0, arg1, args) \ args 868 src/number.c if (SCM_NULLP(args)) return v; \ args 869 src/number.c arg1 = SCM_CAR(args); \ args 870 src/number.c args = SCM_CDR(args); \ args 878 src/number.c ScmObj Scm_Add(ScmObj arg0, ScmObj arg1, ScmObj args) args 909 src/number.c arg1, args); args 911 src/number.c if (!SCM_PAIRP(args)) return Scm_MakeInteger(result_int); args 912 src/number.c arg1 = SCM_CAR(args); args 913 src/number.c args = SCM_CDR(args); args 915 src/number.c if (!SCM_PAIRP(args)) return arg0; args 916 src/number.c arg1 = SCM_CAR(args); args 917 src/number.c args = SCM_CDR(args); args 922 src/number.c return Scm_BignumAddN(SCM_BIGNUM(arg0), Scm_Cons(arg1, args)); args 924 src/number.c APPLY_GENERIC_ARITH(arg0, generic_add, arg0, arg1, args); args 943 src/number.c arg1, args); args 945 src/number.c if (!SCM_PAIRP(args)) return Scm_MakeFlonum(result_real); args 946 src/number.c arg1 = SCM_CAR(args); args 947 src/number.c args = SCM_CDR(args); args 968 src/number.c arg1, args); args 970 src/number.c if (!SCM_PAIRP(args)) { args 973 src/number.c arg1 = SCM_CAR(args); args 974 src/number.c args = SCM_CDR(args); args 978 src/number.c arg0, arg1, args); args 982 src/number.c ScmObj Scm_Subtract(ScmObj arg0, ScmObj arg1, ScmObj args) args 999 src/number.c return Scm_BignumSubN(SCM_BIGNUM(big), args); args 1003 src/number.c return Scm_BignumSubN(SCM_BIGNUM(big), Scm_Cons(arg1, args)); args 1013 src/number.c arg1, args); args 1015 src/number.c if (SCM_NULLP(args)) return SCM_MAKE_INT(result_int); args 1016 src/number.c arg1 = SCM_CAR(args); args 1017 src/number.c args = SCM_CDR(args); args 1022 src/number.c return Scm_BignumSubN(SCM_BIGNUM(arg0), Scm_Cons(arg1, args)); args 1024 src/number.c APPLY_GENERIC_ARITH(arg0, generic_sub, arg0, arg1, args); args 1042 src/number.c arg1, args); args 1044 src/number.c if (SCM_NULLP(args)) args 1046 src/number.c arg1 = SCM_CAR(args); args 1047 src/number.c args = SCM_CDR(args); args 1068 src/number.c arg1, args); args 1070 src/number.c if (SCM_NULLP(args)) args 1072 src/number.c arg1 = SCM_CAR(args); args 1073 src/number.c args = SCM_CDR(args); args 1076 src/number.c APPLY_GENERIC_ARITH(arg0, generic_sub, arg0, arg1, args); args 1084 src/number.c ScmObj Scm_Multiply(ScmObj arg0, ScmObj arg1, ScmObj args) args 1117 src/number.c Scm_MakeInteger(result_int), arg1, args); args 1119 src/number.c if (!SCM_PAIRP(args)) return Scm_MakeInteger(result_int); args 1120 src/number.c arg1 = SCM_CAR(args); args 1121 src/number.c args = SCM_CDR(args); args 1123 src/number.c if (!SCM_PAIRP(args)) return arg0; args 1124 src/number.c arg1 = SCM_CAR(args); args 1125 src/number.c args = SCM_CDR(args); args 1129 src/number.c return Scm_BignumMulN(SCM_BIGNUM(arg0), Scm_Cons(arg1, args)); args 1146 src/number.c Scm_MakeFlonum(result_real), arg1, args); args 1148 src/number.c if (!SCM_PAIRP(args)) return Scm_MakeFlonum(result_real); args 1149 src/number.c arg1 = SCM_CAR(args); args 1150 src/number.c args = SCM_CDR(args); args 1178 src/number.c arg1, args); args 1180 src/number.c if (!SCM_PAIRP(args)) { args 1183 src/number.c arg1 = SCM_CAR(args); args 1184 src/number.c args = SCM_CDR(args); args 1188 src/number.c arg0, arg1, args); args 1196 src/number.c ScmObj Scm_Divide(ScmObj arg0, ScmObj arg1, ScmObj args) args 1221 src/number.c if (SCM_NULLP(args)) return div; args 1222 src/number.c return Scm_Divide(div, SCM_CAR(args), SCM_CDR(args)); args 1231 src/number.c if (SCM_NULLP(args)) return SCM_CAR(divrem); args 1232 src/number.c return Scm_Divide(SCM_CAR(divrem), SCM_CAR(args), SCM_CDR(args)); args 1244 src/number.c APPLY_GENERIC_ARITH(arg0, generic_div, arg0, arg1, args); args 1263 src/number.c arg1, args); args 1266 src/number.c if (SCM_NULLP(args)) args 1268 src/number.c arg1 = SCM_CAR(args); args 1269 src/number.c args = SCM_CDR(args); args 1292 src/number.c arg1, args); args 1299 src/number.c if (SCM_NULLP(args)) args 1301 src/number.c arg1 = SCM_CAR(args); args 1302 src/number.c args = SCM_CDR(args); args 1305 src/number.c APPLY_GENERIC_ARITH(arg0, generic_div, arg0, arg1, args); args 1661 src/number.c void Scm_MinMax(ScmObj arg0, ScmObj args, ScmObj *min, ScmObj *max) args 1670 src/number.c if (SCM_NULLP(args)) { args 1687 src/number.c if (!SCM_EXACTP(SCM_CAR(args))) inexact = TRUE; args 1688 src/number.c if (min && Scm_NumCmp(mi, SCM_CAR(args)) > 0) { args 1689 src/number.c mi = SCM_CAR(args); args 1691 src/number.c if (max && Scm_NumCmp(ma, SCM_CAR(args)) < 0) { args 1692 src/number.c ma = SCM_CAR(args); args 1694 src/number.c args = SCM_CDR(args); args 176 src/port.c static ScmObj with_port_locking_pre_thunk(ScmObj *args, int nargs, void *data) args 184 src/port.c static ScmObj with_port_locking_post_thunk(ScmObj *args, int nargs, void *data) args 1286 src/port.c static ScmObj port_restorer(ScmObj *args, int nargs, void *data) args 110 src/proc.c static ScmObj null_proc(ScmObj *args, int nargs, void *data) args 133 src/proc.c ScmObj args = SCM_OBJ(data[1]); args 134 src/proc.c if (SCM_PAIRP(args)) { args 138 src/proc.c data[1] = SCM_CDR(args); args 140 src/proc.c SCM_RETURN(Scm_VMApply1(proc, SCM_CAR(args))); args 146 src/proc.c ScmObj Scm_ForEach1(ScmObj proc, ScmObj args) args 148 src/proc.c if (!SCM_NULLP(args)) { args 151 src/proc.c data[1] = SCM_CDR(args); args 153 src/proc.c SCM_RETURN(Scm_VMApply1(SCM_OBJ(proc), SCM_CAR(args))); args 161 src/proc.c ScmObj args = SCM_OBJ(data[1]); args 167 src/proc.c if (SCM_PAIRP(args)) { args 171 src/proc.c data[1] = SCM_CDR(args); args 175 src/proc.c SCM_RETURN(Scm_VMApply1(proc, SCM_CAR(args))); args 181 src/proc.c ScmObj Scm_Map1(ScmObj proc, ScmObj args) args 183 src/proc.c if (!SCM_NULLP(args)) { args 186 src/proc.c data[1] = SCM_CDR(args); args 190 src/proc.c SCM_RETURN(Scm_VMApply1(SCM_OBJ(proc), SCM_CAR(args))); args 228 src/proc.c ScmObj args, moreargs; args 231 src/proc.c if (mapper_collect_args(args_list, &args, &moreargs)) { args 239 src/proc.c SCM_RETURN(Scm_VMApply(proc, args)); args 242 src/proc.c ScmObj Scm_ForEach(ScmObj proc, ScmObj arg1, ScmObj args) args 244 src/proc.c if (SCM_NULLP(args)) { args 249 src/proc.c data[1] = Scm_Cons(arg1, args); args 260 src/proc.c ScmObj args, moreargs; args 265 src/proc.c if (mapper_collect_args(args_list, &args, &moreargs)) { args 275 src/proc.c SCM_RETURN(Scm_VMApply(proc, args)); args 278 src/proc.c ScmObj Scm_Map(ScmObj proc, ScmObj arg1, ScmObj args) args 280 src/proc.c if (SCM_NULLP(args)) { args 286 src/proc.c if (mapper_collect_args(Scm_Cons(arg1, args), args 315 src/proc.c static ScmObj object_setter(ScmObj *args, int nargs, void *data) args 319 src/proc.c Scm_Cons(SCM_OBJ(data), args[0])); args 68 src/read.c static ScmObj process_sharp_comma(ScmPort *port, ScmObj key, ScmObj args, args 1073 src/read.c static ScmObj process_sharp_comma(ScmPort *port, ScmObj key, ScmObj args, args 1085 src/read.c r = Scm_Apply(SCM_CAR(e->value), args); args 1090 src/read.c static ScmObj reader_ctor(ScmObj *args, int nargs, void *data) args 1092 src/read.c ScmObj optarg = (nargs > 2? args[2] : SCM_FALSE); args 1093 src/read.c return Scm_DefineReaderCtor(args[0], args[1], optarg); args 70 src/repl.c static ScmObj repl_main(ScmObj *args, int nargs, void *data); args 133 src/repl.c static ScmObj repl_main(ScmObj *args, int nargs, void *data) args 148 src/repl.c static ScmObj repl_error_handle(ScmObj *args, int nargs, void *data) args 151 src/repl.c Scm_ReportError(args[0]); args 180 src/repl.c static ScmObj repl_proc(ScmObj *args, int nargs, void *data) args 182 src/repl.c int argc = Scm_Length(args[0]); args 183 src/repl.c ScmObj reader = (argc >= 1? SCM_CAR(args[0]) : SCM_FALSE); args 184 src/repl.c ScmObj evaluator = (argc >= 2? SCM_CADR(args[0]) : SCM_FALSE); args 185 src/repl.c ScmObj printer = (argc >= 3? SCM_CAR(SCM_CDDR(args[0])) : SCM_FALSE); args 186 src/repl.c ScmObj prompter = (argc >= 4? SCM_CADR(SCM_CDDR(args[0])) : SCM_FALSE); args 248 src/signal.c static ScmObj default_sighandler(ScmObj *args, int nargs, void *data) args 254 src/signal.c SCM_ASSERT(nargs == 1 && SCM_INTP(args[0])); args 255 src/signal.c signum = SCM_INT_VALUE(args[0]); args 281 src/signal.c static ScmObj exit_sighandler(ScmObj *args, int nargs, void *data) args 297 src/signal.c static ScmObj through_sighandler(ScmObj *args, int nargs, void *data) args 229 src/stdlib.c ScmObj args; args 237 src/stdlib.c args = (args_scm); args 241 src/stdlib.c if (SCM_NULLP(args)) return SCM_TRUE; args 242 src/stdlib.c arg1 = SCM_CAR(args); args = SCM_CDR(args); args 257 src/stdlib.c ScmObj args; args 265 src/stdlib.c args = (args_scm); args 269 src/stdlib.c if (SCM_NULLP(args)) return SCM_TRUE; args 270 src/stdlib.c arg0 = arg1; arg1 = SCM_CAR(args); args = SCM_CDR(args); args 285 src/stdlib.c ScmObj args; args 293 src/stdlib.c args = (args_scm); args 297 src/stdlib.c if (SCM_NULLP(args)) return SCM_TRUE; args 298 src/stdlib.c arg0 = arg1; arg1 = SCM_CAR(args); args = SCM_CDR(args); args 313 src/stdlib.c ScmObj args; args 321 src/stdlib.c args = (args_scm); args 325 src/stdlib.c if (SCM_NULLP(args)) return SCM_TRUE; args 326 src/stdlib.c arg0 = arg1; arg1 = SCM_CAR(args); args = SCM_CDR(args); args 341 src/stdlib.c ScmObj args; args 349 src/stdlib.c args = (args_scm); args 353 src/stdlib.c if (SCM_NULLP(args)) return SCM_TRUE; args 354 src/stdlib.c arg0 = arg1; arg1 = SCM_CAR(args); args = SCM_CDR(args); args 467 src/stdlib.c ScmObj args; args 473 src/stdlib.c args = (args_scm); args 477 src/stdlib.c Scm_MinMax(arg0, args, NULL, &SCM_RESULT); args 491 src/stdlib.c ScmObj args; args 497 src/stdlib.c args = (args_scm); args 501 src/stdlib.c Scm_MinMax(arg0, args, &SCM_RESULT, NULL); args 513 src/stdlib.c ScmObj args; args 517 src/stdlib.c args = (args_scm); args 519 src/stdlib.c if (SCM_NULLP(args)) SCM_RETURN(SCM_MAKE_INT(0)); args 520 src/stdlib.c if (!SCM_PAIRP(SCM_CDR(args))) { args 521 src/stdlib.c if (!SCM_NUMBERP(SCM_CAR(args))) args 522 src/stdlib.c Scm_Error("number required, but got %S", SCM_CAR(args)); args 523 src/stdlib.c SCM_RETURN(SCM_CAR(args)); args 525 src/stdlib.c SCM_RETURN(Scm_Add(SCM_CAR(args), SCM_CADR(args), SCM_CDDR(args))); args 536 src/stdlib.c ScmObj args; args 540 src/stdlib.c args = (args_scm); args 542 src/stdlib.c if (!SCM_PAIRP(args)) return SCM_MAKE_INT(1); args 543 src/stdlib.c if (!SCM_PAIRP(SCM_CDR(args))) { args 544 src/stdlib.c if (!SCM_NUMBERP(SCM_CAR(args))) args 545 src/stdlib.c Scm_Error("number required, but got %S", SCM_CAR(args)); args 546 src/stdlib.c return SCM_CAR(args); args 548 src/stdlib.c SCM_RETURN(Scm_Multiply(SCM_CAR(args), SCM_CADR(args), SCM_CDDR(args))); args 560 src/stdlib.c ScmObj args; args 566 src/stdlib.c args = (args_scm); args 570 src/stdlib.c if (SCM_NULLP(args)) SCM_RESULT = Scm_Negate(arg1); args 571 src/stdlib.c else SCM_RESULT = Scm_Subtract(arg1, SCM_CAR(args), SCM_CDR(args)); args 585 src/stdlib.c ScmObj args; args 591 src/stdlib.c args = (args_scm); args 595 src/stdlib.c if (SCM_NULLP(args)) SCM_RESULT = Scm_Reciprocal(arg1); args 596 src/stdlib.c else SCM_RESULT = Scm_Divide(arg1, SCM_CAR(args), SCM_CDR(args)); args 1676 src/stdlib.c ScmObj args; args 1680 src/stdlib.c args = (args_scm); args 1684 src/stdlib.c SCM_RESULT = (args); args 2935 src/stdlib.c ScmObj args; args 2939 src/stdlib.c args = (args_scm); args 2943 src/stdlib.c SCM_RESULT = Scm_StringAppend(args); args 3141 src/stdlib.c ScmObj args; args 3145 src/stdlib.c args = (args_scm); args 3149 src/stdlib.c SCM_RESULT = (Scm_ListToVector(args, 0, -1)); args 3390 src/stdlib.c ScmObj args; args 3398 src/stdlib.c args = (args_scm); args 3401 src/stdlib.c if (SCM_NULLP(args)) return Scm_VMApply(proc, arg1); args 3404 src/stdlib.c SCM_FOR_EACH(cp, args) { args 3427 src/stdlib.c ScmObj args; args 3436 src/stdlib.c args = (args_scm); args 3442 src/stdlib.c SCM_RESULT = Scm_Map(proc, args, moreargs); args 3456 src/stdlib.c ScmObj args; args 3465 src/stdlib.c args = (args_scm); args 3471 src/stdlib.c SCM_RESULT = Scm_ForEach(proc, args, moreargs); args 3521 src/stdlib.c ScmObj args; args 3525 src/stdlib.c args = (args_scm); args 3529 src/stdlib.c SCM_RESULT = Scm_Values(args); args 1931 src/syslib.c ScmObj args; args 1943 src/syslib.c args = (args_scm); args 1951 src/syslib.c Scm_SysExec(command, args, iomap, FALSE); args 1964 src/syslib.c ScmObj args; args 1976 src/syslib.c args = (args_scm); args 1986 src/syslib.c SCM_RESULT = (Scm_SysExec(command, args, iomap, TRUE)); args 1176 src/system.c ScmObj Scm_SysExec(ScmString *file, ScmObj args, ScmObj iomap, int forkp) args 1178 src/system.c int argc = Scm_Length(args), i, j, maxfd, iollen; args 1186 src/system.c Scm_Error("argument list must have at least one element: %S", args); args 1191 src/system.c for (i=0, ap = args; i<argc; i++, ap = SCM_CDR(ap)) { args 45 src/test-vmstack.c ScmObj dummy_eproc(ScmObj *args, int nargs, void *data) args 913 src/vm.c ScmObj args = SCM_NIL, arg; args 917 src/vm.c args = Scm_Cons(arg, args); args 922 src/vm.c PUSH_ARG(args); args 941 src/vm.c memcpy(SP, n->args, sizeof(ScmObj)*n->nargs); args 2695 src/vm.c ScmObj Scm_VMApply(ScmObj proc, ScmObj args) args 2698 src/vm.c int numargs = Scm_Length(args); args 2702 src/vm.c if (numargs < 0) Scm_Error("improper list not allowed: %S", args); args 2710 src/vm.c SCM_FOR_EACH(cp, args) { args 2778 src/vm.c static ScmObj eval_restore_env(ScmObj *args, int argc, void *data) args 2946 src/vm.c ScmObj Scm_Apply(ScmObj proc, ScmObj args) args 2949 src/vm.c int nargs = Scm_Length(args); args 2954 src/vm.c Scm_Error("improper list not allowed: %S", args); args 2958 src/vm.c code[1] = SCM_WORD(Scm_Cons(proc, args)); args 3072 src/vm.c ScmObj Scm_VMDynamicWindC(ScmObj (*before)(ScmObj *args, int nargs, void *data), args 3073 src/vm.c ScmObj (*body)(ScmObj *args, int nargs, void *data), args 3074 src/vm.c ScmObj (*after)(ScmObj *args, int nargs, void *data), args 3314 src/vm.c static ScmObj install_ehandler(ScmObj *args, int nargs, void *data) args 3324 src/vm.c static ScmObj discard_ehandler(ScmObj *args, int nargs, void *data) args 3372 src/vm.c static ScmObj install_xhandler(ScmObj *args, int nargs, void *data) args 3418 src/vm.c ScmObj args) /* args to pass to the args 3432 src/vm.c data[2] = (void*)args; args 3443 src/vm.c nargs = Scm_Length(args); args 3445 src/vm.c return SCM_CAR(args); args 3452 src/vm.c for (i=0, ap=SCM_CDR(args); SCM_PAIRP(ap); i++, ap=SCM_CDR(ap)) { args 3456 src/vm.c return SCM_CAR(args); args 3463 src/vm.c ScmObj args = SCM_OBJ(data[2]); args 3464 src/vm.c return throw_cont_body(handlers, ep, args); args 3472 src/vm.c ScmObj args = argframe[0]; args 3486 src/vm.c vm->escapeData[1] = args; args 3492 src/vm.c return throw_cont_body(handlers_to_call, ep, args); args 3526 src/vm.c ScmObj Scm_Values(ScmObj args) args 3532 src/vm.c if (!SCM_PAIRP(args)) { args 3537 src/vm.c SCM_FOR_EACH(cp, SCM_CDR(args)) { args 3540 src/vm.c Scm_Error("too many values: %S", args); args 3544 src/vm.c return SCM_CAR(args); args 48 src/write.c static ScmObj write_object_fallback(ScmObj *args, int nargs, ScmGeneric *gf); args 287 src/write.c static ScmObj write_object_fallback(ScmObj *args, int nargs, ScmGeneric *gf) args 290 src/write.c if (nargs != 2 || (nargs == 2 && !SCM_OPORTP(args[1]))) { args 292 src/write.c Scm_ArrayToList(args, nargs)); args 294 src/write.c klass = Scm_ClassOf(args[0]); args 295 src/write.c Scm_Printf(SCM_PORT(args[1]), "#<%A %p>", klass->name, args[0]); args 565 src/write.c #define NEXT_ARG(arg, args) \ args 567 src/write.c if (!SCM_PAIRP(args)) \ args 569 src/write.c arg = SCM_CAR(args); \ args 570 src/write.c args = SCM_CDR(args); \ args 721 src/write.c static void format_proc(ScmPort *out, ScmString *fmt, ScmObj args, int sharedp) args 724 src/write.c ScmObj arg, oargs = args; args 730 src/write.c arglen = Scm_Length(args); args 745 src/write.c if (!backtracked && !SCM_NULLP(args)) { args 766 src/write.c NEXT_ARG(arg, args); args 775 src/write.c NEXT_ARG(arg, args); args 785 src/write.c NEXT_ARG(arg, args); args 794 src/write.c NEXT_ARG(arg, args); args 808 src/write.c NEXT_ARG(arg, args); args 822 src/write.c NEXT_ARG(arg, args); args 857 src/write.c args = Scm_ListTail(oargs, argcnt, SCM_UNBOUND); args 863 src/write.c NEXT_ARG(arg, args); args 935 src/write.c void Scm_Format(ScmPort *out, ScmString *fmt, ScmObj args, int sharedp) args 945 src/write.c PORT_SAFE_CALL(out, format_proc(SCM_PORT(out), fmt, args, sharedp)); args 976 src/write.c ScmObj args; args 987 src/write.c static void vprintf_proc(ScmPort *out, const char *fmt, ScmObj args, args 1015 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1016 src/write.c val = SCM_CAR(args); args 1017 src/write.c args = SCM_CDR(args); args 1028 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1029 src/write.c val = SCM_CAR(args); args 1030 src/write.c args = SCM_CDR(args); args 1041 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1042 src/write.c val = SCM_CAR(args); args 1043 src/write.c args = SCM_CDR(args); args 1054 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1055 src/write.c val = SCM_CAR(args); args 1056 src/write.c args = SCM_CDR(args); args 1077 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1078 src/write.c val = SCM_CAR(args); args 1079 src/write.c args = SCM_CDR(args); args 1092 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1093 src/write.c val = SCM_CAR(args); args 1094 src/write.c args = SCM_CDR(args); args 1125 src/write.c SCM_ASSERT(SCM_PAIRP(args)); args 1126 src/write.c val = SCM_CAR(args); args 1127 src/write.c args = SCM_CDR(args);