1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00

(scm_strftime): Free t.tm_zone produced by bdtime2c.

Reported by Bill Schottstaedt.
This commit is contained in:
Kevin Ryde 2005-01-04 00:35:48 +00:00
parent 52d28fc2b4
commit 168e958cb8

View file

@ -697,6 +697,9 @@ SCM_DEFINE (scm_strftime, "strftime", 2, 0, 0,
result = scm_from_locale_stringn (tbuf + 1, len - 1);
free (tbuf);
free (myfmt);
#if HAVE_STRUCT_TM_TM_ZONE
free ((char *) t.tm_zone);
#endif
return result;
}
#undef FUNC_NAME