lua alphabetically sort perl generated rocklib_aux functions

Change-Id: I6566c19a0fee630a5e250c1244159d5b488b57ff
This commit is contained in:
William Wilgus 2019-07-17 10:22:21 -05:00
parent 4e44c9c58c
commit 47639fb9ac

View file

@ -270,9 +270,12 @@ sub out_bool
return sprintf("\tbool result = %s;\n\tlua_pushboolean(L, result);\n\treturn 1;\n", $name);
}
#Sort the functions
my @sorted_functions = sort { @$a{'name'} cmp @$b{'name'} } @functions;
# Print the functions
my @valid_functions;
foreach my $function (@functions)
foreach my $function (@sorted_functions)
{
my $valid = 1, @arguments = ();
# Check for supported arguments