diff options
author | June McEnroe <june@causal.agency> | 2020-03-09 04:00:31 -0400 |
---|---|---|
committer | June McEnroe <june@causal.agency> | 2020-03-09 04:00:31 -0400 |
commit | bb6d30656efa59e16d9abc20146accb24de17090 (patch) | |
tree | e6e0a2f16e0900f29260d4198b5e530be87372f5 /bin/1sh/tests/expansion/arith14.0 | |
parent | Remove 1sh sources (diff) | |
download | src-bb6d30656efa59e16d9abc20146accb24de17090.tar.gz src-bb6d30656efa59e16d9abc20146accb24de17090.zip |
Import /usr/src/bin/sh from FreeBSD 12.1-RELEASE
Diffstat (limited to '')
-rw-r--r-- | bin/1sh/tests/expansion/arith14.0 | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/bin/1sh/tests/expansion/arith14.0 b/bin/1sh/tests/expansion/arith14.0 new file mode 100644 index 00000000..c6f84701 --- /dev/null +++ b/bin/1sh/tests/expansion/arith14.0 @@ -0,0 +1,40 @@ +# $FreeBSD: releng/12.1/bin/sh/tests/expansion/arith14.0 270029 2014-08-15 22:36:41Z jilles $ +# Check that <</>> use the low bits of the shift count. + +if [ $((1<<16<<16)) = 0 ]; then + width=32 +elif [ $((1<<32<<32)) = 0 ]; then + width=64 +elif [ $((1<<64<<64)) = 0 ]; then + width=128 +elif [ $((1<<64>>64)) = 1 ]; then + # Integers are wider than 128 bits; assume arbitrary precision. + # Nothing to test here. + exit 0 +else + echo "Cannot determine integer width" + exit 2 +fi + +twowidth=$((width * 2)) +j=43 k=$((1 << (width - 2))) r=0 + +i=0 +while [ $i -lt $twowidth ]; do + if [ "$((j << i))" != "$((j << (i + width)))" ]; then + echo "Problem with $j << $i" + r=2 + fi + i=$((i + 1)) +done + +i=0 +while [ $i -lt $twowidth ]; do + if [ "$((k >> i))" != "$((k >> (i + width)))" ]; then + echo "Problem with $k >> $i" + r=2 + fi + i=$((i + 1)) +done + +exit $r |