summaryrefslogtreecommitdiff
path: root/testsuite/tr.tests
blob: 5cca299ac92f22ab9c3a3d484152d6623456dc3f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
#!/bin/sh

# Copyright 2009 by Denys Vlasenko <vda.linux@googlemail.com>
# Licensed under GPLv2, see file LICENSE in this source tree.

. ./testing.sh

# testing "description" "arguments" "result" "infile" "stdin"

testing "tr does not treat [] in [a-z] as special" \
	"tr '[q-z]' '_Q-Z+'" \
	"_QWe+" "" "[qwe]"

testing "tr understands 0-9A-F" \
	"tr -cd '[0-9A-F]'" \
	"19AF" "" "19AFH\n"

optional FEATURE_TR_CLASSES
testing "tr understands [:xdigit:]" \
	"tr -cd '[:xdigit:]'" \
	"19AF" "" "19AFH\n"
SKIP=

optional FEATURE_TR_CLASSES
testing "tr does not stop after [:digit:]" \
	"tr '[:digit:]y-z' 111111111123" \
	"111abcx23\n" "" "789abcxyz\n"
SKIP=

optional FEATURE_TR_CLASSES
testing "tr has correct xdigit sequence" \
	"tr '[:xdigit:]Gg' 1111111151242222333330xX" \
	"#1111111151242222x333330X\n" "" \
	"#0123456789ABCDEFGabcdefg\n"
SKIP=

exit $FAILCOUNT