Sort @sstacklst correctly.
[openssl.git] / util / mkstack.pl
index 073902759ce06435c70ce9e6c71190115e6bee1b..8daa1f85519b7acd65e95c54bcc3d05cbe8269fc 100755 (executable)
@@ -283,7 +283,7 @@ foreach $type_thing (sort @stacklst) {
 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;