diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2005-11-07 15:32:15 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-07 11:39:57 +0000 |
| commit | d0d72822ba0a68d160ea4c98ca80f24b8f73969b (patch) | |
| tree | 735ce6a98b4d91d05a26f9573f8e62ca8f91738f /symbian/PerlBase.h | |
| parent | 7d0beb42a2610634ab455d4519a64df3ca90bc2f (diff) | |
| download | perl-d0d72822ba0a68d160ea4c98ca80f24b8f73969b.tar.gz | |
Symbian update blead@26025
Message-ID: <B356D8F434D20B40A8CEDAEC305A1F24E7A70C@esebe105.NOE.Nokia.com>
p4raw-id: //depot/perl@26030
Diffstat (limited to 'symbian/PerlBase.h')
| -rw-r--r-- | symbian/PerlBase.h | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/symbian/PerlBase.h b/symbian/PerlBase.h index f6765fbed2..a2dbcf6212 100644 --- a/symbian/PerlBase.h +++ b/symbian/PerlBase.h @@ -47,7 +47,7 @@ class CPerlBase : public CBase public: CPerlBase(); IMPORT_C virtual ~CPerlBase(); - IMPORT_C static CPerlBase* NewInterpreterL(TBool iCloseStdlib = ETrue, + IMPORT_C static CPerlBase* NewInterpreterL(TBool aCloseStdlib = ETrue, void (*aStdioInitFunc)(void*) = NULL, void *aStdioInitCookie = NULL); IMPORT_C static CPerlBase* NewInterpreterLC(TBool iCloseStdlib = ETrue, @@ -84,7 +84,6 @@ class CPerlBase : public CBase TPerlState iState; private: - void ConstructL(); CConsoleBase* iConsole; /* The screen. */ TUint16* iConsoleBuffer; /* The UTF-16 characters. */ @@ -114,5 +113,12 @@ class CPerlBase : public CBase #define PerlCopyD(s,d,n,t) (MEM_WRAP_CHECK(n,t), memcpy((char*)(d),(char*)(s), (n) * sizeof(t))) #define PerlNew(x,v,n,t) (v = (MEM_WRAP_CHECK(n,t), (t*)safemalloc((MEM_SIZE)((n)*sizeof(t))))) +// This is like the Symbian _LIT() but without the embedded L prefix, +// which enables using #defined constants (which need to carry their +// own L prefix). +#ifndef _LIT_NO_L +# define _LIT_NO_L(n, s) static const TLitC<sizeof(s)/2> n={sizeof(s)/2-1,s} +#endif // #ifndef _LIT_NO_L + #endif /* #ifndef __PerlBase_h__ */ |