In S_init_perllib(), initialise perl5lib to NULL, to keep trace flow happy.
Nicholas Clark [Sun, 22 Feb 2009 17:37:26 +0000 (17:37 +0000)]
perl.c

diff --git a/perl.c b/perl.c
index 83922ab..0b03e41 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -4093,7 +4093,7 @@ S_init_perllib(pTHX)
 {
     dVAR;
 #ifndef VMS
-    const char *perl5lib;
+    const char *perl5lib = NULL;
 #endif
     const char *s;
 #ifdef WIN32