summaryrefslogtreecommitdiff
path: root/taint.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>1997-10-31 01:43:49 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>1997-10-31 01:43:49 +0000
commit8ac853655d9b744749adcb9687c13d99cdd6e9fb (patch)
treec32146679d3473063e5fce6090b93706d7602ad6 /taint.c
parent27332437a2ed19419cce5a4de680085fd4d13c8d (diff)
downloadperl-8ac853655d9b744749adcb9687c13d99cdd6e9fb.tar.gz
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
Diffstat (limited to 'taint.c')
-rw-r--r--taint.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/taint.c b/taint.c
index 6776272782..c8c6800c46 100644
--- a/taint.c
+++ b/taint.c
@@ -8,9 +8,7 @@
#include "perl.h"
void
-taint_proper(f, s)
-const char *f;
-char *s;
+taint_proper(const char *f, char *s)
{
char *ug;
@@ -32,7 +30,7 @@ char *s;
}
void
-taint_env()
+taint_env(void)
{
SV** svp;
MAGIC* mg;