summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorRobin Barker <RMBarker@cpan.org>2005-06-20 14:47:37 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-06-20 16:28:38 +0000
commitfc376d6f866e8badb7a584773b4a795cfd391543 (patch)
treef58bf23b7a3a2a825c2c4f40d296feb599194837 /perl.h
parent6a4db598cf203f4a96397e83fcdb5b54bac1af8a (diff)
downloadperl-fc376d6f866e8badb7a584773b4a795cfd391543.tar.gz
FPTR2DPTR/DPTR2FPTR
Message-ID: <533D273D4014D411AB1D00062938C4D90849C6E4@hotel.npl.co.uk> p4raw-id: //depot/perl@24915
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl.h b/perl.h
index d3f83295be..262e00c4fb 100644
--- a/perl.h
+++ b/perl.h
@@ -1515,8 +1515,8 @@ typedef UVTYPE UV;
* The only feasible use is probably temporarily storing
* function pointers in a data pointer (such as a void pointer). */
-#define DPTR2FPTR(t,p) ((t)PTR2UV(p)) /* data pointer to function pointer */
-#define FPTR2DPTR(t,p) ((t)PTR2UV(p)) /* function pointer to data pointer */
+#define DPTR2FPTR(t,p) ((t)(PTRV)(p)) /* data pointer to function pointer */
+#define FPTR2DPTR(t,p) ((t)(PTRV)(p)) /* function pointer to data pointer */
#ifdef USE_LONG_DOUBLE
# if defined(HAS_LONG_DOUBLE) && LONG_DOUBLESIZE == DOUBLESIZE