Change 11949 by jhi@alpha on 2001/09/08 19:48:20
PADOFFSET is used to cast pointers into integers,
if pointers are 64 bits and U32 32 bits,
bad things may happen, or at least warnings issued.
Affected files ...
... //depot/perl/op.h#94 edit
Differences ...
==== //depot/perl/op.h#94 (text) ====
Index: perl/op.h
--- perl/op.h.~1~ Sat Sep 8 14:00:05 2001
+++ perl/op.h Sat Sep 8 14:00:05 2001
@@ -23,7 +23,7 @@
* which may or may not check number of children).
*/
-typedef U32 PADOFFSET;
+typedef UV PADOFFSET;
#define NOT_IN_PAD ((PADOFFSET) -1)
#ifdef DEBUGGING_OPS
End of Patch.
