mktables: Add a little stress to the tests

This simply reverses the sort order so that the generated tests
use the highest ranges instead of the lowest, making it less likely that
tests will pass by chance; and also increasing performance issues in
finding matches.

diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index 03f122b..92f9d87 100644 (file)
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -4434,7 +4434,7 @@ sub trace { return main::trace(@_); }
         for my $try_hard (0, 1) {
 
             # Look through all the ranges for a usable code point.
-            for my $set ($self->ranges) {
+            for my $set (reverse $self->ranges) {
 
                 # Try the edge cases first, starting with the end point of the
                 # range.