From 9ec8fa75c6e3f22d951db14fe7512221a65da8e3 Mon Sep 17 00:00:00 2001 From: Pjotr Prins Date: Sat, 11 Nov 2017 07:44:30 +0000 Subject: Cleaning up buffer use thanks to compiler warnings --- test/test_suite.sh | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'test/test_suite.sh') diff --git a/test/test_suite.sh b/test/test_suite.sh index 92b01fb..5cfc848 100755 --- a/test/test_suite.sh +++ b/test/test_suite.sh @@ -13,7 +13,7 @@ testBslmm1() { assertEquals 0 $? outfn1=output/$outn.hyp.txt outfn2=output/$outn.param.txt - assertEquals "45181.93" `perl -nle 'foreach $x (split(/\s+/,$_)) { $sum += sprintf("%.2f",(substr($x,,0,6))) } END { printf "%.2f",$sum }' $outfn1` + assertEquals "45181" `perl -nle 'foreach $x (split(/\s+/,$_)) { $sum += sprintf("%.0f",(substr($x,,0,6))) } END { printf "%.0f",$sum }' $outfn1` assertEquals "4043967139.42" `perl -nle 'foreach $x (split(/\s+/,$_)) { $sum += sprintf("%.2f",(substr($x,,0,6))) } END { printf "%.2f",$sum }' $outfn2` } @@ -42,7 +42,7 @@ testBslmm3() { -w 1000 -s 10000 -seed 1 assertEquals 0 $? outfn=output/$outn.hyp.txt - assertEquals "29130.74" `perl -nle 'foreach $x (split(/\s+/,$_)) { $sum += sprintf("%.2f",(substr($x,,0,6))) } END { printf "%.2f",$sum }' $outfn` + assertEquals "291" `perl -nle 'foreach $x (split(/\s+/,$_)) { $sum += sprintf("%.0f",(substr($x,,0,6))) } END { printf "%.0f",100*$sum }' $outfn` } testBslmm4() { -- cgit v1.2.3