This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Don't attempt to use non-standard <memory.h>
[perl5.git] / pad.h
diff --git a/pad.h b/pad.h
index 7ed1033..56d88ab 100644 (file)
--- a/pad.h
+++ b/pad.h
 
 /* offsets within a pad */
 
-#if PTRSIZE == 4
-typedef U32TYPE PADOFFSET;
-#else
-#   if PTRSIZE == 8
-typedef U64TYPE PADOFFSET;
-#   endif
-#endif
+typedef SSize_t PADOFFSET; /* signed so that -1 is a valid value */
 #define NOT_IN_PAD ((PADOFFSET) -1)
 
 /* B.xs expects the first members of these two structs to line up