]> git.vpit.fr Git - perl/modules/Scalar-Vec-Util.git/commitdiff
Silence some redefine warnings for SVU_PP and SVU_SIZE
authorVincent Pit <vince@profvince.com>
Sat, 16 May 2009 07:42:16 +0000 (09:42 +0200)
committerVincent Pit <vince@profvince.com>
Sat, 16 May 2009 07:42:16 +0000 (09:42 +0200)
lib/Scalar/Vec/Util.pm

index 4e418cd701e206fbf46aebe5d340d8622b3f8b0e..2c0f723f0361dbfc8cd8403d7d7bca0c9e5e09e6 100644 (file)
@@ -23,11 +23,11 @@ BEGIN {
   XSLoader::load(__PACKAGE__, $VERSION);
   1;
  } or do {
-  sub SVU_PP   () { 1 }
-  sub SVU_SIZE () { 1 }
-  *vfill = *vfill_pp;
-  *vcopy = *vcopy_pp;
-  *veq   = *veq_pp;
+  *SVU_PP   = sub () { 1 };
+  *SVU_SIZE = sub () { 1 };
+  *vfill    = *vfill_pp;
+  *vcopy    = *vcopy_pp;
+  *veq      = *veq_pp;
  }
 }