# ------------------------------------------------------------------------------------------------------- # Copyright (C) Microsoft. All rights reserved. # Licensed under the MIT license. See LICENSE.txt file in the project root for full license information. # ------------------------------------------------------------------------------------------------------- # if(@ARGV == 0 || (@ARGV == 1 && $ARGV[0] =~ /[-\/]\?/)) { print "Usage: perl perf.pl [options]\n\n"; print "First generate baseline run for all the perf benchmarks using:\n"; print "perl perf.pl -baseline -binary:\\ch.exe\n\n"; print "Then run the perf benchmarks with your changed binary:\n"; print "perl perf.pl -binary:\\ch.exe\n"; print "Use perftest.pl for advanced options\n"; exit(1); } else { #fail if unable to run any of the benchmarks if (system("perl perftest.pl -octane @ARGV")) { exit(1); } if (system("perl perftest.pl -kraken @ARGV")) { exit(1); } if (system("perl perftest.pl -sunspider @ARGV")) { exit(1); } if (system("perl perftest.pl -jetstream @ARGV")) { exit(1); } }