Changeset 38304 for branches/eam_branches/ipp-20150419/Ohana/src/addstar/test/tap.dvo

Timestamp:

May 22, 2015, 9:43:44 AM (11 years ago)

Author:

eugene

Message:

fix up relphot test to get setphot right, zero points right

File:

• branches/eam_branches/ipp-20150419/Ohana/src/addstar/test/tap.dvo (modified) (2 diffs)

branches/eam_branches/ipp-20150419/Ohana/src/addstar/test/tap.dvo

@@ -3 +3 @@
 if (not($?TAP_BREAK)) set TAP_BREAK = 0
 if (not($?TAP_VERBOSE)) set TAP_VERBOSE = 0
+
+macro tapEXEC
+  if ($0 < 3) 
+    echo "USAGE: tapEXEC (command)"
+    break
+  end
+
+  local i cmd result
+
+  $cmd = ""
+  for i 1 $0
+    $cmd = $cmd $$i
+  end
+
+  if ($TAP_VERBOSE >= 2) echo $cmd
+
+  break -auto off
+  exec $cmd >& tap.log
+  $result = $STATUS
+  break -auto on
+
+  if (not($result)) 
+    exec cat tap.log
+    echo "not ok : $cmd"
+    $TAP_NFAIL ++
+    $TAP_LAST = 0
+    if ($TAP_BREAK)
+     break
+    end
+  else
+    if ($TAP_VERBOSE >= 1) echo "ok : $cmd"
+    $TAP_LAST = 1
+  end
+  $TAP_NDONE ++
+end
 
 macro tapOK
@@ -11 +46 @@
 
   if ($1)
-    if ($TAP_VERBOSE)
+    if ($TAP_VERBOSE >= 1)
       echo "ok : $2"
     end