Silence bcc32 compiler warnings following change 24945

("Possible use of '%s' before definition")

p4raw-id: //depot/perl@24953

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_ctl.c b/pp_ctl.c
index e27d637a76..b6c72e84cd 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2048,7 +2048,7 @@ PP(pp_last)
     register PERL_CONTEXT *cx;
     I32 pop2 = 0;
     I32 gimme;
-    I32 optype;
+    I32 optype = 0;
     OP *nextop;
     SV **newsp;
     PMOP *newpm;