summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-09-23 11:28:51 +0100
committerNicholas Clark <nick@ccl4.org>2009-09-23 11:28:51 +0100
commite27b5b51275a893e82bce85334679ee38d3d6bf8 (patch)
tree64c636963252870939f00637f84e924d90eb5040 /perl.c
parentb0e687f777617f7ff223559dbda04c4f53864b19 (diff)
downloadperl-e27b5b51275a893e82bce85334679ee38d3d6bf8.tar.gz
For miniperl, disable PERL_UNICODE and -C.
This allows a build to complete with PERL_UNICODE set and a UTF-8 locale. Without this there's a bootstrapping problem, as miniperl can't load the UTF-8 components of the regexp engine, because they're not yet built.
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index 8691a15645..e595a0a289 100644
--- a/perl.c
+++ b/perl.c
@@ -2055,6 +2055,7 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
#if defined(__SYMBIAN32__)
PL_unicode = PERL_UNICODE_STD_FLAG; /* See PERL_SYMBIAN_CONSOLE_UTF8. */
#endif
+# ifndef PERL_IS_MINIPERL
if (PL_unicode) {
/* Requires init_predump_symbols(). */
if (!(PL_unicode & PERL_UNICODE_LOCALE_FLAG) || PL_utf8locale) {
@@ -2093,6 +2094,7 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
}
}
}
+#endif
{
const char *s;