remove _() non-ansism

[p5sagit/p5-mst-13.2.git] / iperlsys.h

diff --git a/iperlsys.h b/iperlsys.h
index 1c376ef..9ad3256 100644 (file)
--- a/iperlsys.h
+++ b/iperlsys.h
@@ -71,7 +71,7 @@
 #      define PERLIO_IS_STDIO
 #  endif
 #else
-extern void PerlIO_init _((void));
+extern void PerlIO_init (void);
 #endif
 
 #ifdef PERL_OBJECT
@@ -250,133 +250,133 @@ struct _PerlIO;
 #endif
 
 #ifndef PerlIO_stdoutf
-extern int     PerlIO_stdoutf          _((const char *,...))
+extern int     PerlIO_stdoutf          (const char *,...)
                                        __attribute__((format (printf, 1, 2)));
 #endif
 #ifndef PerlIO_puts
-extern int     PerlIO_puts             _((PerlIO *,const char *));
+extern int     PerlIO_puts             (PerlIO *,const char *);
 #endif
 #ifndef PerlIO_open
-extern PerlIO *        PerlIO_open             _((const char *,const char *));
+extern PerlIO *        PerlIO_open             (const char *,const char *);
 #endif
 #ifndef PerlIO_close
-extern int     PerlIO_close            _((PerlIO *));
+extern int     PerlIO_close            (PerlIO *);
 #endif
 #ifndef PerlIO_eof
-extern int     PerlIO_eof              _((PerlIO *));
+extern int     PerlIO_eof              (PerlIO *);
 #endif
 #ifndef PerlIO_error
-extern int     PerlIO_error            _((PerlIO *));
+extern int     PerlIO_error            (PerlIO *);
 #endif
 #ifndef PerlIO_clearerr
-extern void    PerlIO_clearerr         _((PerlIO *));
+extern void    PerlIO_clearerr         (PerlIO *);
 #endif
 #ifndef PerlIO_getc
-extern int     PerlIO_getc             _((PerlIO *));
+extern int     PerlIO_getc             (PerlIO *);
 #endif
 #ifndef PerlIO_putc
-extern int     PerlIO_putc             _((PerlIO *,int));
+extern int     PerlIO_putc             (PerlIO *,int);
 #endif
 #ifndef PerlIO_flush
-extern int     PerlIO_flush            _((PerlIO *));
+extern int     PerlIO_flush            (PerlIO *);
 #endif
 #ifndef PerlIO_ungetc
-extern int     PerlIO_ungetc           _((PerlIO *,int));
+extern int     PerlIO_ungetc           (PerlIO *,int);
 #endif
 #ifndef PerlIO_fileno
-extern int     PerlIO_fileno           _((PerlIO *));
+extern int     PerlIO_fileno           (PerlIO *);
 #endif
 #ifndef PerlIO_fdopen
-extern PerlIO *        PerlIO_fdopen           _((int, const char *));
+extern PerlIO *        PerlIO_fdopen           (int, const char *);
 #endif
 #ifndef PerlIO_importFILE
-extern PerlIO *        PerlIO_importFILE       _((FILE *,int));
+extern PerlIO *        PerlIO_importFILE       (FILE *,int);
 #endif
 #ifndef PerlIO_exportFILE
-extern FILE *  PerlIO_exportFILE       _((PerlIO *,int));
+extern FILE *  PerlIO_exportFILE       (PerlIO *,int);
 #endif
 #ifndef PerlIO_findFILE
-extern FILE *  PerlIO_findFILE         _((PerlIO *));
+extern FILE *  PerlIO_findFILE         (PerlIO *);
 #endif
 #ifndef PerlIO_releaseFILE
-extern void    PerlIO_releaseFILE      _((PerlIO *,FILE *));
+extern void    PerlIO_releaseFILE      (PerlIO *,FILE *);
 #endif
 #ifndef PerlIO_read
-extern SSize_t PerlIO_read             _((PerlIO *,void *,Size_t));
+extern SSize_t PerlIO_read             (PerlIO *,void *,Size_t);
 #endif
 #ifndef PerlIO_write
-extern SSize_t PerlIO_write            _((PerlIO *,const void *,Size_t));
+extern SSize_t PerlIO_write            (PerlIO *,const void *,Size_t);
 #endif
 #ifndef PerlIO_setlinebuf
-extern void    PerlIO_setlinebuf       _((PerlIO *));
+extern void    PerlIO_setlinebuf       (PerlIO *);
 #endif
 #ifndef PerlIO_printf
-extern int     PerlIO_printf           _((PerlIO *, const char *,...))
+extern int     PerlIO_printf           (PerlIO *, const char *,...)
                                        __attribute__((format (printf, 2, 3)));
 #endif
 #ifndef PerlIO_sprintf
-extern int     PerlIO_sprintf          _((char *, int, const char *,...))
+extern int     PerlIO_sprintf          (char *, int, const char *,...)
                                        __attribute__((format (printf, 3, 4)));
 #endif
 #ifndef PerlIO_vprintf
-extern int     PerlIO_vprintf          _((PerlIO *, const char *, va_list));
+extern int     PerlIO_vprintf          (PerlIO *, const char *, va_list);
 #endif
 #ifndef PerlIO_tell
-extern Off_t   PerlIO_tell             _((PerlIO *));
+extern Off_t   PerlIO_tell             (PerlIO *);
 #endif
 #ifndef PerlIO_seek
-extern int     PerlIO_seek             _((PerlIO *, Off_t, int));
+extern int     PerlIO_seek             (PerlIO *, Off_t, int);
 #endif
 #ifndef PerlIO_rewind
-extern void    PerlIO_rewind           _((PerlIO *));
+extern void    PerlIO_rewind           (PerlIO *);
 #endif
 #ifndef PerlIO_has_base
-extern int     PerlIO_has_base         _((PerlIO *));
+extern int     PerlIO_has_base         (PerlIO *);
 #endif
 #ifndef PerlIO_has_cntptr
-extern int     PerlIO_has_cntptr       _((PerlIO *));
+extern int     PerlIO_has_cntptr       (PerlIO *);
 #endif
 #ifndef PerlIO_fast_gets
-extern int     PerlIO_fast_gets        _((PerlIO *));
+extern int     PerlIO_fast_gets        (PerlIO *);
 #endif
 #ifndef PerlIO_canset_cnt
-extern int     PerlIO_canset_cnt       _((PerlIO *));
+extern int     PerlIO_canset_cnt       (PerlIO *);
 #endif
 #ifndef PerlIO_get_ptr
-extern STDCHAR * PerlIO_get_ptr                _((PerlIO *));
+extern STDCHAR * PerlIO_get_ptr                (PerlIO *);
 #endif
 #ifndef PerlIO_get_cnt
-extern int     PerlIO_get_cnt          _((PerlIO *));
+extern int     PerlIO_get_cnt          (PerlIO *);
 #endif
 #ifndef PerlIO_set_cnt
-extern void    PerlIO_set_cnt          _((PerlIO *,int));
+extern void    PerlIO_set_cnt          (PerlIO *,int);
 #endif
 #ifndef PerlIO_set_ptrcnt
-extern void    PerlIO_set_ptrcnt       _((PerlIO *,STDCHAR *,int));
+extern void    PerlIO_set_ptrcnt       (PerlIO *,STDCHAR *,int);
 #endif
 #ifndef PerlIO_get_base
-extern STDCHAR * PerlIO_get_base       _((PerlIO *));
+extern STDCHAR * PerlIO_get_base       (PerlIO *);
 #endif
 #ifndef PerlIO_get_bufsiz
-extern int     PerlIO_get_bufsiz       _((PerlIO *));
+extern int     PerlIO_get_bufsiz       (PerlIO *);
 #endif
 #ifndef PerlIO_tmpfile
-extern PerlIO *        PerlIO_tmpfile          _((void));
+extern PerlIO *        PerlIO_tmpfile          (void);
 #endif
 #ifndef PerlIO_stdin
-extern PerlIO *        PerlIO_stdin    _((void));
+extern PerlIO *        PerlIO_stdin    (void);
 #endif
 #ifndef PerlIO_stdout
-extern PerlIO *        PerlIO_stdout   _((void));
+extern PerlIO *        PerlIO_stdout   (void);
 #endif
 #ifndef PerlIO_stderr
-extern PerlIO *        PerlIO_stderr   _((void));
+extern PerlIO *        PerlIO_stderr   (void);
 #endif
 #ifndef PerlIO_getpos
-extern int     PerlIO_getpos           _((PerlIO *,Fpos_t *));
+extern int     PerlIO_getpos           (PerlIO *,Fpos_t *);
 #endif
 #ifndef PerlIO_setpos
-extern int     PerlIO_setpos           _((PerlIO *,const Fpos_t *));
+extern int     PerlIO_setpos           (PerlIO *,const Fpos_t *);
 #endif
 
 
@@ -652,7 +652,7 @@ public:
 #ifdef PERL_OBJECT
 
 #ifndef Sighandler_t
-typedef Signal_t (*Sighandler_t) _((int));
+typedef Signal_t (*Sighandler_t) (int);
 #endif
 #ifndef jmp_buf
 #include <setjmp.h>