may be uninitialized warning forperl@12003

Message-Id: <200109121800.TAA05250@tempest.npl.co.uk>

p4raw-id: //depot/perl@12007

1 files changed, 2 insertions, 2 deletions

diff --git a/sv.c b/sv.c
index a7883afd00..1505a4ff91 100644
--- a/sv.c
+++ b/sv.c
@@ -7664,8 +7664,8 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV
 	char c;
 	int i;
 	unsigned base = 0;
-	IV iv;
-	UV uv;
+	IV iv = 0;
+	UV uv = 0;
 	NV nv;
 	STRLEN have;
 	STRLEN need;