Re: how to build with -DPERL_MEM_LOG ?

Message-ID: <Pine.SOC.4.62.0602031129530.9630@maxwell.phys.lafayette.edu>

p4raw-id: //depot/perl@27204

diff --git a/x2p/a2p.h b/x2p/a2p.h
index 92a2bd8..db09edd 100644 (file)
--- a/x2p/a2p.h
+++ b/x2p/a2p.h
@@ -73,6 +73,18 @@
 #endif /* USE_NEXT_CTYPE */
 
 #define MEM_SIZE Size_t
+#ifdef PERL_MEM_LOG
+/* Blindly copied from ../perl.h. -- AD 2/2006. */
+/* Configure gets this right but the UTS compiler gets it wrong.
+   -- Hal Morris <hom00@utsglobal.com> */
+#  ifdef UTS
+#    undef  UVTYPE
+#    define UVTYPE unsigned
+#  endif
+
+  typedef IVTYPE IV;
+  typedef UVTYPE UV;
+#endif
 
 #ifndef STANDARD_C
     Malloc_t malloc (MEM_SIZE nbytes);