diff options
| -rwxr-xr-x | tools/testing/ktest/ktest.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tools/testing/ktest/ktest.pl b/tools/testing/ktest/ktest.pl index a022fb7d113d..52b7959cd513 100755 --- a/tools/testing/ktest/ktest.pl +++ b/tools/testing/ktest/ktest.pl | |||
| @@ -623,6 +623,10 @@ sub process_compare { | |||
| 623 | return $lval eq $rval; | 623 | return $lval eq $rval; |
| 624 | } elsif ($cmp eq "!=") { | 624 | } elsif ($cmp eq "!=") { |
| 625 | return $lval ne $rval; | 625 | return $lval ne $rval; |
| 626 | } elsif ($cmp eq "=~") { | ||
| 627 | return $lval =~ m/$rval/; | ||
| 628 | } elsif ($cmp eq "!~") { | ||
| 629 | return $lval !~ m/$rval/; | ||
| 626 | } | 630 | } |
| 627 | 631 | ||
| 628 | my $statement = "$lval $cmp $rval"; | 632 | my $statement = "$lval $cmp $rval"; |
| @@ -678,7 +682,7 @@ sub process_expression { | |||
| 678 | } | 682 | } |
| 679 | } | 683 | } |
| 680 | 684 | ||
| 681 | if ($val =~ /(.*)(==|\!=|>=|<=|>|<)(.*)/) { | 685 | if ($val =~ /(.*)(==|\!=|>=|<=|>|<|=~|\!~)(.*)/) { |
| 682 | my $ret = process_compare($1, $2, $3); | 686 | my $ret = process_compare($1, $2, $3); |
| 683 | if ($ret < 0) { | 687 | if ($ret < 0) { |
| 684 | die "$name: $.: Unable to process comparison\n"; | 688 | die "$name: $.: Unable to process comparison\n"; |
