add info on updating CoreList and tags to release_managers_guide.pod

[perl5.git] / symbian / symbianish.h

diff --git a/symbian/symbianish.h b/symbian/symbianish.h
index b2054bc..a76a755 100644 (file)
--- a/symbian/symbianish.h
+++ b/symbian/symbianish.h
@@ -22,7 +22,7 @@
  *     available to set I/O characteristics
  */
 #define        HAS_IOCTL               / **/
- 
+
 /* HAS_UTIME:
  *     This symbol, if defined, indicates that the routine utime() is
  *     available to update the access and modification times of files.
@@ -47,7 +47,7 @@
 #undef HAS_WAIT
 
 #endif /* !PERL_MICRO */
-  
+
 /* USEMYBINMODE
  *     This symbol, if defined, indicates that the program should
  *     use the routine my_binmode(FILE *fp, char iotype) to insure
@@ -71,7 +71,7 @@
 #define USE_STAT_RDEV  /**/
 
 /* ACME_MESS:
- *     This symbol, if defined, indicates that error messages should be 
+ *     This symbol, if defined, indicates that error messages should be
  *     should be generated in a format that allows the use of the Acme
  *     GUI/editor's autofind feature.
  */
@@ -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; 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)"