1 files changed, 22 insertions, 7 deletions

diff --git a/testsuite/tr/tr-works b/testsuite/tr/tr-works
index 8753a3f28..b7a6e8df7 100644
--- a/testsuite/tr/tr-works
+++ b/testsuite/tr/tr-works
@@ -1,9 +1,24 @@
-echo "cbaab" | tr abc zyx > logfile.gnu
-echo "TESTING A B C" | tr [A-Z] [a-z] >> logfile.gnu
-echo abc[] | tr a[b AXB >> logfile.gnu
-
-echo "cbaab" | busybox tr abc zyx > logfile.bb
-echo "TESTING A B C" | busybox tr [A-Z] [a-z] >> logfile.bb
-echo abc[] | busybox tr a[b AXB >> logfile.bb
+run_tr ()
+{
+        echo -n "echo '$1' | tr '$2' '$3': "
+        echo "$1" | $bb tr "$2" "$3"
+        echo
+}
+tr_test ()
+{
+        run_tr "cbaab"          abc             zyx
+        run_tr "TESTING A B C"  '[A-Z]'         '[a-z]' 
+        run_tr "abc[]"          "a[b"           AXB
+        run_tr abc              '[:alpha:]'     A-ZA-Z
+        run_tr abc56            '[:alnum:]'     A-ZA-Zxxxxxxxxxx
+        run_tr 012              '[:digit:]'     abcdefghi
+        run_tr abc56            '[:lower:]'     '[:upper:]'
+        run_tr "        "       '[:space:]'     12345
+        run_tr "        "       '[:blank:]'     12
+        run_tr 'a b'            '[= =]'         X
+        run_tr "[:"             '[:'            ab
+}
 
+bb=        tr_test > logfile.gnu
+bb=busybox tr_test > logfile.bb
 cmp logfile.gnu logfile.bb