diff options
Diffstat (limited to 'tools/testing/ktest/compare-ktest-sample.pl')
-rwxr-xr-x | tools/testing/ktest/compare-ktest-sample.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tools/testing/ktest/compare-ktest-sample.pl b/tools/testing/ktest/compare-ktest-sample.pl index 9a571e71683c..a373a5bfff68 100755 --- a/tools/testing/ktest/compare-ktest-sample.pl +++ b/tools/testing/ktest/compare-ktest-sample.pl | |||
@@ -2,7 +2,9 @@ | |||
2 | 2 | ||
3 | open (IN,"ktest.pl"); | 3 | open (IN,"ktest.pl"); |
4 | while (<IN>) { | 4 | while (<IN>) { |
5 | # hashes are now used | ||
5 | if (/\$opt\{"?([A-Z].*?)(\[.*\])?"?\}/ || | 6 | if (/\$opt\{"?([A-Z].*?)(\[.*\])?"?\}/ || |
7 | /^\s*"?([A-Z].*?)"?\s*=>\s*/ || | ||
6 | /set_test_option\("(.*?)"/) { | 8 | /set_test_option\("(.*?)"/) { |
7 | $opt{$1} = 1; | 9 | $opt{$1} = 1; |
8 | } | 10 | } |
@@ -11,7 +13,7 @@ close IN; | |||
11 | 13 | ||
12 | open (IN, "sample.conf"); | 14 | open (IN, "sample.conf"); |
13 | while (<IN>) { | 15 | while (<IN>) { |
14 | if (/^\s*#?\s*(\S+)\s*=/) { | 16 | if (/^\s*#?\s*([A-Z]\S*)\s*=/) { |
15 | $samp{$1} = 1; | 17 | $samp{$1} = 1; |
16 | } | 18 | } |
17 | } | 19 | } |