t/op/tr.t: Fix comment

This was confusing, and a likely interpretation is wrong: [i-j]  doesn't
match the gap characters in EBCDIC

diff --git a/t/op/tr.t b/t/op/tr.t
index 6c38893..508ab14 100644 (file)
--- a/t/op/tr.t
+++ b/t/op/tr.t
@@ -313,9 +313,8 @@ is($a, "X");
 ($a = "\x{200}") =~ tr/\x00-\x{100}/X/cs;
 is($a, "X");
 
-
-# Tricky on EBCDIC: while [a-z] [A-Z] must not match the gap characters,
-# (i-j, r-s, I-J, R-S), [\x89-\x91] [\xc9-\xd1] has to match them,
+# Tricky on EBCDIC: while [a-z] [A-Z] must not match the gap characters (as
+# well as i-j, r-s, I-J, R-S), [\x89-\x91] [\xc9-\xd1] has to match them,
 # from Karsten Sperling.
 
 $c = ($a = "\x89\x8a\x8b\x8c\x8d\x8f\x90\x91") =~ tr/\x89-\x91/X/;