From: Vincent Pit <perl@profvince.com>
Date: Sun, 5 Jun 2016 18:44:33 +0000 (+0200)
Subject: Fix the build on perl 5.8.0
X-Git-Tag: rt112246^2~7
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=c47d5c51367d1ad7d1dd0ebab3d11f83e9e7c19d;p=perl%2Fmodules%2FScope-Upper.git

Fix the build on perl 5.8.0

PERL_DEB() was not defined at that time.
---

diff --git a/xsh/util.h b/xsh/util.h
index dcc142c..2e40092 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__), \