mirror of
https://git.savannah.gnu.org/git/gnulib.git
synced 2025-08-16 01:22:18 +03:00
6aefe07bd8
* modules/readtokens-tests: New file. * tests/test-readtokens.c: New file. * tests/test-readtokens.sh: New file.
24 lines
544 B
Bash
Executable File
24 lines
544 B
Bash
Executable File
#!/bin/sh
|
|
. "${srcdir=.}/init.sh"; path_prepend_ .
|
|
|
|
fail=0
|
|
|
|
test-readtokens || fail=1
|
|
|
|
# Simplest case.
|
|
echo a:b:c: > exp || fail=1
|
|
printf a:b:c | test-readtokens : > out 2>&1 || fail=1
|
|
compare exp out || fail=1
|
|
|
|
# Use NUL as the delimiter.
|
|
echo a:b:c: > exp || fail=1
|
|
printf 'a\0b\0c' | test-readtokens '\0' > out 2>&1 || fail=1
|
|
compare exp out || fail=1
|
|
|
|
# Two delimiter bytes, and adjacent delimiters in the input.
|
|
echo a:b:c: > exp || fail=1
|
|
printf a:-:b-:c:: | test-readtokens :- > out 2>&1 || fail=1
|
|
compare exp out || fail=1
|
|
|
|
Exit $fail
|