From fdb55e82abaea01f75df90b9889cacde7716f985 Mon Sep 17 00:00:00 2001
From: Marcelo Matus <mmatus@acms.arizona.edu>
Date: Fri, 10 Feb 2006 09:47:39 +0000
Subject: [PATCH] add macors for PTR2IV INT2PTR when needed, bug #1208765

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8771 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 SWIG/Lib/perl5/perlrun.swg | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/SWIG/Lib/perl5/perlrun.swg b/SWIG/Lib/perl5/perlrun.swg
index 4f7f1a4cb..01ff53f53 100644
--- a/SWIG/Lib/perl5/perlrun.swg
+++ b/SWIG/Lib/perl5/perlrun.swg
@@ -93,7 +93,16 @@ extern "C" {
 
 #ifndef pTHX_
 #define pTHX_
+#endif   
+
+#ifndef PTR2IV
+# define PTR2IV(d) (IV)(d)
 #endif
+ 
+#ifndef INT2PTR
+# define INT2PTR(any,d) (any)(d)
+#endif
+
 
 #include <string.h>
 #ifdef __cplusplus