Commit | Line | Data |
27da23d5 |
1 | /* |
2 | * symbian_dll.cpp |
3 | * |
4 | * Copyright (c) Nokia 2004-2005. All rights reserved. |
5 | * This code is licensed under the same terms as Perl itself. |
6 | * |
7 | */ |
8 | |
9 | #define SYMBIAN_DLL_CPP |
10 | #include <e32base.h> |
11 | #include "PerlBase.h" |
12 | |
13 | EXPORT_C GLDEF_C TInt E32Dll(TDllReason /*aReason*/) { return KErrNone; } |
14 | |
15 | extern "C" { |
16 | EXPORT_C void* symbian_get_vars(void) { return Dll::Tls(); } |
17 | EXPORT_C void symbian_set_vars(const void *p) { Dll::SetTls((TAny*)p); } |
18 | EXPORT_C void symbian_unset_vars(void) { Dll::SetTls(0); } |
19 | } |
20 | |