[C-mpi-commits] SF.net SVN: c-mpi:[34] test/mpirpc/test-args.zsh

[<jmw...@us...>]

Revision: 34
          http://c-mpi.svn.sourceforge.net/c-mpi/?rev=34&view=rev
Author:   jmwozniak
Date:     2010-04-20 19:34:10 +0000 (Tue, 20 Apr 2010)

Log Message:
-----------
Correct test-args.

Modified Paths:
--------------
    test/mpirpc/test-args.zsh

Modified: test/mpirpc/test-args.zsh
===================================================================
--- test/mpirpc/test-args.zsh	2010-04-20 19:31:04 UTC (rev 33)
+++ test/mpirpc/test-args.zsh	2010-04-20 19:34:10 UTC (rev 34)
@@ -4,15 +4,22 @@
 
 # Be sure to make tests with D=1
 
-OUT=$1
-STATUS=${OUT%.out}.status
+PROGRAM=$1
+OUT=${PROGRAM%.x}.out
+shift
+LAUNCH=${*}
 
 crash()
 {
   print $1
+  mv ${OUT} ${OUT}.failed
   exit 1
 }
 
+eval ${LAUNCH} -n 2 ${PROGRAM} > ${OUT} 2>&1
+CODE=$?
+[[ ${CODE} == 0 ]] || crash "exit code was: ${CODE}"
+
 # Should only be 3 calls to handle_test()...
 N=$( grep -c "handle_test(args=" ${OUT} )
 (( N == 3 )) || crash "N != 3"
@@ -26,4 +33,4 @@
   grep ${T} ${OUT} || crash "Not found: ${T}"
 done
 
-print success > ${STATUS}
+exit 0


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.