| OLD | NEW |
|---|
| (Empty) |
| 1 #!/usr/bin/perl | |
| 2 # ******************************************************************** | |
| 3 # * COPYRIGHT: | |
| 4 # * Copyright (c) 2005-2013, International Business Machines Corporation and | |
| 5 # * others. All Rights Reserved. | |
| 6 # ******************************************************************** | |
| 7 | |
| 8 #use strict; | |
| 9 | |
| 10 require "../perldriver/Common.pl"; | |
| 11 | |
| 12 use lib '../perldriver'; | |
| 13 | |
| 14 use PerfFramework; | |
| 15 | |
| 16 | |
| 17 | |
| 18 my $options = { | |
| 19 "title"=>"Uset performance: ICU (".$ICUPreviousVersion." and ".$ICULatestVer
sion.")", | |
| 20 "headers"=>"ICU".$ICUPreviousVersion." ICU".$ICULatestVersion, | |
| 21 "operationIs"=>"unicode string", | |
| 22 "passes"=>"1", | |
| 23 "time"=>"2", | |
| 24 #"outputType"=>"HTML", | |
| 25 "dataDir"=>"Not Using Data Files", | |
| 26 "outputDir"=>"../results" | |
| 27 }; | |
| 28 | |
| 29 # programs | |
| 30 # tests will be done for all the programs. Results will be stored and connected | |
| 31 my $p1, $p2; | |
| 32 if ($OnWindows) { | |
| 33 $p1 = "cd ".$ICUPrevious."/bin && ".$ICUPathPrevious."/usetperf/$WindowsPlat
form/Release/usetperf.exe"; | |
| 34 $p2 = "cd ".$ICULatest."/bin && ".$ICUPathLatest."/usetperf/$WindowsPlatform
/Release/usetperf.exe"; | |
| 35 } else { | |
| 36 $p1 = "LD_LIBRARY_PATH=".$ICUPrevious."/source/lib:".$ICUPrevious."/source/t
ools/ctestfw ".$ICUPathPrevious."/usetperf/usetperf"; | |
| 37 $p2 = "LD_LIBRARY_PATH=".$ICULatest."/source/lib:".$ICULatest."/source/tools
/ctestfw ".$ICUPathLatest."/usetperf/usetperf"; | |
| 38 } | |
| 39 | |
| 40 my $tests = { | |
| 41 "titlecase_letter/add", ["$p1,titlecase_letter_add", "$p2,titlecase_letter_
add"], | |
| 42 "titlecase_letter/contains", ["$p1,titlecase_letter_contains", "$p2,titleca
se_letter_contains"], | |
| 43 "titlecase_letter/iterator", ["$p1,titlecase_letter_iterator", "$p2,titleca
se_letter_iterator"], | |
| 44 "unassigned/add", ["$p1,unassigned_add", "$p2,unassigned_add"], | |
| 45 "unassigned/contains", ["$p1,unassigned_contains", "$p2,unassigned_contains
"], | |
| 46 "unassigned/iterator", ["$p1,unassigned_iterator", "$p2,unassigned_iterator
"], | |
| 47 "pattern1", ["$p1,pattern1", "$p2,pattern1"], | |
| 48 "pattern2", ["$p1,pattern2", "$p2,pattern2"], | |
| 49 "pattern3", ["$p1,pattern3", "$p2,pattern3"], | |
| 50 }; | |
| 51 | |
| 52 my $dataFiles = { | |
| 53 }; | |
| 54 | |
| 55 runTests($options, $tests, $dataFiles); | |
| OLD | NEW |
|---|
Chromium Code Reviews
Issue 2435373002:
Delete source/test (Closed)
