warnings and const violations identified by compiling in C++ mode

with GCC v2.95

p4raw-id: //depot/perl@4461

1 files changed, 1 insertions, 1 deletions

diff --git a/perlapi.c b/perlapi.c
index adfb4afd85..41dd32a387 100644
--- a/perlapi.c
+++ b/perlapi.c
@@ -4203,7 +4203,7 @@ Perl_taint_env(pTHXo)
 
 #undef  Perl_taint_proper
 void
-Perl_taint_proper(pTHXo_ const char* f, char* s)
+Perl_taint_proper(pTHXo_ const char* f, const char* s)
 {
     ((CPerlObj*)pPerl)->Perl_taint_proper(f, s);
 }