setter_scm       2870 src/extlib.c     ScmObj setter_scm;
setter_scm       2876 src/extlib.c     setter_scm = SCM_ARGREF(1);
setter_scm       2877 src/extlib.c     if (!SCM_PROCEDUREP(setter_scm)) Scm_Error("procedure required, but got %S", setter_scm);
setter_scm       2878 src/extlib.c     setter = SCM_PROCEDURE(setter_scm);