]> git.imager.perl.org - imager.git/blobdiff - typemap
try to fix OSX warnings
[imager.git] / typemap
diff --git a/typemap b/typemap
index f6b5688c0d560a06427828f82445016e6503f6c4..52ad53cb8a96e088bb95641e2495c42bb8c0bcfc 100644 (file)
--- a/typemap
+++ b/typemap
@@ -14,7 +14,7 @@ HASH                  T_HVREF
 #############################################################################
 INPUT
 T_PTR_NULL
-       if (SvOK($arg)) $var = ($type)SvIV($arg);
+       if (SvOK($arg)) $var = INT2PTR($type,SvIV($arg));
        else $var = NULL
 #############################################################################
 OUTPUT