X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FVPIT-XSHelpers.git;a=blobdiff_plain;f=xsh%2Futil.h;h=500472364a3545615e9b38ecd5781d318a1ce177;hp=c4be169306c4c7255a4dffb99f74e4471bf39a66;hb=18554226f6bc339e926df3740b5bf54a6a6ea2ca;hpb=1536a5dd62387d25653e80e8cfe2e0e86f5230ed

diff --git a/xsh/util.h b/xsh/util.h
index c4be169..5004723 100644
--- a/xsh/util.h
+++ b/xsh/util.h
@@ -13,7 +13,12 @@
 # if XSH_HAS_PERL(5, 8, 9) || XSH_HAS_PERL(5, 9, 3)
 #  define XSH_ASSERT(C) assert(C)
 # else
-#  define XSH_ASSERT(C) PERL_DEB( \
+#  ifdef PERL_DEB
+#   define XSH_DEB(X) PERL_DEB(X)
+#  else
+#   define XSH_DEB(X) (X)
+#  endif
+#  define XSH_ASSERT(C) XSH_DEB( \
    ((C) ? ((void) 0)           \
         : (Perl_croak_nocontext("Assertion %s failed: file \"" __FILE__  \
                                  "\", line %d", STRINGIFY(C), __LINE__), \
@@ -23,13 +28,6 @@
 # define XSH_ASSERT(C)
 #endif
 
-#undef VOID2
-#ifdef __cplusplus
-# define VOID2(T, P) static_cast<T>(P)
-#else
-# define VOID2(T, P) (P)
-#endif
-
 #ifndef STMT_START
 # define STMT_START do
 #endif