In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/75e935adf0585621c7dfb464674056f199c35824?hp=3e14cc163c638e063c3e2a746616e50ecf58e23e>
- Log ----------------------------------------------------------------- commit 75e935adf0585621c7dfb464674056f199c35824 Author: Tony Cook <[email protected]> Date: Mon Sep 23 14:54:38 2019 +1000 bump $Time::HiRes::VERSION ----------------------------------------------------------------------- Summary of changes: dist/Time-HiRes/HiRes.pm | 2 +- dist/Time-HiRes/HiRes.xs | 8 ++++++++ 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/dist/Time-HiRes/HiRes.pm b/dist/Time-HiRes/HiRes.pm index 67aa01b358..433ca31a05 100644 --- a/dist/Time-HiRes/HiRes.pm +++ b/dist/Time-HiRes/HiRes.pm @@ -50,7 +50,7 @@ our @EXPORT_OK = qw (usleep sleep ualarm alarm gettimeofday time tv_interval stat lstat utime ); -our $VERSION = '1.9763'; +our $VERSION = '1.9764'; our $XS_VERSION = $VERSION; $VERSION = eval $VERSION; diff --git a/dist/Time-HiRes/HiRes.xs b/dist/Time-HiRes/HiRes.xs index 8684dd4457..8002472866 100644 --- a/dist/Time-HiRes/HiRes.xs +++ b/dist/Time-HiRes/HiRes.xs @@ -139,6 +139,14 @@ typedef struct { unsigned __int64 reset_time; } my_cxt_t; +/* Visual C++ 2013 and older don't have the timespec structure */ +# if defined(_MSC_VER) && _MSC_VER < 1900 +struct timespec { + time_t tv_sec; + long tv_nsec; +}; +# endif + START_MY_CXT /* Number of 100 nanosecond units from 1/1/1601 to 1/1/1970 */ -- Perl5 Master Repository
