Upgrade to Time-HiRes-1.89.

p4raw-id: //depot/perl@28747

diff --git a/ext/Time/HiRes/Changes b/ext/Time/HiRes/Changes
index 1dc4b3f..3a1e40f 100644 (file)
--- a/ext/Time/HiRes/Changes
+++ b/ext/Time/HiRes/Changes
@@ -1,9 +1,14 @@
 Revision history for Perl extension Time::HiRes.
 
+1.89   [2006-08-22]
+       - Const64() already appends an 'LL' (or i64), so provide LL and i64
+         forms for the IV_1E[679] (effects Win32 and Cygwin).
+       - the Changes entry for 1.88 talked about [IN]V_1[679], missing the 'E'.
+
 1.88   [2006-08-21]
        - clean up the g++ warnings in HiRes.xs, all of them
          about mixing integer and floating point, introduce
-         constants IV_1[679] and NV_1[679]
+         constants IV_1E[679] and NV_1E[679]
 
 1.87   [2006-02-13]
        - [rt.cpan.org #17442] 'make test' frequently fails under

diff --git a/ext/Time/HiRes/HiRes.pm b/ext/Time/HiRes/HiRes.pm
index c182184..3f5f7c2 100644 (file)
--- a/ext/Time/HiRes/HiRes.pm
+++ b/ext/Time/HiRes/HiRes.pm
@@ -21,7 +21,7 @@ require DynaLoader;
                 d_nanosleep d_clock_gettime d_clock_getres
                 d_clock d_clock_nanosleep);
        
-$VERSION = '1.88';
+$VERSION = '1.89';
 $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 

diff --git a/ext/Time/HiRes/HiRes.xs b/ext/Time/HiRes/HiRes.xs
index 236f38d..88f2593 100644 (file)
--- a/ext/Time/HiRes/HiRes.xs
+++ b/ext/Time/HiRes/HiRes.xs
@@ -37,9 +37,22 @@ extern "C" {
 }
 #endif
 
-#define IV_1E6 1000000L
-#define IV_1E7 10000000L
-#define IV_1E9 1000000000L
+#define IV_1E6 1000000
+#define IV_1E7 10000000
+#define IV_1E9 1000000000
+
+#ifdef Const64
+# ifdef __GNUC__
+#  define IV_1E6LL  1000000LL /* Needed because of Const64() ##-appends LL (or i64). */
+#  define IV_1E7LL  10000000LL
+#  define IV_1E9LL  1000000000LL
+# else
+#  define IV_1E6i64 1000000i64
+#  define IV_1E7i64 10000000i64
+#  define IV_1E9i64 1000000000i64
+# endif
+#endif
+
 #define NV_1E6 1000000.0
 #define NV_1E7 10000000.0
 #define NV_1E9 1000000000.0