From ccf6bcc1ea08403f9081ce608009322e1b5091f6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
Date: Thu, 11 May 2017 13:29:57 +0200
Subject: [PATCH] Provide SvPVCLEAR() macro
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

To build with perl <= 5.25.5.

Signed-off-by: Petr Písař <ppisar@redhat.com>
---
 Storable.xs | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Storable.xs b/Storable.xs
index 9ba48be..f7d253c 100644
--- a/Storable.xs
+++ b/Storable.xs
@@ -26,6 +26,11 @@
 #include "ppport.h"             /* handle old perls */
 #endif
 
+/* SvPVCLEAR was added after 5.25.5 and ppport.h does not provide it */
+#if !defined SvPVCLEAR
+#define SvPVCLEAR(x) sv_setpvs((x), "")
+#endif
+
 #if 0
 #define DEBUGME /* Debug mode, turns assertions on as well */
 #define DASSERT /* Assertion mode */
-- 
2.9.3