You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by jo...@apache.org on 2011/06/01 00:55:24 UTC
[lucy-commits] svn commit: r1129954 -
/incubator/lucy/trunk/devel/bin/gen_charmonizer_makefiles.pl
Author: joes
Date: Tue May 31 22:55:24 2011
New Revision: 1129954
URL: http://svn.apache.org/viewvc?rev=1129954&view=rev
Log:
better way of dealing with sort's overzealous prototype
Modified:
incubator/lucy/trunk/devel/bin/gen_charmonizer_makefiles.pl
Modified: incubator/lucy/trunk/devel/bin/gen_charmonizer_makefiles.pl
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/devel/bin/gen_charmonizer_makefiles.pl?rev=1129954&r1=1129953&r2=1129954&view=diff
==============================================================================
--- incubator/lucy/trunk/devel/bin/gen_charmonizer_makefiles.pl (original)
+++ incubator/lucy/trunk/devel/bin/gen_charmonizer_makefiles.pl Tue May 31 22:55:24 2011
@@ -186,17 +186,17 @@ find \&wanted, "src";
my ($unix_test_blocks, $unix_tests) = unix_tests @tests;
gen_makefile
test_execs => join(" ", sort @$unix_tests),
- objs => join(" ", sort {$a cmp $b} unix_obj @srcs),
- test_objs => join(" ", sort {$a cmp $b} unix_obj @tests),
- headers => join(" ", sort {$a cmp $b} unix_obj @hdrs),
+ objs => join(" ", sort +unix_obj @srcs),
+ test_objs => join(" ", sort +unix_obj @tests),
+ headers => join(" ", sort +unix_obj @hdrs),
test_blocks => join("\n", sort @$unix_test_blocks);
my ($win_test_blocks, $win_tests) = win_tests @tests;
gen_makefile_win
test_execs => join(" ", sort @$win_tests),
- objs => join(" ", sort {$a cmp $b} win_obj @srcs),
- test_objs => join(" ", sort {$a cmp $b} win_obj @tests),
- headers => join(" ", sort {$a cmp $b} win_obj @hdrs),
+ objs => join(" ", sort +win_obj @srcs),
+ test_objs => join(" ", sort +win_obj @tests),
+ headers => join(" ", sort +win_obj @hdrs),
test_blocks => join("\n", sort @$win_test_blocks);
__END__