summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2005-10-17 16:19:34 +0300
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-10-17 09:57:24 +0000
commita0fd494844cc8648fdc5234c367fd018a12fdf3f (patch)
tree2b88e57b833d4c547dacfb6c74b5c2be4c1cba61 /perl.c
parent5ca7f68ddac45dcdfd991dcc23e59792a9900482 (diff)
downloadperl-a0fd494844cc8648fdc5234c367fd018a12fdf3f.tar.gz
another Symbian update: Alan's fault :-)
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F24E7A611@esebe105.NOE.Nokia.com> p4raw-id: //depot/perl@25778
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl.c b/perl.c
index 2f8dbf4909..102a8bd8a3 100644
--- a/perl.c
+++ b/perl.c
@@ -2070,7 +2070,7 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
* or explicitly in some platforms.
* locale.c:Perl_init_i18nl10n() if the environment
* look like the user wants to use UTF-8. */
-#if defined(SYMBIAN)
+#if defined(__SYMBIAN32__)
PL_unicode = PERL_UNICODE_STD_FLAG; /* See PERL_SYMBIAN_CONSOLE_UTF8. */
#endif
if (PL_unicode) {
@@ -3272,7 +3272,7 @@ Perl_moreswitches(pTHX_ char *s)
PerlIO_printf(PerlIO_stdout(),"Built on " __DATE__ " " __TIME__ "\n\n");
wce_hitreturn();
#endif
-#ifdef SYMBIAN
+#ifdef __SYMBIAN32__
PerlIO_printf(PerlIO_stdout(),
"Symbian port by Nokia, 2004-2005\n");
#endif
@@ -4715,7 +4715,7 @@ S_init_perllib(pTHX)
#endif /* MACOS_TRADITIONAL */
}
-#if defined(DOSISH) || defined(EPOC) || defined(SYMBIAN)
+#if defined(DOSISH) || defined(EPOC) || defined(__SYMBIAN32__)
# define PERLLIB_SEP ';'
#else
# if defined(VMS)