if_exists 3092 src/extlib.c ScmObj if_exists; if_exists 3107 src/extlib.c if_exists = (if_exists_scm); if_exists 3121 src/extlib.c if (SCM_EQ(if_exists, key_append)) flags |= O_APPEND; if_exists 3122 src/extlib.c else if (SCM_EQ(if_exists, key_error)) { if_exists 3128 src/extlib.c else if (SCM_EQ(if_exists, key_supersede)) flags |= O_TRUNC; if_exists 3129 src/extlib.c else if (SCM_EQ(if_exists, key_overwrite)) /*no need to add flags*/; if_exists 3130 src/extlib.c else if (SCM_FALSEP(if_exists)) { flags |= O_EXCL; ignerr = TRUE; } if_exists 3132 src/extlib.c Scm_Error("argument for :if-exists must be either :supersede, :overwrite, :append, :error or #f, but got %S", if_exists); if_exists 5031 src/extlib.c ScmObj if_exists; if_exists 5037 src/extlib.c if_exists = (if_exists_scm); if_exists 5040 src/extlib.c if (SCM_EQ(if_exists, key_error)) { if_exists 5042 src/extlib.c } else if (SCM_FALSEP(if_exists)) { if_exists 5045 src/extlib.c Scm_Error("argument for :if-exists must be either :error or #f, but got %S", if_exists);