[MLton-commit] r6686

Ville Laurikari ville at mlton.org
Mon Aug 4 22:27:06 PDT 2008


Tweaked to work on hppa-hpux11.23.

----------------------------------------------------------------------

U   mlton/trunk/runtime/platform/hpux.h

----------------------------------------------------------------------

Modified: mlton/trunk/runtime/platform/hpux.h
===================================================================
--- mlton/trunk/runtime/platform/hpux.h	2008-08-01 10:43:24 UTC (rev 6685)
+++ mlton/trunk/runtime/platform/hpux.h	2008-08-05 05:27:05 UTC (rev 6686)
@@ -42,6 +42,13 @@
 #error "HP-UX 11.00 is the oldest supported version."
 #endif
 
+#undef UINTPTR_MAX
+#define UINTPTR_MAX ULONG_MAX
+
+#ifndef SIZE_MAX
+#define SIZE_MAX ((size_t)SSIZE_MAX * 2 + 1)
+#endif
+
 #define HAS_FEROUND TRUE
 #define HAS_FPCLASSIFY TRUE
 #define HAS_MSG_DONTWAIT FALSE
@@ -99,10 +106,3 @@
 #define PRIx32 "x"
 #undef PRId32
 #define PRId32 "d"
-
-#define SIZE_MAX ((size_t)SSIZE_MAX * 2 + 1)
-
-#if HPUX_VERSION <= 1111
-#undef UINTPTR_MAX
-#define UINTPTR_MAX ULONG_MAX
-#endif




More information about the MLton-commit mailing list