From e2c1c2e5290bb415738ed38c6803fff5772d3c3b Mon Sep 17 00:00:00 2001
From: Jim Meyering <jim@meyering.net>
Date: Fri, 18 Jan 2002 19:50:28 +0000
Subject: Add these tests: tr '[==]' x tr '[::]' x they should fail, not get a
 failed assertion.

---
 tests/tr/Test.pm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'tests')

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
-- 
cgit v1.2.3-54-g00ecf