From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sun, 29 Jun 2003 09:48:50 +0000 (+0000)
Subject: argc, argv.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f98d840496025d33749be7bdcdba70b97bd142b8;p=p5sagit%2Fp5-mst-13.2.git

argc, argv.

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

diff --git a/perl.h b/perl.h
index 49bdb0a..66e6a67 100644
--- a/perl.h
+++ b/perl.h
@@ -1946,14 +1946,14 @@ typedef struct clone_params CLONE_PARAMS;
  * perl_parse() has had the chance to set up PL_tainting. */
 
 #ifndef EARLY_INIT3
-#  define EARLY_INIT3(argvp,argcp,envp) \
+#  define EARLY_INIT3(argcp,argvp,envp) \
 	STMT_START {		\
 		PL_earlytaint = doing_taint(argcp, argvp, envp); \
 	} STMT_END;
 #endif
 
 #ifndef EARLY_INIT2
-#  define EARLY_INIT2(argvp,argcp) \
+#  define EARLY_INIT2(argcp,argvp) \
 	STMT_START {		\
 		PL_earlytaint = doing_taint(argcp, argvp, 0); \
 	} STMT_END;