From: Steve Peters Date: Tue, 22 Aug 2006 17:41:33 +0000 (+0000) Subject: Update to Time-HiRes-1.90. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f445b110c3c62d0310e21171d6cd3346a5a19280;p=p5sagit%2Fp5-mst-13.2.git Update to Time-HiRes-1.90. p4raw-id: //depot/perl@28748 --- diff --git a/ext/Time/HiRes/Changes b/ext/Time/HiRes/Changes index 3a1e40f..a357ad6 100644 --- a/ext/Time/HiRes/Changes +++ b/ext/Time/HiRes/Changes @@ -1,8 +1,14 @@ Revision history for Perl extension Time::HiRes. +1.90 [2006-08-22] + - tweak still needed for Const64(), from Jerry Hedden + - get a freshly generated ppport.h + - update Copyright years + 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). + forms for the IV_1E[679] (effects Win32 and Cygwin), reported by + Jerry Hedden. - the Changes entry for 1.88 talked about [IN]V_1[679], missing the 'E'. 1.88 [2006-08-21] diff --git a/ext/Time/HiRes/HiRes.pm b/ext/Time/HiRes/HiRes.pm index 3f5f7c2..f032d9b 100644 --- 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.89'; +$VERSION = '1.90'; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -492,7 +492,7 @@ G. Aas Copyright (c) 1996-2002 Douglas E. Wegscheid. All rights reserved. -Copyright (c) 2002, 2003, 2004, 2005 Jarkko Hietaniemi. All rights reserved. +Copyright (c) 2002, 2003, 2004, 2005, 2006 Jarkko Hietaniemi. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff --git a/ext/Time/HiRes/HiRes.xs b/ext/Time/HiRes/HiRes.xs index 88f2593..df0a436 100644 --- a/ext/Time/HiRes/HiRes.xs +++ b/ext/Time/HiRes/HiRes.xs @@ -2,7 +2,7 @@ * * Copyright (c) 1996-2002 Douglas E. Wegscheid. All rights reserved. * - * Copyright (c) 2002,2003,2004,2005 Jarkko Hietaniemi. All rights reserved. + * Copyright (c) 2002,2003,2004,2005,2006 Jarkko Hietaniemi. All rights reserved. * * This program is free software; you can redistribute it and/or modify * it under the same terms as Perl itself. @@ -41,18 +41,6 @@ extern "C" { #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 @@ -135,6 +123,18 @@ START_MY_CXT #endif #define EPOCH_BIAS Const64(116444736000000000) +#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 + /* NOTE: This does not compute the timezone info (doing so can be expensive, * and appears to be unsupported even by glibc) */