diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2007-09-25 18:00:32 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2007-09-25 18:00:32 +0000 |
| commit | cbec8ebe2f7855c619451e56c6921e1537d3eba5 (patch) | |
| tree | b15c2a3f29a517dce5b080fa94e0beef050444dc /symbian | |
| parent | 6f8d0260355f8c4ae7955768122638ad99f0ebab (diff) | |
| download | perl-cbec8ebe2f7855c619451e56c6921e1537d3eba5.tar.gz | |
make PERL_SYS_INIT/INIT3/TERM into functions
p4raw-id: //depot/perl@31970
Diffstat (limited to 'symbian')
| -rw-r--r-- | symbian/symbianish.h | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/symbian/symbianish.h b/symbian/symbianish.h index b8e6940e07..a76a755587 100644 --- a/symbian/symbianish.h +++ b/symbian/symbianish.h @@ -119,8 +119,9 @@ #define Fflush(fp) fflush(fp) #define Mkdir(path,mode) mkdir((path),(mode)) -#ifndef PERL_SYS_TERM -#define PERL_SYS_TERM() HINTS_REFCNT_TERM; OP_REFCNT_TERM; PERLIO_TERM; MALLOC_TERM; CloseSTDLIB(); +#ifndef PERL_SYS_TERM_BODY +#define PERL_SYS_TERM_BODY() HINTS_REFCNT_TERM; OP_REFCNT_TERM; \ + PERLIO_TERM; MALLOC_TERM; CloseSTDLIB(); #endif #define BIT_BUCKET "NUL:" @@ -170,7 +171,7 @@ pid_t wait(int *status); #define times(b) symbian_times(b) #define usleep(u) symbian_usleep(u) -#define PERL_SYS_INIT(c, v) symbian_sys_init(c, v) +#define PERL_SYS_INIT_BODY(c, v) symbian_sys_init(c, v) #ifdef __SERIES60_1X__ # error "Unfortunately Perl does not work in S60 1.2 (see FAQ-0929)" |