Sort @sstacklst correctly.

Reviewed-by: Rich Salz <rsalz@openssl.org>

diff --git a/util/mkstack.pl b/util/mkstack.pl
index 2bd96cd0c1ea81532331590a59dd533d00ef2ff9..f4520d4dd328184fba0c69f6ce83bbf456fe5807 100755 (executable)
--- a/util/mkstack.pl
+++ b/util/mkstack.pl
@@ -98,7 +98,7 @@ while(<IN>) {
 EOF
        }
 
-       foreach $type_thing (sort @sstacklst) {
+    foreach $type_thing (sort { $a->[0] cmp $b->[0]} @sstacklst) {
            my $t1 = $type_thing->[0];
            my $t2 = $type_thing->[1];
            $new_stackfile .= <<EOF;