Sort the enums in a stable manner

This commit is contained in:
omniavinco 2014-10-16 23:46:52 +09:00
parent bffebf81cc
commit 933e322dd5

View File

@ -155,11 +155,15 @@ sub output_tokens($$)
} else {
if (${$tbl}{$b} =~ /_/) {
1
} else {
if (hex ${$tbl}{$a} eq hex ${$tbl}{$b}) {
$a cmp $b
} else {
hex ${$tbl}{$a} <=> hex ${$tbl}{$b}
}
}
}
}
} keys %{$tbl};
print "\n";
} else {