[Orca-checkins] r302 - in trunk/orca: . packages/Time-HiRes-1.57 packages/Time-HiRes-1.59

Blair Zajac blair at orcaware.com
Sat Apr 10 17:01:08 PDT 2004


Author: blair
Date: Sat Apr 10 17:00:17 2004
New Revision: 302

Added:
   trunk/orca/packages/Time-HiRes-1.59/
      - copied from r301, trunk/orca/packages/Time-HiRes-1.57/
Removed:
   trunk/orca/packages/Time-HiRes-1.57/
Modified:
   trunk/orca/INSTALL
   trunk/orca/configure.in
   trunk/orca/packages/Time-HiRes-1.59/Changes
   trunk/orca/packages/Time-HiRes-1.59/HiRes.pm
   trunk/orca/packages/Time-HiRes-1.59/HiRes.xs
   trunk/orca/packages/Time-HiRes-1.59/META.yml
Log:
Upgrade Time::HiRes from 1.57 to 1.59.

* INSTALL (Determine which Perl modules need compiling and installing):
  Update all references to Time::HiRes's version number from 1.57 to
  1.59.

* configure.in:
  Bump Time::HiRes's version number to 1.59.

* packages/Time-HiRes-1.59:
  Renamed from packages/Time-HiRes-1.57.  Directory contents updated
  from Time-HiRes-1.59.tar.gz.


Modified: trunk/orca/INSTALL
==============================================================================
--- trunk/orca/INSTALL	(original)
+++ trunk/orca/INSTALL	Sat Apr 10 17:00:17 2004
@@ -177,7 +177,7 @@
     Math::IntervalSearch    >= 1.05        >= 1.05      1.05
     RRDs                    >= 1.000461    >= 1.0.46    1.0.46
     Storable                >= 2.12        >= 2.12      2.12
-    Time::HiRes             Not required by Orca        1.57
+    Time::HiRes             Not required by Orca        1.59
 
     All seven of these modules are included with the Orca distribution
     in the packages directory.  When you configure Orca in step 3),
@@ -278,10 +278,10 @@
 
     Time::HiRes
 
-      http://www.perl.com/CPAN/authors/id/J/JH/JHI/Time-HiRes-1.57.tar.gz
+      http://www.perl.com/CPAN/authors/id/J/JH/JHI/Time-HiRes-1.59.tar.gz
 
-      % gunzip -c Time-HiRes-1.57.tar.gz | tar xvf -
-      % cd Time-HiRes-1.57
+      % gunzip -c Time-HiRes-1.59.tar.gz | tar xvf -
+      % cd Time-HiRes-1.59
       % perl Makefile.PL
       % make
       % make test

Modified: trunk/orca/configure.in
==============================================================================
--- trunk/orca/configure.in	(original)
+++ trunk/orca/configure.in	Sat Apr 10 17:00:17 2004
@@ -41,8 +41,8 @@
 RRDTOOL_VER=1.000461
 STORABLE_DIR=Storable-2.12
 STORABLE_VER=2.12
-TIME_HIRES_DIR=Time-HiRes-1.57
-TIME_HIRES_VER=1.57
+TIME_HIRES_DIR=Time-HiRes-1.59
+TIME_HIRES_VER=1.59
 
 AC_SUBST(COMPRESS_ZLIB_DIR)
 AC_SUBST(DATA_DUMPER_DIR)

Modified: trunk/orca/packages/Time-HiRes-1.59/Changes
==============================================================================
--- trunk/orca/packages/Time-HiRes-1.57/Changes	(original)
+++ trunk/orca/packages/Time-HiRes-1.59/Changes	Sat Apr 10 17:00:17 2004
@@ -1,8 +1,17 @@
 Revision history for Perl extension Time::HiRes.
 
+1.59
+	- Change the Win32 recalibration limit to 0.5 seconds and tweak
+	  the documentation to blather less about the gory details of the
+	  Win32 implementation and more about the complications in general
+	  of meddling with the system clock.
+
+1.58
+	- Document the 1.57 change better.
+
 1.57
-	- Window/Cygwin: if the performance counter drifts by more than
-	  two seconds from the system clock (due to ntp adjustments,
+	- Win32/Cygwin/MinGW: if the performance counter drifts by more
+	  than two seconds from the system clock (due to ntp adjustments,
 	  for example), recalibrate our internal counter: from Jan Dubois,
 	  based on [cpan #5933] by Jerry D. Hedden.
 

Modified: trunk/orca/packages/Time-HiRes-1.59/HiRes.pm
==============================================================================
--- trunk/orca/packages/Time-HiRes-1.57/HiRes.pm	(original)
+++ trunk/orca/packages/Time-HiRes-1.59/HiRes.pm	Sat Apr 10 17:00:17 2004
@@ -15,7 +15,7 @@
 		 d_usleep d_ualarm d_gettimeofday d_getitimer d_setitimer
 		 d_nanosleep);
 	
-$VERSION = '1.57';
+$VERSION = '1.59';
 $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 
@@ -329,8 +329,16 @@
 =head1 CAVEATS
 
 Notice that the core C<time()> maybe rounding rather than truncating.
-What this means is that the core C<time()> may be reporting the time as one second
-later than C<gettimeofday()> and C<Time::HiRes::time()>.
+What this means is that the core C<time()> may be reporting the time
+as one second later than C<gettimeofday()> and C<Time::HiRes::time()>.
+
+Adjusting the system clock (either manually or by services like ntp)
+may cause problems, especially for long running programs that assume
+a monotonously increasing time (note that all platforms do not adjust
+time as gracefully as UNIX ntp does).  For example in Win32 (and derived
+platforms like Cygwin and MinGW) the Time::HiRes::time() may temporarily
+drift off from the system clock (and the original time())  by up to 0.5
+seconds. Time::HiRes will notice this eventually and recalibrate.
 
 =head1 AUTHORS
 

Modified: trunk/orca/packages/Time-HiRes-1.59/HiRes.xs
==============================================================================
--- trunk/orca/packages/Time-HiRes-1.57/HiRes.xs	(original)
+++ trunk/orca/packages/Time-HiRes-1.59/HiRes.xs	Sat Apr 10 17:00:17 2004
@@ -181,11 +181,11 @@
 #undef gettimeofday
 #define gettimeofday(tp, not_used) _gettimeofday(aTHX_ tp, not_used)
 
-/* If the performance counter delta drifts more than 2 seconds from the
- * system time then we recalibrate to system time.  This means we may
+/* If the performance counter delta drifts more than 0.5 seconds from the
+ * system time then we recalibrate to the system time.  This means we may
  * move *backwards* in time! */
 
-#define MAX_DIFF Const64(20000000)
+#define MAX_DIFF Const64(5000000)
 
 static int
 _gettimeofday(pTHX_ struct timeval *tp, void *not_used)

Modified: trunk/orca/packages/Time-HiRes-1.59/META.yml
==============================================================================
--- trunk/orca/packages/Time-HiRes-1.57/META.yml	(original)
+++ trunk/orca/packages/Time-HiRes-1.59/META.yml	Sat Apr 10 17:00:17 2004
@@ -1,7 +1,7 @@
 # http://module-build.sourceforge.net/META-spec.html
 #XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
 name:         Time-HiRes
-version:      1.57
+version:      1.59
 version_from: HiRes.pm
 installdirs:  perl
 requires:



More information about the Orca-checkins mailing list