SCM_OPTARGS 193 ext/auxsys/auxsyslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 195 ext/auxsys/auxsyslib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 196 ext/auxsys/auxsyslib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 197 ext/auxsys/auxsyslib.c if (SCM_NULLP(SCM_OPTARGS)) nsamples_scm = Scm_MakeInteger(3); SCM_OPTARGS 199 ext/auxsys/auxsyslib.c nsamples_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 200 ext/auxsys/auxsyslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 284 ext/auxsys/auxsyslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 286 ext/auxsys/auxsyslib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 287 ext/auxsys/auxsyslib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 291 ext/auxsys/auxsyslib.c if (SCM_NULLP(SCM_OPTARGS)) atime_scm = SCM_FALSE; SCM_OPTARGS 293 ext/auxsys/auxsyslib.c atime_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 294 ext/auxsys/auxsyslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 297 ext/auxsys/auxsyslib.c if (SCM_NULLP(SCM_OPTARGS)) mtime_scm = SCM_FALSE; SCM_OPTARGS 299 ext/auxsys/auxsyslib.c mtime_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 300 ext/auxsys/auxsyslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 45 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 47 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 48 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 49 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 51 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 52 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 55 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 57 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 58 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 79 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 81 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 82 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 83 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 85 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 86 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 89 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 91 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 92 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 113 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 115 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 116 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 117 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 119 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 120 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 123 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 125 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 126 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 147 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 149 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 150 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 151 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 153 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 154 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 157 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 159 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 160 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 181 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 183 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 184 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 185 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 187 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 188 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 191 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 193 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 194 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 215 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 217 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 218 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 219 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 221 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 222 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 225 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 227 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 228 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 249 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 251 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 252 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 253 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 255 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 256 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 259 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 261 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 262 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 283 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 285 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 286 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 287 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 289 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 290 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 293 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 295 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 296 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 319 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 321 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 322 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 326 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 328 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 329 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 332 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 334 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 335 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 355 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 357 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 358 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 362 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 364 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 365 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 368 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 370 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 371 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 391 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 393 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 394 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 398 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 400 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 401 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 404 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 406 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 407 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 427 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 429 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 430 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 434 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 436 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 437 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 440 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 442 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 443 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 463 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 465 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 466 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 470 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 472 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 473 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 476 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 478 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 479 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 499 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 501 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 502 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 506 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 508 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 509 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 512 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 514 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 515 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 535 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 537 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 538 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 542 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 544 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 545 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 548 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 550 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 551 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 571 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 573 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 574 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 578 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 580 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 581 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 584 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 586 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 587 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 605 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 607 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 608 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 609 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 611 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 612 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 615 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 617 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 618 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 639 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 641 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 642 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 643 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 645 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 646 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 649 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 651 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 652 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 675 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 677 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 678 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 682 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 684 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 685 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 688 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 690 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 691 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 711 ext/binary/binarylib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 713 ext/binary/binarylib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 714 ext/binary/binarylib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 718 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_FALSE; SCM_OPTARGS 720 ext/binary/binarylib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 721 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 724 ext/binary/binarylib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = DEFAULT_ENDIAN; SCM_OPTARGS 726 ext/binary/binarylib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 727 ext/binary/binarylib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 56 ext/charconv/convlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 63 ext/charconv/convlib.c to_code_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_to_code), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 65 ext/charconv/convlib.c buffer_size_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffer_size), SCM_OPTARGS, Scm_MakeInteger(0)); SCM_OPTARGS 68 ext/charconv/convlib.c ownerP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_ownerP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 70 ext/charconv/convlib.c handler_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_handler), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 102 ext/charconv/convlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 109 ext/charconv/convlib.c from_code_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_from_code), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 111 ext/charconv/convlib.c buffer_size_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffer_size), SCM_OPTARGS, Scm_MakeInteger(0)); SCM_OPTARGS 114 ext/charconv/convlib.c ownerP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_ownerP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 95 ext/dbm/gdbm.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 97 ext/dbm/gdbm.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 98 ext/dbm/gdbm.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 102 ext/dbm/gdbm.c if (SCM_NULLP(SCM_OPTARGS)) size_scm = Scm_MakeInteger(0); SCM_OPTARGS 104 ext/dbm/gdbm.c size_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 105 ext/dbm/gdbm.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 109 ext/dbm/gdbm.c if (SCM_NULLP(SCM_OPTARGS)) rwmode_scm = SCM_MAKE_INT(GDBM_READER); SCM_OPTARGS 111 ext/dbm/gdbm.c rwmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 112 ext/dbm/gdbm.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 116 ext/dbm/gdbm.c if (SCM_NULLP(SCM_OPTARGS)) fmode_scm = SCM_MAKE_INT(0666); SCM_OPTARGS 118 ext/dbm/gdbm.c fmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 119 ext/dbm/gdbm.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 188 ext/dbm/gdbm.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 190 ext/dbm/gdbm.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 191 ext/dbm/gdbm.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 201 ext/dbm/gdbm.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = Scm_MakeInteger(0); SCM_OPTARGS 203 ext/dbm/gdbm.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 204 ext/dbm/gdbm.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 155 ext/dbm/ndbm.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 157 ext/dbm/ndbm.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 158 ext/dbm/ndbm.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 168 ext/dbm/ndbm.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = Scm_MakeInteger(0); SCM_OPTARGS 170 ext/dbm/ndbm.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 171 ext/dbm/ndbm.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 127 ext/fcntl/fcntlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 129 ext/fcntl/fcntlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 130 ext/fcntl/fcntlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 136 ext/fcntl/fcntlib.c if (SCM_NULLP(SCM_OPTARGS)) arg_scm = SCM_UNBOUND; SCM_OPTARGS 138 ext/fcntl/fcntlib.c arg_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 139 ext/fcntl/fcntlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 290 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 292 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 293 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 300 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) protocol_scm = Scm_MakeInteger(0); SCM_OPTARGS 302 ext/net/netlib.c protocol_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 303 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 468 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 473 ext/net/netlib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 475 ext/net/netlib.c bufferedP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_bufferedP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 499 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 504 ext/net/netlib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 506 ext/net/netlib.c bufferedP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_bufferedP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 528 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 530 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 531 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 535 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) how_scm = Scm_MakeInteger(2); SCM_OPTARGS 537 ext/net/netlib.c how_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 538 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 717 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 719 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 720 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 727 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = Scm_MakeInteger(0); SCM_OPTARGS 729 ext/net/netlib.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 730 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 756 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 758 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 759 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 769 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = Scm_MakeInteger(0); SCM_OPTARGS 771 ext/net/netlib.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 772 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 796 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 798 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 799 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 806 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = Scm_MakeInteger(0); SCM_OPTARGS 808 ext/net/netlib.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 809 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 833 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 835 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 836 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 843 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = Scm_MakeInteger(0); SCM_OPTARGS 845 ext/net/netlib.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 846 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1362 ext/net/netlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1364 ext/net/netlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1365 ext/net/netlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1369 ext/net/netlib.c if (SCM_NULLP(SCM_OPTARGS)) flags_scm = SCM_UNBOUND; SCM_OPTARGS 1371 ext/net/netlib.c flags_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1372 ext/net/netlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 393 ext/termios/termiolib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 395 ext/termios/termiolib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 396 ext/termios/termiolib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 397 ext/termios/termiolib.c if (SCM_NULLP(SCM_OPTARGS)) term_scm = SCM_UNBOUND; SCM_OPTARGS 399 ext/termios/termiolib.c term_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 400 ext/termios/termiolib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 421 ext/termios/termiolib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 423 ext/termios/termiolib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 424 ext/termios/termiolib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 425 ext/termios/termiolib.c if (SCM_NULLP(SCM_OPTARGS)) term_scm = SCM_UNBOUND; SCM_OPTARGS 427 ext/termios/termiolib.c term_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 428 ext/termios/termiolib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 119 ext/threads/thrlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 121 ext/threads/thrlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 122 ext/threads/thrlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 126 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) name_scm = SCM_FALSE; SCM_OPTARGS 128 ext/threads/thrlib.c name_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 129 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 206 ext/threads/thrlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 208 ext/threads/thrlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 209 ext/threads/thrlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 213 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) timeout_scm = SCM_FALSE; SCM_OPTARGS 215 ext/threads/thrlib.c timeout_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 216 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 219 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) timeout_val_scm = SCM_UNBOUND; SCM_OPTARGS 221 ext/threads/thrlib.c timeout_val_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 222 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 261 ext/threads/thrlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 263 ext/threads/thrlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 264 ext/threads/thrlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 265 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) name_scm = SCM_FALSE; SCM_OPTARGS 267 ext/threads/thrlib.c name_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 268 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 345 ext/threads/thrlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 347 ext/threads/thrlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 348 ext/threads/thrlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 352 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) timeout_scm = SCM_FALSE; SCM_OPTARGS 354 ext/threads/thrlib.c timeout_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 355 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 358 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) thread_scm = SCM_UNBOUND; SCM_OPTARGS 360 ext/threads/thrlib.c thread_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 361 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 384 ext/threads/thrlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 386 ext/threads/thrlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 387 ext/threads/thrlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 391 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) cv_scm = SCM_FALSE; SCM_OPTARGS 393 ext/threads/thrlib.c cv_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 394 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 397 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) timeout_scm = SCM_FALSE; SCM_OPTARGS 399 ext/threads/thrlib.c timeout_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 400 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 479 ext/threads/thrlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 481 ext/threads/thrlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 482 ext/threads/thrlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 483 ext/threads/thrlib.c if (SCM_NULLP(SCM_OPTARGS)) name_scm = SCM_FALSE; SCM_OPTARGS 485 ext/threads/thrlib.c name_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 486 ext/threads/thrlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 54 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 56 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 57 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 61 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 63 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 64 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 81 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 83 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 117 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 119 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 120 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 127 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 129 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 130 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 151 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 153 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 154 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 163 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 165 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 166 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 185 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 187 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 188 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 192 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 194 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 195 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 199 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 201 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 202 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 230 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 232 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 233 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 239 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 241 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 242 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 245 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 247 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 248 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 252 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 254 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 255 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 289 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 291 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 292 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 296 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 298 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 299 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 303 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 305 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 306 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 328 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 330 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 331 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 335 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 337 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 338 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 359 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 361 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 362 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 368 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 370 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 371 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 375 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 377 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 378 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 400 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 402 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 403 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 407 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 409 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 410 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 414 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 416 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 417 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 443 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 445 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 446 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 450 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 452 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 453 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 457 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 459 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 460 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 464 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 466 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 467 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 503 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 505 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 506 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 510 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 512 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 513 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 530 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 532 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 566 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 568 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 569 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 576 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 578 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 579 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 600 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 602 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 603 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 612 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 614 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 615 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 634 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 636 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 637 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 641 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 643 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 644 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 648 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 650 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 651 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 679 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 681 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 682 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 688 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 690 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 691 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 694 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 696 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 697 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 701 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 703 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 704 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 738 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 740 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 741 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 745 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 747 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 748 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 752 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 754 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 755 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 777 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 779 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 780 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 784 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 786 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 787 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 808 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 810 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 811 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 817 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 819 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 820 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 824 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 826 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 827 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 849 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 851 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 852 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 856 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 858 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 859 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 863 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 865 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 866 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 892 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 894 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 895 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 899 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 901 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 902 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 906 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 908 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 909 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 913 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 915 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 916 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 952 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 954 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 955 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 959 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 961 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 962 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 979 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 981 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 1015 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1017 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1018 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1025 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1027 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1028 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1049 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1051 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1052 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1061 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1063 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1064 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1083 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1085 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1086 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1090 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1092 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1093 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1097 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1099 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1100 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1128 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1130 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 1131 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1137 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 1139 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1140 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1143 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 1145 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1146 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1150 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1152 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1153 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1187 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1189 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1190 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1194 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1196 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1197 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1201 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1203 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1204 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1226 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1228 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1229 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1233 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1235 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1236 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1257 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1259 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1260 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1266 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1268 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1269 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1273 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1275 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1276 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1298 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1300 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1301 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1305 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1307 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1308 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1312 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1314 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1315 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1341 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1343 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 1344 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1348 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1350 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1351 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1355 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1357 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1358 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1362 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1364 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1365 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1401 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1403 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1404 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1408 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 1410 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1411 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1428 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1430 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 1464 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1466 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1467 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1474 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1476 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1477 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1498 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1500 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1501 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1510 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1512 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1513 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1532 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1534 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1535 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1539 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1541 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1542 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1546 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1548 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1549 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1577 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1579 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 1580 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1586 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 1588 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1589 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1592 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 1594 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1595 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1599 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1601 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1602 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1636 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1638 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1639 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1643 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1645 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1646 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1650 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1652 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1653 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1675 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1677 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1678 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1682 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1684 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1685 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1706 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1708 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1709 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1715 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1717 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1718 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1722 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1724 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1725 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1747 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1749 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1750 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1754 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1756 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1757 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1761 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1763 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1764 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1790 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1792 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 1793 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1797 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1799 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1800 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1804 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1806 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1807 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1811 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1813 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1814 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1850 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1852 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1853 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1857 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 1859 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1860 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1877 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1879 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 1913 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1915 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1916 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1923 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1925 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1926 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1947 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1949 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1950 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1959 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 1961 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1962 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1981 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1983 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1984 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1988 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 1990 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1991 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1995 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 1997 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1998 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2026 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2028 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2029 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2035 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 2037 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2038 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2041 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 2043 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2044 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2048 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2050 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2051 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2085 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2087 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2088 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2092 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2094 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2095 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2099 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2101 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2102 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2124 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2126 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2127 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2131 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 2133 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2134 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2155 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2157 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2158 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2164 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2166 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2167 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2171 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2173 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2174 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2196 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2198 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2199 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2203 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2205 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2206 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2210 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2212 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2213 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2239 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2241 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2242 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2246 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2248 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2249 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2253 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2255 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2256 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2260 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 2262 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2263 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2299 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2301 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2302 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2306 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 2308 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2309 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2326 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2328 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 2362 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2364 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2365 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2372 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 2374 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2375 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2396 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2398 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2399 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2408 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 2410 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2411 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2430 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2432 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2433 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2437 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2439 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2440 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2444 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2446 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2447 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2475 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2477 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2478 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2484 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 2486 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2487 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2490 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 2492 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2493 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2497 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2499 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2500 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2534 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2536 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2537 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2541 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2543 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2544 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2548 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2550 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2551 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2573 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2575 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2576 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2580 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 2582 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2583 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2604 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2606 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2607 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2613 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2615 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2616 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2620 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2622 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2623 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2645 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2647 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2648 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2652 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2654 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2655 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2659 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2661 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2662 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2688 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2690 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2691 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2695 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2697 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2698 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2702 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2704 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2705 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2709 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 2711 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2712 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2748 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2750 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2751 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2755 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 2757 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2758 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2775 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2777 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 2811 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2813 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2814 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2821 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 2823 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2824 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2845 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2847 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2848 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2857 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 2859 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2860 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2879 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2881 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2882 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2886 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2888 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2889 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2893 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2895 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2896 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2924 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2926 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2927 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2933 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 2935 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2936 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2939 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 2941 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2942 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2946 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2948 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2949 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2983 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2985 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2986 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2990 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2992 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2993 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2997 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2999 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3000 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3022 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3024 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3025 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3029 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3031 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3032 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3053 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3055 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3056 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3062 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3064 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3065 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3069 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3071 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3072 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3094 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3096 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3097 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3101 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3103 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3104 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3108 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3110 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3111 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3137 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3139 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 3140 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3144 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3146 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3147 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3151 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3153 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3154 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3158 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3160 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3161 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3197 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3199 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3200 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3204 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 3206 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3207 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3224 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3226 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 3260 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3262 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3263 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3270 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 3272 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3273 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3294 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3296 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3297 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3306 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3308 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3309 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3328 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3330 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3331 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3335 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3337 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3338 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3342 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3344 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3345 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3373 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3375 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 3376 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3382 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 3384 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3385 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3388 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 3390 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3391 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3395 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3397 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3398 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3432 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3434 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3435 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3439 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3441 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3442 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3446 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3448 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3449 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3471 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3473 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3474 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3478 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3480 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3481 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3502 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3504 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3505 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3511 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3513 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3514 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3518 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3520 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3521 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3543 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3545 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3546 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3550 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3552 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3553 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3557 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3559 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3560 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3586 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3588 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 3589 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3593 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3595 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3596 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3600 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3602 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3603 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3607 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3609 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3610 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3646 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3648 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3649 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3653 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 3655 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3656 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3673 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3675 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 3709 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3711 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3712 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3719 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 3721 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3722 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3743 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3745 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3746 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3755 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3757 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3758 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3777 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3779 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3780 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3784 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3786 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3787 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3791 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3793 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3794 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3822 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3824 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 3825 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3831 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 3833 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3834 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3837 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 3839 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3840 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3844 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3846 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3847 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3881 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3883 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3884 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3888 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3890 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3891 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3895 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3897 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3898 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3920 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3922 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3923 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3927 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 3929 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3930 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3951 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3953 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3954 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3960 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3962 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3963 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3967 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3969 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3970 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3992 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3994 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3995 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3999 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4001 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4002 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4006 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4008 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4009 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4035 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4037 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 4038 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4042 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4044 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4045 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4049 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4051 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4052 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4056 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4058 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4059 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4095 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4097 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4098 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4102 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = Scm_MakeInteger(0); SCM_OPTARGS 4104 ext/uvector/uvlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4105 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4122 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4124 ext/uvector/uvlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 4158 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4160 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4161 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4168 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 4170 ext/uvector/uvlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4171 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4192 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4194 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4195 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4204 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4206 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4207 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4226 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4228 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 4229 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4233 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4235 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4236 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4240 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4242 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4243 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4271 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4273 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 4274 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4280 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) src_scm = SCM_UNBOUND; SCM_OPTARGS 4282 ext/uvector/uvlib.c src_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4283 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4286 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) sstart_scm = Scm_MakeInteger(0); SCM_OPTARGS 4288 ext/uvector/uvlib.c sstart_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4289 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4293 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) send_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4295 ext/uvector/uvlib.c send_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4296 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4330 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4332 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 4333 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4337 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4339 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4340 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4344 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4346 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4347 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4369 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4371 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4372 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4376 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4378 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4379 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4400 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4402 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 4403 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4409 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4411 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4412 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4416 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4418 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4419 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4441 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4443 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 4444 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4448 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4450 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4451 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4455 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4457 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4458 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4484 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4486 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 4487 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4491 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 4493 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4494 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4498 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 4500 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4501 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4505 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4507 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4508 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4527 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4529 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4530 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4536 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4538 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4539 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4558 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4560 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4561 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4567 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4569 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4570 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4589 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4591 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4592 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4598 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4600 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4601 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4620 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4622 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4623 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4629 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4631 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4632 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4651 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4653 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4654 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4660 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4662 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4663 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4682 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4684 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4685 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4691 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4693 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4694 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4713 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4715 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4716 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4722 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4724 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4725 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4744 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4746 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4747 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4753 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4755 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4756 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4775 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4777 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4778 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4784 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4786 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4787 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4806 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4808 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4809 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4815 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4817 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4818 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4837 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4839 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4840 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4846 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4848 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4849 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4868 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4870 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4871 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4877 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4879 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4880 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4899 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4901 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4902 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4908 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4910 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4911 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4930 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4932 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4933 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4939 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4941 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4942 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4961 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4963 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4964 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4970 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 4972 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4973 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4992 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4994 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4995 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5001 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5003 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5004 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5023 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5025 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5026 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5032 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5034 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5035 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5054 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5056 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5057 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5063 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5065 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5066 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5085 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5087 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5088 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5094 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5096 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5097 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5116 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5118 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5119 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5125 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5127 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5128 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5147 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5149 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5150 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5156 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5158 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5159 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5178 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5180 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5181 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5187 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5189 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5190 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5209 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5211 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5212 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5218 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5220 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5221 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5240 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5242 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5243 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5249 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5251 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5252 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5271 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5273 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5274 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5280 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5282 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5283 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5302 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5304 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5305 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5311 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5313 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5314 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5333 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5335 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5336 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5342 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5344 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5345 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5364 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5366 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5367 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5373 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5375 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5376 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5395 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5397 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5398 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5404 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5406 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5407 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5426 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5428 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5429 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5435 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5437 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5438 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5457 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5459 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5460 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5466 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5468 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5469 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5488 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5490 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5491 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5497 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5499 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5500 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5519 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5521 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5522 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5528 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5530 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5531 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5550 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5552 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5553 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5559 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5561 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5562 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5581 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5583 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5584 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5590 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5592 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5593 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5612 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5614 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5615 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5621 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5623 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5624 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5643 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5645 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5646 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5652 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5654 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5655 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5674 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5676 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5677 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5683 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5685 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5686 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5705 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5707 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5708 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5714 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5716 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5717 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5736 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5738 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5739 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5745 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5747 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5748 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5767 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5769 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5770 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5776 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5778 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5779 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5798 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5800 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5801 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5807 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5809 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5810 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5829 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5831 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5832 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5838 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5840 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5841 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5860 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5862 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5863 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5869 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5871 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5872 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5891 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5893 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5894 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5900 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5902 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5903 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5922 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5924 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5925 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5931 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5933 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5934 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5953 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5955 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5956 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5962 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5964 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5965 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5984 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5986 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5987 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5993 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 5995 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5996 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6015 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6017 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6018 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6024 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6026 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6027 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6046 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6048 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6049 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6055 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6057 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6058 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6077 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6079 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6080 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6086 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6088 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6089 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6108 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6110 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6111 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6117 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6119 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6120 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6139 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6141 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6142 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6148 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6150 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6151 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6170 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6172 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6173 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6179 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6181 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6182 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6201 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6203 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6204 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6210 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6212 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6213 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6232 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6234 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6235 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6241 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6243 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6244 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6263 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6265 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6266 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6272 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6274 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6275 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6294 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6296 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6297 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6303 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6305 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6306 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6325 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6327 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6328 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6334 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6336 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6337 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6356 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6358 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6359 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6365 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6367 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6368 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6387 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6389 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6390 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6396 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6398 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6399 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6418 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6420 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6421 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6427 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6429 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6430 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6449 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6451 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6452 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6458 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6460 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6461 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 6480 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 6482 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 6483 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 6489 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) clamp_scm = SCM_UNBOUND; SCM_OPTARGS 6491 ext/uvector/uvlib.c clamp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 6492 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 8873 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 8875 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 8876 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 8883 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 8885 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 8886 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 8890 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 8892 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 8893 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 8961 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 8963 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 4) SCM_OPTARGS 8964 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 4 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 8968 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 8970 ext/uvector/uvlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 8971 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 8975 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 8977 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 8978 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 8982 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 8984 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 8985 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 8989 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = SCM_FALSE; SCM_OPTARGS 8991 ext/uvector/uvlib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 8992 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9019 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9021 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 4) SCM_OPTARGS 9022 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 4 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9026 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 9028 ext/uvector/uvlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9029 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9033 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9035 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9036 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9040 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9042 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9043 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9047 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) endian_scm = SCM_FALSE; SCM_OPTARGS 9049 ext/uvector/uvlib.c endian_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9050 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9086 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9088 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9089 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9093 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9095 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9096 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9100 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9102 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9103 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9123 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9125 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9126 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9130 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9132 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9133 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9137 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9139 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9140 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9186 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9188 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9189 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9199 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9201 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9202 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9206 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9208 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9209 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9233 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9235 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9236 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9246 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9248 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9249 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9253 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9255 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9256 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9283 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9285 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9286 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9290 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9292 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9293 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9297 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9299 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9300 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9320 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9322 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9323 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9327 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9329 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9330 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9334 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9336 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9337 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9377 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9379 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9380 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9384 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9386 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9387 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9391 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9393 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9394 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9414 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9416 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9417 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9421 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9423 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9424 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9428 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9430 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9431 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9464 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9466 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9467 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9471 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9473 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9474 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9478 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9480 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9481 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9501 ext/uvector/uvlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 9503 ext/uvector/uvlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 9504 ext/uvector/uvlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 9508 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 9510 ext/uvector/uvlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9511 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 9515 ext/uvector/uvlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 9517 ext/uvector/uvlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 9518 ext/uvector/uvlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 169 src/exclib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 171 src/exclib.c conditions_scm = SCM_OPTARGS; SCM_OPTARGS 141 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 147 src/extlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 169 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 175 src/extlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 197 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 203 src/extlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 282 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 284 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 285 src/extlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 288 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) min_scm = SCM_FALSE; SCM_OPTARGS 290 src/extlib.c min_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 291 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 294 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) max_scm = SCM_FALSE; SCM_OPTARGS 296 src/extlib.c max_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 297 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 386 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 390 src/extlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 486 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 488 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 489 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 493 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = SCM_FALSE; SCM_OPTARGS 495 src/extlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 496 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 580 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 582 src/extlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 611 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 613 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 614 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 620 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) cmpmode_scm = SCM_UNBOUND; SCM_OPTARGS 622 src/extlib.c cmpmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 623 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 646 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 648 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 649 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 655 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) cmpmode_scm = SCM_UNBOUND; SCM_OPTARGS 657 src/extlib.c cmpmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 658 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 679 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 681 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 682 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 686 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) cmpmode_scm = SCM_UNBOUND; SCM_OPTARGS 688 src/extlib.c cmpmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 689 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 710 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 712 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 713 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 717 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) cmpmode_scm = SCM_UNBOUND; SCM_OPTARGS 719 src/extlib.c cmpmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 720 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 743 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 745 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 746 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 752 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) cmpmode_scm = SCM_UNBOUND; SCM_OPTARGS 754 src/extlib.c cmpmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 755 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 778 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 780 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 781 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 787 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) cmpmode_scm = SCM_UNBOUND; SCM_OPTARGS 789 src/extlib.c cmpmode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 790 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 809 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 811 src/extlib.c list_scm = SCM_OPTARGS; SCM_OPTARGS 924 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 926 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 927 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 928 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) prefix_scm = SCM_UNBOUND; SCM_OPTARGS 930 src/extlib.c prefix_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 931 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 994 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 996 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 997 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1002 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1004 src/extlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1005 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1131 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1133 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1134 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1138 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) radix_scm = Scm_MakeInteger(10); SCM_OPTARGS 1140 src/extlib.c radix_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1141 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1167 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1169 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1170 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1174 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) radix_scm = Scm_MakeInteger(10); SCM_OPTARGS 1176 src/extlib.c radix_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1177 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1367 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1369 src/extlib.c chars_scm = SCM_OPTARGS; SCM_OPTARGS 1728 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1730 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1731 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1735 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) byte_scm = Scm_MakeInteger(0); SCM_OPTARGS 1737 src/extlib.c byte_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1738 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1762 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1764 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1765 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1772 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1774 src/extlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1775 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1857 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1859 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1860 src/extlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1864 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = SCM_UNBOUND; SCM_OPTARGS 1866 src/extlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1867 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1870 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = SCM_UNBOUND; SCM_OPTARGS 1872 src/extlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1873 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1904 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1906 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1907 src/extlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1911 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) delim_scm = SCM_MAKE_STR(" "); SCM_OPTARGS 1913 src/extlib.c delim_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1914 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1918 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) grammer_scm = SCM_UNBOUND; SCM_OPTARGS 1920 src/extlib.c grammer_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1921 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2012 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2014 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2015 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2021 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) mode_scm = sym_index; SCM_OPTARGS 2023 src/extlib.c mode_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2024 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2062 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2064 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2065 src/extlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2069 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) index_scm = Scm_MakeInteger(0); SCM_OPTARGS 2071 src/extlib.c index_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2072 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2076 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2078 src/extlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2079 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2083 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2085 src/extlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2086 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2214 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2219 src/extlib.c after_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_after), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 2358 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2363 src/extlib.c case_fold_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_case_fold), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 2424 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2429 src/extlib.c case_fold_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_case_fold), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 2512 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2514 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2515 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2518 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) i_scm = Scm_MakeInteger(0); SCM_OPTARGS 2520 src/extlib.c i_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2521 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2542 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2544 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2545 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2548 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) i_scm = Scm_MakeInteger(0); SCM_OPTARGS 2550 src/extlib.c i_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2551 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2572 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2574 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2575 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2578 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) i_scm = Scm_MakeInteger(0); SCM_OPTARGS 2580 src/extlib.c i_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2581 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2602 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2604 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2605 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2608 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) i_scm = Scm_MakeInteger(0); SCM_OPTARGS 2610 src/extlib.c i_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2611 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2632 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2634 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2635 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2638 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) i_scm = Scm_MakeInteger(0); SCM_OPTARGS 2640 src/extlib.c i_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2641 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2722 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2724 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 3) SCM_OPTARGS 2725 src/extlib.c Scm_Error("too many arguments: up to 3 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2729 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 2731 src/extlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2732 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2736 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 2738 src/extlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2739 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2743 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = SCM_UNBOUND; SCM_OPTARGS 2745 src/extlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2746 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2809 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2811 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2812 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2819 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 2821 src/extlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2822 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3054 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3059 src/extlib.c if_does_not_exist_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_if_does_not_exist), SCM_OPTARGS, key_error); SCM_OPTARGS 3061 src/extlib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3063 src/extlib.c element_type_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_element_type), SCM_OPTARGS, key_character); SCM_OPTARGS 3101 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3106 src/extlib.c if_exists_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_if_exists), SCM_OPTARGS, key_supersede); SCM_OPTARGS 3108 src/extlib.c if_does_not_exist_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_if_does_not_exist), SCM_OPTARGS, key_create); SCM_OPTARGS 3110 src/extlib.c mode_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_mode), SCM_OPTARGS, Scm_MakeInteger(438)); SCM_OPTARGS 3113 src/extlib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3115 src/extlib.c element_type_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_element_type), SCM_OPTARGS, key_character); SCM_OPTARGS 3161 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3166 src/extlib.c privateP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_privateP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3185 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3187 src/extlib.c privateP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_privateP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3365 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3367 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3368 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3369 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) oport_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 3371 src/extlib.c oport_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3372 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3620 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3622 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3623 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3630 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) whence_scm = SCM_MAKE_INT(SEEK_SET); SCM_OPTARGS 3632 src/extlib.c whence_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3633 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3736 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3741 src/extlib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3743 src/extlib.c ownerP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_ownerP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3746 src/extlib.c name_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_name), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3768 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3773 src/extlib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3775 src/extlib.c ownerP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_ownerP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3778 src/extlib.c name_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_name), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 3860 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3862 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3863 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3864 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3866 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3867 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3884 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3886 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3887 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3888 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3890 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3891 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3910 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3912 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3913 src/extlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3914 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3916 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3917 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3921 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) allowbytestr_scm = SCM_FALSE; SCM_OPTARGS 3923 src/extlib.c allowbytestr_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3924 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3945 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3947 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3948 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3952 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3954 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3955 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3982 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3984 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3985 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3989 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3991 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3992 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4011 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4013 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4014 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4019 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) finisher_scm = SCM_FALSE; SCM_OPTARGS 4021 src/extlib.c finisher_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4022 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4100 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4102 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4103 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4107 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 4109 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4110 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4132 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4134 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4135 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4141 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 4143 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4144 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4162 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4164 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4165 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4168 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 4170 src/extlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4171 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4189 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4191 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4192 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4196 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) afterp_scm = SCM_FALSE; SCM_OPTARGS 4198 src/extlib.c afterp_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4199 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4223 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4228 src/extlib.c init_function_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_init_function), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 4230 src/extlib.c export_symbols_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_export_symbols), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 4362 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4367 src/extlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 4449 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4451 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4452 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4453 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) type_scm = sym_eq; SCM_OPTARGS 4455 src/extlib.c type_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4456 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4537 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4539 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4540 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4546 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) defval_scm = SCM_UNBOUND; SCM_OPTARGS 4548 src/extlib.c defval_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4549 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4654 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4656 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4657 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4665 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) defval_scm = SCM_UNBOUND; SCM_OPTARGS 4667 src/extlib.c defval_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4668 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 4729 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 4731 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 4732 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 4738 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 4740 src/extlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 4741 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5032 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5036 src/extlib.c if_exists_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_if_exists), SCM_OPTARGS, key_error); SCM_OPTARGS 5192 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5194 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5195 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5201 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 5203 src/extlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5204 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5260 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5262 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5263 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5264 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) code_scm = Scm_MakeInteger(0); SCM_OPTARGS 5266 src/extlib.c code_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5267 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5330 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5332 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5333 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5334 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) vm_scm = SCM_UNBOUND; SCM_OPTARGS 5336 src/extlib.c vm_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5337 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5355 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5357 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5358 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5359 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) vm_scm = SCM_UNBOUND; SCM_OPTARGS 5361 src/extlib.c vm_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5362 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5379 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5381 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5382 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5383 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) vm_scm = SCM_UNBOUND; SCM_OPTARGS 5385 src/extlib.c vm_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5386 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 5702 src/extlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 5704 src/extlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 5705 src/extlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 5711 src/extlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 5713 src/extlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 5714 src/extlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 45 src/intlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 47 src/intlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 48 src/intlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 54 src/intlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 56 src/intlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 57 src/intlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 148 src/intlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 152 src/intlib.c more_scm = SCM_OPTARGS; SCM_OPTARGS 1239 src/intlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1241 src/intlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1242 src/intlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1243 src/intlib.c if (SCM_NULLP(SCM_OPTARGS)) val_scm = SCM_UNBOUND; SCM_OPTARGS 1245 src/intlib.c val_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1246 src/intlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 230 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 236 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 258 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 264 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 286 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 292 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 314 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 320 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 342 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 348 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 468 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 472 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 492 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 496 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 514 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 516 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 537 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 539 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 561 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 565 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 586 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 590 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 935 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 937 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 938 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 942 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) x_scm = SCM_UNBOUND; SCM_OPTARGS 944 src/stdlib.c x_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 945 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1253 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1255 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 1256 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1259 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) radix_scm = Scm_MakeInteger(10); SCM_OPTARGS 1261 src/stdlib.c radix_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1262 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1266 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) use_upperP_scm = SCM_FALSE; SCM_OPTARGS 1268 src/stdlib.c use_upperP_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1269 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1290 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1292 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1293 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1297 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) radix_scm = Scm_MakeInteger(10); SCM_OPTARGS 1299 src/stdlib.c radix_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1300 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1677 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1679 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 1738 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1740 src/stdlib.c lists_scm = SCM_OPTARGS; SCM_OPTARGS 1782 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1784 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1785 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1791 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1793 src/stdlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1794 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1817 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1819 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1820 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1826 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 1828 src/stdlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1829 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2521 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2523 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2524 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2528 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) c_scm = SCM_MAKE_CHAR(32) /* #\ */; SCM_OPTARGS 2530 src/stdlib.c c_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2531 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2551 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2553 src/stdlib.c chars_scm = SCM_OPTARGS; SCM_OPTARGS 2595 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2597 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2598 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2605 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 2607 src/stdlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2608 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2936 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2938 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 2960 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2962 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 2963 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2967 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = SCM_UNBOUND; SCM_OPTARGS 2969 src/stdlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2970 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2973 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = SCM_UNBOUND; SCM_OPTARGS 2975 src/stdlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2976 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3016 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3018 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3019 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3023 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = SCM_UNBOUND; SCM_OPTARGS 3025 src/stdlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3026 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3029 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = SCM_UNBOUND; SCM_OPTARGS 3031 src/stdlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3032 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3054 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3056 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3057 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3064 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = SCM_UNBOUND; SCM_OPTARGS 3066 src/stdlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3067 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3070 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = SCM_UNBOUND; SCM_OPTARGS 3072 src/stdlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3073 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3113 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3115 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3116 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3120 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) fill_scm = SCM_UNBOUND; SCM_OPTARGS 3122 src/stdlib.c fill_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3123 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3142 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3144 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 3186 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3188 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3189 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3196 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) fallback_scm = SCM_UNBOUND; SCM_OPTARGS 3198 src/stdlib.c fallback_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3199 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3248 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3250 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3251 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3255 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3257 src/stdlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3258 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3262 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3264 src/stdlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3265 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3289 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3291 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3292 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3296 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3298 src/stdlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3299 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3303 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3305 src/stdlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3306 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3332 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3334 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 2) SCM_OPTARGS 3335 src/stdlib.c Scm_Error("too many arguments: up to 2 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3341 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) start_scm = Scm_MakeInteger(0); SCM_OPTARGS 3343 src/stdlib.c start_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3344 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3348 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) end_scm = Scm_MakeInteger(-1); SCM_OPTARGS 3350 src/stdlib.c end_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3351 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3391 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3397 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 3430 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3437 src/stdlib.c moreargs_scm = SCM_OPTARGS; SCM_OPTARGS 3459 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3466 src/stdlib.c moreargs_scm = SCM_OPTARGS; SCM_OPTARGS 3522 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3524 src/stdlib.c args_scm = SCM_OPTARGS; SCM_OPTARGS 3772 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3774 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3775 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3776 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3778 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3779 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3799 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3801 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3802 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3803 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3805 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3806 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3825 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3827 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3828 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3829 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3831 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3832 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3869 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3871 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3872 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3873 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CURIN); SCM_OPTARGS 3875 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3876 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3898 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3900 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3901 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3904 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 3906 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3907 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3926 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3928 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3929 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3932 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 3934 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3935 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3952 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3954 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3955 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3956 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 3958 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3959 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 3978 src/stdlib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 3980 src/stdlib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 3981 src/stdlib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 3985 src/stdlib.c if (SCM_NULLP(SCM_OPTARGS)) port_scm = SCM_OBJ(SCM_CUROUT); SCM_OPTARGS 3987 src/stdlib.c port_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 3988 src/stdlib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 89 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 94 src/syslib.c absolute_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_absolute), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 96 src/syslib.c expand_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_expand), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 98 src/syslib.c canonicalize_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_canonicalize), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 863 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 868 src/syslib.c sigs_scm = SCM_OPTARGS; SCM_OPTARGS 888 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 893 src/syslib.c sigs_scm = SCM_OPTARGS; SCM_OPTARGS 1418 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1423 src/syslib.c nohang_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_nohang), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 1425 src/syslib.c untraced_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_untraced), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 1934 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1936 src/syslib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1937 src/syslib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1944 src/syslib.c if (SCM_NULLP(SCM_OPTARGS)) iomap_scm = SCM_UNBOUND; SCM_OPTARGS 1946 src/syslib.c iomap_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1947 src/syslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 1967 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 1969 src/syslib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 1970 src/syslib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 1977 src/syslib.c if (SCM_NULLP(SCM_OPTARGS)) iomap_scm = SCM_UNBOUND; SCM_OPTARGS 1979 src/syslib.c iomap_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 1980 src/syslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2181 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2183 src/syslib.c name_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_name), SCM_OPTARGS, SCM_MAKE_STR("(pipe)")); SCM_OPTARGS 2185 src/syslib.c buffering_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_buffering), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 2187 src/syslib.c bufferedP_scm = Scm_GetKeyword(SCM_OBJ(KEYARG_bufferedP), SCM_OPTARGS, SCM_FALSE); SCM_OPTARGS 2672 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2674 src/syslib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2675 src/syslib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2682 src/syslib.c if (SCM_NULLP(SCM_OPTARGS)) timeout_scm = SCM_FALSE; SCM_OPTARGS 2684 src/syslib.c timeout_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2685 src/syslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS); SCM_OPTARGS 2712 src/syslib.c ScmObj SCM_OPTARGS = SCM_ARGREF(SCM_ARGCNT-1); SCM_OPTARGS 2714 src/syslib.c if (Scm_Length(SCM_OPTARGS) > 1) SCM_OPTARGS 2715 src/syslib.c Scm_Error("too many arguments: up to 1 is expected, %d given.", Scm_Length(SCM_OPTARGS)); SCM_OPTARGS 2722 src/syslib.c if (SCM_NULLP(SCM_OPTARGS)) timeout_scm = SCM_FALSE; SCM_OPTARGS 2724 src/syslib.c timeout_scm = SCM_CAR(SCM_OPTARGS); SCM_OPTARGS 2725 src/syslib.c SCM_OPTARGS = SCM_CDR(SCM_OPTARGS);