diff options
| author | Karl Williamson <khw@cpan.org> | 2021-04-12 15:35:11 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2022-10-02 11:03:49 -0600 |
| commit | b41c5839100237b5ac56296e146374b69a8ee83a (patch) | |
| tree | 6de695a01238dcaa992b35972ae83800051a3cd0 /intrpvar.h | |
| parent | 3ce78f6a6b653a68d066f015ce7098d8ddf9ae21 (diff) | |
| download | perl-b41c5839100237b5ac56296e146374b69a8ee83a.tar.gz | |
intrpvar.h: Consolidate some defns into #ifdefs
This moves related definitions together
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/intrpvar.h b/intrpvar.h index bec4bc73e8..a975977729 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -385,15 +385,14 @@ PERLVAR(I, exit_flags, U8) /* was exit() unexpected, etc. */ PERLVAR(I, utf8locale, bool) /* utf8 locale detected */ -PERLVAR(I, in_utf8_CTYPE_locale, bool) -PERLVAR(I, in_utf8_COLLATE_locale, bool) -PERLVAR(I, in_utf8_turkic_locale, bool) #if defined(USE_LOCALE) && defined(USE_LOCALE_THREADS) PERLVARI(I, locale_mutex_depth, int, 0) /* Emulate general semaphore */ #endif #ifdef USE_LOCALE_CTYPE PERLVAR(I, warn_locale, SV *) +PERLVAR(I, in_utf8_CTYPE_locale, bool) +PERLVAR(I, in_utf8_turkic_locale, bool) #endif PERLVARA(I, colors,6, char *) /* values from PERL_RE_COLORS env var */ @@ -765,6 +764,7 @@ PERLVARI(I, strxfrm_is_behaved, bool, TRUE) PERLVARI(I, strxfrm_max_cp, U8, 0) /* Highest collating cp in locale */ PERLVARI(I, collation_standard, bool, TRUE) /* Assume simple collation */ +PERLVAR(I, in_utf8_COLLATE_locale, bool) #endif /* USE_LOCALE_COLLATE */ PERLVARI(I, langinfo_buf, const char *, NULL) |