diff options
Diffstat (limited to 'gnulib/tests/test-xstrtoll.sh')
m--------- | gnulib | 0 | ||||
-rwxr-xr-x | gnulib/tests/test-xstrtoll.sh | 67 |
2 files changed, 67 insertions, 0 deletions
diff --git a/gnulib b/gnulib deleted file mode 160000 -Subproject 443bc5ffcf7429e557f4a371b0661abe98ddbc1 diff --git a/gnulib/tests/test-xstrtoll.sh b/gnulib/tests/test-xstrtoll.sh new file mode 100755 index 0000000..78a08c8 --- /dev/null +++ b/gnulib/tests/test-xstrtoll.sh @@ -0,0 +1,67 @@ +#!/bin/sh +: ${srcdir=.} +. "$srcdir/init.sh"; path_prepend_ . + +too_big=99999999999999999999999999999999999999999999999999999999999999999999 +result=0 + +# test xstrtoll +test-xstrtoll 1 >> out 2>&1 || result=1 +test-xstrtoll -1 >> out 2>&1 || result=1 +test-xstrtoll 1k >> out 2>&1 || result=1 +test-xstrtoll ${too_big}h >> out 2>&1 && result=1 +test-xstrtoll $too_big >> out 2>&1 && result=1 +test-xstrtoll x >> out 2>&1 && result=1 +test-xstrtoll 9x >> out 2>&1 && result=1 +test-xstrtoll 010 >> out 2>&1 || result=1 +# suffix without integer is valid +test-xstrtoll MiB >> out 2>&1 || result=1 + +# test xstrtoull +test-xstrtoull 1 >> out 2>&1 || result=1 +test-xstrtoull -1 >> out 2>&1 && result=1 +test-xstrtoull 1k >> out 2>&1 || result=1 +test-xstrtoull ${too_big}h >> out 2>&1 && result=1 +test-xstrtoull $too_big >> out 2>&1 && result=1 +test-xstrtoull x >> out 2>&1 && result=1 +test-xstrtoull 9x >> out 2>&1 && result=1 +test-xstrtoull 010 >> out 2>&1 || result=1 +test-xstrtoull MiB >> out 2>&1 || result=1 + +# Find out how to remove carriage returns from output. Solaris /usr/ucb/tr +# does not understand '\r'. +if echo solaris | tr -d '\r' | grep solais > /dev/null; then + cr='\015' +else + cr='\r' +fi + +# normalize output +LC_ALL=C tr -d "$cr" < out > k +mv k out + +# compare expected output +cat > expected <<EOF +1->1 () +-1->-1 () +1k->1024 () +invalid suffix in X argument \`${too_big}h' +X argument \`$too_big' too large +invalid X argument \`x' +invalid suffix in X argument \`9x' +010->8 () +MiB->1048576 () +1->1 () +invalid X argument \`-1' +1k->1024 () +invalid suffix in X argument \`${too_big}h' +X argument \`$too_big' too large +invalid X argument \`x' +invalid suffix in X argument \`9x' +010->8 () +MiB->1048576 () +EOF + +compare expected out || result=1 + +Exit $result |