From: Steve Peters <steve@fisharerojo.org>
Date: Fri, 6 Jan 2006 18:59:54 +0000 (+0000)
Subject: const'ing parameters killed the builds for djgpp.  Changes get the
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e670e57a01f4348af67815ccc0b2b168b078d7bd;p=p5sagit%2Fp5-mst-13.2.git

const'ing parameters killed the builds for djgpp.  Changes get the
Perl core, but not the modules, to compile cleanly.

p4raw-id: //depot/perl@26680
---

diff --git a/djgpp/djgpp.c b/djgpp/djgpp.c
index e2260d5..caa4640 100644
--- a/djgpp/djgpp.c
+++ b/djgpp/djgpp.c
@@ -222,7 +222,7 @@ do_spawn (pTHX_ char *cmd)
 }
 
 bool
-Perl_do_exec (pTHX_ char *cmd)
+Perl_do_exec (pTHX_ const char *cmd)
 {
     do_spawn2 (aTHX_ cmd,EXECF_EXEC);
     return FALSE;
diff --git a/djgpp/djgpp.h b/djgpp/djgpp.h
index a020ae9..bb792e2 100644
--- a/djgpp/djgpp.h
+++ b/djgpp/djgpp.h
@@ -34,7 +34,7 @@ int
 do_spawn (pTHX_ char *cmd);
 
 bool
-Perl_do_exec (pTHX_ char *cmd);
+Perl_do_exec (pTHX_ const char *cmd);
 
 void
 Perl_init_os_extras(pTHX);