summaryrefslogtreecommitdiff
path: root/embed.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-09-15 05:09:14 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-09-15 05:09:14 +0000
commitc88bfdbcc245c3005d3bcae6769e4b8c2e0d405c (patch)
tree0fab13230dfad6f53b4acaffeb169764cade63d9 /embed.h
parent93e0d802ea397ac8d787d7b152d2b243a0db42e7 (diff)
downloadperl-c88bfdbcc245c3005d3bcae6769e4b8c2e0d405c.tar.gz
addendum to change#4136 (from Robin Barker <rmb1@cise.npl.co.uk>)
p4raw-link: @4136 on //depot/cfgperl: 564319723c2c18fa4801cd77e0d203a582b4d5a3 p4raw-id: //depot/perl@4162
Diffstat (limited to 'embed.h')
-rw-r--r--embed.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/embed.h b/embed.h
index ab68e0ec4b..7cde885829 100644
--- a/embed.h
+++ b/embed.h
@@ -5325,8 +5325,8 @@
*/
#if !defined(PERL_CORE)
-# define sv_setptrobj(rv,ptr,name) sv_setref_iv(rv,name,(IV)ptr)
-# define sv_setptrref(rv,ptr) sv_setref_iv(rv,Nullch,(IV)ptr)
+# define sv_setptrobj(rv,ptr,name) sv_setref_iv(rv,name,PTR2IV(ptr))
+# define sv_setptrref(rv,ptr) sv_setref_iv(rv,Nullch,PTR2IV(ptr))
#endif
#if !defined(PERL_CORE) && !defined(PERL_NOCOMPAT) && !defined(PERL_BINCOMPAT_5005)