PL_ prefix to all perlvars, part1

   Builds and passes all tests at one limit i.e. -DPERL_GLOBAL_STRUCT

p4raw-id: //depot/ansiperl@1532

1 files changed, 3 insertions, 3 deletions

diff --git a/byterun.c b/byterun.c
index 26cb5ac1e9..d14b4c0ce0 100644
--- a/byterun.c
+++ b/byterun.c
@@ -842,21 +842,21 @@ void byterun(PerlIO *fp)
 	    {
 		opindex arg;
 		BGET_opindex(arg);
-		main_start = arg;
+		PL_main_start = arg;
 		break;
 	    }
 	  case INSN_MAIN_ROOT:		/* 117 */
 	    {
 		opindex arg;
 		BGET_opindex(arg);
-		main_root = arg;
+		PL_main_root = arg;
 		break;
 	    }
 	  case INSN_CURPAD:		/* 118 */
 	    {
 		svindex arg;
 		BGET_svindex(arg);
-		BSET_curpad(curpad, arg);
+		BSET_curpad(PL_curpad, arg);
 		break;
 	    }
 	  default: