mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-22 04:30:19 +02:00
Code Activity

Missing free in nl-langinfo

Browse source 
This is a regression.

* libguile/i18n.c (scm_nl_langinfo): free c_result
This commit is contained in:
Michael Gran 2009-09-25 07:47:56 -07:00
parent 52642040e2
commit b8fc11d287
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/i18n.c
View file

@ -1651,6 +1651,7 @@ SCM_DEFINE (scm_nl_langinfo, "nl-langinfo", 1, 1, 0,
from the c_locale. */ from the c_locale. */
result = scm_from_locale_string (c_result); result = scm_from_locale_string (c_result);
#endif /* !HAVE_LANGINFO_CODESET */ #endif /* !HAVE_LANGINFO_CODESET */
free (c_result);
} }
} }