a_scm 1067 src/stdlib.c ScmObj a_scm; a_scm 1072 src/stdlib.c a_scm = SCM_ARGREF(0); a_scm 1073 src/stdlib.c if (!SCM_REALP(a_scm)) Scm_Error("real number required, but got %S", a_scm); a_scm 1074 src/stdlib.c a = Scm_GetDouble(a_scm);