diff options
| -rwxr-xr-x | tests/tr/Test.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/tr/Test.pm b/tests/tr/Test.pm index 38eaa9d73..002b723ac 100755 --- a/tests/tr/Test.pm +++ b/tests/tr/Test.pm @@ -98,6 +98,11 @@ my @tv = ( ['ross-5', '-dc ' . q|'[:lower:]'|, '', '', 0], ['ross-6', '-dc ' . q|'[:upper:]'|, '', '', 0], +# Ensure that these fail. +# Prior to 2.0.20, each would evoke a failed assertion. +['empty-eq', q|'[==]' x|, '', '', 1], +['empty-cc', q|'[::]' x|, '', '', 1], + ); sub test_vector |