diff options
Diffstat (limited to '100_more_tolerant_test.diff')
| -rw-r--r-- | 100_more_tolerant_test.diff | 57 |
1 files changed, 57 insertions, 0 deletions
diff --git a/100_more_tolerant_test.diff b/100_more_tolerant_test.diff new file mode 100644 index 000000000000..702d22c6d828 --- /dev/null +++ b/100_more_tolerant_test.diff @@ -0,0 +1,57 @@ +commit f0d37488611cd831160c1236c5b3e898777b808e +Author: sam <sam@92316355-f0b4-4df1-b90c-862c8a59935f> +Date: Mon Apr 19 20:52:05 2010 +0000 + + Make check-zzuf-r-ratio slightly more tolerant. + + git-svn-id: svn://svn.zoy.org/libcaca/zzuf/trunk@4394 92316355-f0b4-4df1-b90c-862c8a59935f + +diff --git a/test/check-zzuf-r-ratio b/test/check-zzuf-r-ratio +index 2c0d178..d19bcc4 100755 +--- a/test/check-zzuf-r-ratio ++++ b/test/check-zzuf-r-ratio +@@ -17,13 +17,24 @@ checkflip() + { + r=$1 + expect=$2 +- s2=$seed + mib=20 ++ try=3 ++ s2=$seed ++ new_test "$mib MiB of zeroes, ratio $r" ++ echo " expecting $expect" ++ checkflip_internal $1 $2 $mib $try $s2 ++} ++ ++checkflip_internal() ++{ ++ r=$1 ++ expect=$2 ++ mib=$3 ++ try=$4 ++ s2=$5 + rmax=-1 + rmin=-1 + rtot=0 +- new_test "$mib MiB of zeroes, ratio $r" +- echo " expecting $expect" + printf " got" + for x in 0 1 2 3 4; do + ret=`dd if=/dev/zero bs=1048576 count=$mib 2>/dev/null | $ZZUF -s $s2 -r $r | "$ZZERO"` +@@ -41,7 +52,15 @@ checkflip() + pass_test " ok" + elif [ $(($rmean * 8)) -lt $(($expect * 7)) \ + -o $(($rmean * 7)) -gt $(($expect * 8)) ]; then +- fail_test " FAILED" ++ if [ $try -gt 0 ]; then ++ # Hack: if we failed with that seed, just try another one. ++ # Kinda defeats the purpose of the test, but well, that's ++ # how randomness works, you cannot win each time. ++ echo " trying again" ++ checkflip_internal $1 $2 $3 $(($3 - 1)) "$3$s2" ++ else ++ fail_test " FAILED" ++ fi + else + pass_test " ok" + fi |