[Genabel-commits] r1006 - pkg/ProbABEL/tests

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Mon Nov 5 15:00:17 CET 2012


Author: lckarssen
Date: 2012-11-05 15:00:17 +0100 (Mon, 05 Nov 2012)
New Revision: 1006

Modified:
   pkg/ProbABEL/tests/check_probabel.pl_chunk.sh
Log:
Minor improvement in the ProbABEL check_probabel.pl_chunk.sh script. This way of checking the exit status of a command is less complicated.

Modified: pkg/ProbABEL/tests/check_probabel.pl_chunk.sh
===================================================================
--- pkg/ProbABEL/tests/check_probabel.pl_chunk.sh	2012-11-05 13:48:19 UTC (rev 1005)
+++ pkg/ProbABEL/tests/check_probabel.pl_chunk.sh	2012-11-05 14:00:17 UTC (rev 1006)
@@ -110,8 +110,7 @@
     echo "Checking output using dosages $WithOrWithout chunks..."
     ./probabel.pl 1 2 linear $1 --additive height
     echo -n "  Verifying $outfile"
-    diff $outfile $results/$outfile
-    if [ $? == 0 ]; then
+    if diff $outfile $results/$outfile; then
 	echo -e "\t\tOK"
     else
 	echo -e "\t\tFAILED"
@@ -132,8 +131,7 @@
     ./probabel.pl 1 2 linear $1 --allmodels height -o _ngp2
     for i in {1..5}; do
 	echo -n "  Verifying ${outfilelist[$i]}"
-	diff ${outfilelist[$i]} $results/${outfilelist[$i]}
-	if [ $? == 0 ]; then
+	if diff ${outfilelist[$i]} $results/${outfilelist[$i]}; then
 	    echo -e "\t\tOK"
 	else
 	    echo -e "\t\tFAILED"



More information about the Genabel-commits mailing list