diff options
author | Andy Wingo <wingo@pobox.com> | 2012-02-08 12:20:09 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2012-02-08 12:20:47 +0100 |
commit | 4fbbf346a654e84f89008e1800e8f867fde57462 (patch) | |
tree | 82acff33f4749a56292f86481b379aebcf3c6861 | |
parent | 817307ccac5027fd784798bbbf6ffb52e0a5d751 (diff) | |
download | guile-4fbbf346a654e84f89008e1800e8f867fde57462.tar.gz |
i18: avoid freelocale (NULL)
* libguile/i18n.c (smob_locale_free): Don't freelocale (NULL).
-rw-r--r-- | libguile/i18n.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/i18n.c b/libguile/i18n.c index 057711fdb..817c66198 100644 --- a/libguile/i18n.c +++ b/libguile/i18n.c @@ -232,7 +232,8 @@ SCM_SMOB_FREE (scm_tc16_locale_smob_type, smob_locale_free, locale) scm_t_locale c_locale; c_locale = (scm_t_locale) SCM_SMOB_DATA (locale); - freelocale (c_locale); + if (c_locale) + freelocale (c_locale); return 0; } |