Symbian/S90 further fixes

Message-Id: <20070115041152.374AB43A67@anubis.hut.fi>

p4raw-id: //depot/perl@29811

diff --git a/perl.h b/perl.h
index 373062f..8c8e078 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3891,7 +3891,7 @@ typedef Sighandler_t Sigsave_t;
 #endif
 
 #ifdef USE_PERLIO
-EXTERN_C void PerlIO_teardown(pTHX);
+EXTERN_C PERL_EXPORT_C void PerlIO_teardown(pTHX);
 # ifdef USE_ITHREADS
 #  define PERLIO_INIT MUTEX_INIT(&PL_perlio_mutex)
 #  define PERLIO_TERM                          \

diff --git a/symbian/PerlBase.cpp b/symbian/PerlBase.cpp
index 31fe012..443ae0b 100644 (file)
--- a/symbian/PerlBase.cpp
+++ b/symbian/PerlBase.cpp
@@ -21,6 +21,7 @@ CPerlBase::CPerlBase()
 
 EXPORT_C void CPerlBase::Destruct()
 {
+    dTHX;
     iState = EPerlDestroying;
     if (iConsole) {
         iConsole->Printf(_L("[Any key to continue]"));

diff --git a/symbian/config.sh b/symbian/config.sh
index f58e713..206c9bc 100644 (file)
--- a/symbian/config.sh
+++ b/symbian/config.sh
@@ -85,6 +85,7 @@ d_crypt='undef'
 d_crypt_r='undef'
 d_csh='undef'
 d_ctermid_r='undef'
+d_cterm='undef'
 d_ctime_r='undef'
 d_c99_variadic_macros='undef'
 d_cuserid='undef'
@@ -128,7 +129,7 @@ d_fds_bits='undef'
 d_fgetpos='undef'
 d_finite='undef'
 d_finitel='undef'
-d_flexfnam='undef'
+d_flexfnam='define'
 d_flock='undef'
 d_flockproto='undef'
 d_fork='undef'
@@ -286,7 +287,9 @@ d_phostname='undef'
 d_pipe='undef'
 d_poll='undef'
 d_portable='undef'
+d_printf_format_null='undef'
 d_procselfexe='undef'
+d_pseudofork='undef'
 d_pthread_atfork='undef'
 d_pthread_attr_setscope='undef'
 d_pthread_yield='undef'