From 8ac853655d9b744749adcb9687c13d99cdd6e9fb Mon Sep 17 00:00:00 2001
From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Fri, 31 Oct 1997 01:43:49 +0000
Subject: Convert miniperl sources to ANSI C. Several passes of GNU C's
 'protoize' plus a few hand edits. Will compile miniperl with gcc -x c++ (i.e.
 treat .c a C++ files) Does not link seems gcc's C++ does not define a symbol
 for    const char foo[] = "...."; i.e. with empty [].

p4raw-id: //depot/ansiperl@194
---
 perlio.c | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

(limited to 'perlio.c')

diff --git a/perlio.c b/perlio.c
index f269dcdb1d..2ddc3f12d0 100644
--- a/perlio.c
+++ b/perlio.c
@@ -26,7 +26,7 @@
 #ifdef PERLIO_IS_STDIO 
 
 void
-PerlIO_init()
+PerlIO_init(void)
 {
  /* Does nothing (yet) except force this file to be included 
     in perl binary. That allows this file to force inclusion
@@ -37,7 +37,7 @@ PerlIO_init()
 
 #undef PerlIO_tmpfile
 PerlIO *
-PerlIO_tmpfile()
+PerlIO_tmpfile(void)
 {
  return tmpfile();
 }
@@ -610,11 +610,7 @@ char *pat, *args;
 
 #ifndef PerlIO_vsprintf
 int 
-PerlIO_vsprintf(s,n,fmt,ap)
-char *s;
-const char *fmt;
-int n;
-va_list ap;
+PerlIO_vsprintf(char *s, int n, const char *fmt, va_list ap)
 {
  int val = vsprintf(s, fmt, ap);
  if (n >= 0)
-- 
cgit v1.2.1