diff options
Diffstat (limited to 'libguile/i18n.c')
| -rw-r--r-- | libguile/i18n.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/i18n.c b/libguile/i18n.c index 6ee159b73..97ae4ef4c 100644 --- a/libguile/i18n.c +++ b/libguile/i18n.c @@ -234,7 +234,7 @@ SCM_GLOBAL_VARIABLE (scm_global_locale, "%global-locale"); #define SCM_VALIDATE_OPTIONAL_LOCALE_COPY(_pos, _arg, _c_locale) \ do \ { \ - if ((_arg) != SCM_UNDEFINED) \ + if (!scm_is_eq ((_arg), SCM_UNDEFINED)) \ SCM_VALIDATE_LOCALE_COPY (_pos, _arg, _c_locale); \ else \ (_c_locale) = NULL; \ @@ -1378,7 +1378,7 @@ SCM_DEFINE (scm_locale_string_to_integer, "locale-string->integer", SCM_VALIDATE_STRING (1, str); c_str = scm_i_string_chars (str); - if (base != SCM_UNDEFINED) + if (!scm_is_eq (base, SCM_UNDEFINED)) SCM_VALIDATE_INT_COPY (2, base, c_base); else c_base = 10; |