diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-29 18:30:03 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-29 18:30:03 +0000 |
commit | ceaa1e840251e0447c45486cb406be00f6a0635d (patch) | |
tree | 81d990cdadb008c93f5908f517f11e66ea665fb7 /ext/Storable | |
parent | b07ccbd7c339bb1fee43f504731d64705bc81fc2 (diff) | |
download | perl-ceaa1e840251e0447c45486cb406be00f6a0635d.tar.gz |
Nail the ID 20000828.023.
p4raw-id: //depot/perl@6891
Diffstat (limited to 'ext/Storable')
-rw-r--r-- | ext/Storable/Storable.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Storable/Storable.xs b/ext/Storable/Storable.xs index 5913b0ecf9..cd2a76b551 100644 --- a/ext/Storable/Storable.xs +++ b/ext/Storable/Storable.xs @@ -267,7 +267,7 @@ typedef struct stcxt { #define dSTCXT_PTR(T,name) \ T name = (T)(perinterp_sv && SvIOK(perinterp_sv)\ - ? SvIVX(perinterp_sv) : NULL) + ? INT2PTR(T, SvIVX(perinterp_sv)) : NULL) #define dSTCXT \ dSTCXT_SV; \ dSTCXT_PTR(stcxt_t *, cxt) |