This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Sort the Time::HiRes constants, one per line
authorJarkko Hietaniemi <jhi@iki.fi>
Wed, 13 Jan 2016 18:01:35 +0000 (13:01 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 13 Feb 2016 16:39:10 +0000 (11:39 -0500)
dist/Time-HiRes/Makefile.PL

index bbdd7a7..f6fdee6 100644 (file)
@@ -818,16 +818,21 @@ sub doMakefile {
 
 sub doConstants {
     if (eval {require ExtUtils::Constant; 1}) {
-       my @names = qw(CLOCK_HIGHRES CLOCK_MONOTONIC
-                      CLOCK_PROCESS_CPUTIME_ID
-                      CLOCK_REALTIME
-                      CLOCK_SOFTTIME
-                      CLOCK_THREAD_CPUTIME_ID
-                      CLOCK_TIMEOFDAY
-                      CLOCKS_PER_SEC
-                      ITIMER_REAL ITIMER_VIRTUAL ITIMER_PROF
-                      ITIMER_REALPROF
-                      TIMER_ABSTIME);
+       my @names = qw(
+                       CLOCKS_PER_SEC
+                       CLOCK_HIGHRES
+                       CLOCK_MONOTONIC
+                       CLOCK_PROCESS_CPUTIME_ID
+                       CLOCK_REALTIME
+                       CLOCK_SOFTTIME
+                       CLOCK_THREAD_CPUTIME_ID
+                       CLOCK_TIMEOFDAY
+                       ITIMER_PROF
+                       ITIMER_REAL
+                       ITIMER_REALPROF
+                       ITIMER_VIRTUAL
+                       TIMER_ABSTIME
+                      );
        foreach (qw (d_usleep d_ualarm d_gettimeofday d_getitimer d_setitimer
                     d_nanosleep d_clock_gettime d_clock_getres
                     d_clock d_clock_nanosleep d_hires_stat)) {