* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice. */
* whether to permit this exception to apply to your modifications.
* If you do not wish that, delete this exception notice. */
char *buf;
SCM_ASSERT (SCM_STRINGP (zone), zone, pos, subr);
char *buf;
SCM_ASSERT (SCM_STRINGP (zone), zone, pos, subr);
buf = scm_must_malloc (SCM_STRING_LENGTH (zone) + sizeof (tzvar) + 1, subr);
sprintf (buf, "%s=%s", tzvar, SCM_STRING_CHARS (zone));
oldenv = environ;
buf = scm_must_malloc (SCM_STRING_LENGTH (zone) + sizeof (tzvar) + 1, subr);
sprintf (buf, "%s=%s", tzvar, SCM_STRING_CHARS (zone));
oldenv = environ;
SCM_VALIDATE_STRING (1, format);
bdtime2c (stime, &t, SCM_ARG2, FUNC_NAME);
SCM_VALIDATE_STRING (1, format);
bdtime2c (stime, &t, SCM_ARG2, FUNC_NAME);
SCM_VALIDATE_STRING (1, format);
SCM_VALIDATE_STRING (2, string);
SCM_VALIDATE_STRING (1, format);
SCM_VALIDATE_STRING (2, string);