X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScalar-Vec-Util.git;a=blobdiff_plain;f=Util.xs;h=d878813aba6d96e200d7dea679b29923683bfa06;hp=6342936fc2d33d63cab065319f8a85324b7c8a3a;hb=HEAD;hpb=afa3e8431d5029fe9877128b2bdfd446fec7e230

diff --git a/Util.xs b/Util.xs
index 6342936..d878813 100644
--- a/Util.xs
+++ b/Util.xs
@@ -11,6 +11,10 @@
 
 #include "bitvect.h"
 
+#ifndef SVU_SIZE
+# define SVU_SIZE (CHAR_BIT * sizeof(BV_UNIT))
+#endif
+
 static size_t svu_validate_uv(pTHX_ SV *sv, const char *desc) {
 #define svu_validate_uv(S, D) svu_validate_uv(aTHX_ (S), (D))
  IV i;