1175288Skeramida# $FreeBSD$
2175288Skeramida
3213284Sjillesecho 1..14
4175288Skeramida
5175288SkeramidaREGRESSION_START($1)
6175288Skeramida
7263227SjmmvREGRESSION_TEST(`00', `tr abcde 12345 <${SRCDIR}/regress.in')
8263227SjmmvREGRESSION_TEST(`01', `tr 12345 abcde <${SRCDIR}/regress.in')
9263227SjmmvREGRESSION_TEST(`02', `tr -d aceg <${SRCDIR}/regress.in')
10263227SjmmvREGRESSION_TEST(`03', `tr "[[:lower:]]" "[[:upper:]]" <${SRCDIR}/regress.in')
11263227SjmmvREGRESSION_TEST(`04', `tr "[[:alpha:]]" . <${SRCDIR}/regress.in')
12263227SjmmvREGRESSION_TEST(`05', `tr "[[:lower:]]" "[[:upper:]]" <${SRCDIR}/regress.in | tr "[[:upper:]]" "[[:lower:]]"')
13263227SjmmvREGRESSION_TEST(`06', `tr "[[:digit:]]" "?" <${SRCDIR}/regress2.in')
14263227SjmmvREGRESSION_TEST(`07', `tr "[[:alnum:]]" "#" <${SRCDIR}/regress2.in')
15263227SjmmvREGRESSION_TEST(`08', `tr "[[:upper:]]" "[[:lower:]]" <${SRCDIR}/regress2.in | tr -d "[^[:alpha:]] "')
16175288SkeramidaREGRESSION_TEST(`09', `printf "\\f\\r\\n" | tr "\\014\\r" "?#"')
17175288SkeramidaREGRESSION_TEST(`0a', `printf "0xdeadbeef\\n" | tr "x[[:xdigit:]]" "?\$"')
18263227SjmmvREGRESSION_TEST(`0b', `(tr -cd "[[:xdigit:]]" <${SRCDIR}/regress2.in ; echo)')
19213284SjillesREGRESSION_TEST(`0c', `echo "[[[[]]]]" | tr -d "[=]=]"')
20213284SjillesREGRESSION_TEST(`0d', `echo "]=[" | tr -d "[=]"')
21175288Skeramida
22175288SkeramidaREGRESSION_END()
23