From: Vincent Pit <vince@profvince.com>
Date: Wed, 26 Oct 2011 19:56:42 +0000 (+0200)
Subject: Prettify the declaration of vmg_svt_copy()
X-Git-Tag: v0.47~5
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=10f8553bdaa6203542526b85e154d27aa48dc832;p=perl%2Fmodules%2FVariable-Magic.git

Prettify the declaration of vmg_svt_copy()
---

diff --git a/Magic.xs b/Magic.xs
index bf413ff..1e6a77c 100644
--- a/Magic.xs
+++ b/Magic.xs
@@ -1195,13 +1195,13 @@ STATIC int vmg_svt_free(pTHX_ SV *sv, MAGIC *mg) {
  return ret;
 }
 
-STATIC int vmg_svt_copy(pTHX_ SV *sv, MAGIC *mg, SV *nsv, const char *key,
-# if VMG_HAS_PERL_MAINT(5, 11, 0, 33256) || VMG_HAS_PERL(5, 12, 0)
-  I32 keylen
-# else
-  int keylen
-# endif
- ) {
+#if VMG_HAS_PERL_MAINT(5, 11, 0, 33256) || VMG_HAS_PERL(5, 12, 0)
+# define VMG_SVT_COPY_KEYLEN_TYPE I32
+#else
+# define VMG_SVT_COPY_KEYLEN_TYPE int
+#endif
+
+STATIC int vmg_svt_copy(pTHX_ SV *sv, MAGIC *mg, SV *nsv, const char *key, VMG_SVT_COPY_KEYLEN_TYPE keylen) {
  const vmg_wizard *w = vmg_wizard_from_mg_nocheck(mg);
  SV *keysv;
  int ret;