This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Increase $feature::VERSION to 1.31
[perl5.git]
/
symbian
/
symbian_dll.cpp
diff --git
a/symbian/symbian_dll.cpp
b/symbian/symbian_dll.cpp
index
a206c99
..
a1e61a4
100644
(file)
--- a/
symbian/symbian_dll.cpp
+++ b/
symbian/symbian_dll.cpp
@@
-10,6
+10,12
@@
#include <e32base.h>
#include "PerlBase.h"
#include <e32base.h>
#include "PerlBase.h"
+#ifdef __SERIES60_3X__
+EXPORT_C GLDEF_C TInt E32Dll(/*TDllReason aReason*/) { return KErrNone; }
+#else
+EXPORT_C GLDEF_C TInt E32Dll(TDllReason /*aReason*/) { return KErrNone; }
+#endif
+
extern "C" {
EXPORT_C void* symbian_get_vars(void) { return Dll::Tls(); }
EXPORT_C void symbian_set_vars(const void *p) { Dll::SetTls((TAny*)p); }
extern "C" {
EXPORT_C void* symbian_get_vars(void) { return Dll::Tls(); }
EXPORT_C void symbian_set_vars(const void *p) { Dll::SetTls((TAny*)p); }