This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add variable for if the current UTF-8 locale is Turkic
[perl5.git] / intrpvar.h
index fad1eaa..f604ef9 100644 (file)
@@ -262,6 +262,7 @@ 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_ITHREADS) && ! defined(USE_THREAD_SAFE_LOCALE)
 PERLVARI(I, lc_numeric_mutex_depth, int, 0)   /* Emulate general semaphore */
 #endif