From d2b324a72fdf16fcd68e6ba7ca0280aa95de4b71 Mon Sep 17 00:00:00 2001
From: Karen Arutyunov <karen@codesynthesis.com>
Date: Thu, 16 Mar 2017 15:55:04 +0300
Subject: Add support for >! test command redirect

---
 tests/test/script/runner/redirect.test | 47 ++++++++++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)

(limited to 'tests')

diff --git a/tests/test/script/runner/redirect.test b/tests/test/script/runner/redirect.test
index 0535617..7c7fada 100644
--- a/tests/test/script/runner/redirect.test
+++ b/tests/test/script/runner/redirect.test
@@ -26,6 +26,53 @@ psr = ($cxx.target.class != 'windows' ? '/' : '\\') # Path separator in regex.
   $c <'$* -e foo 2>-' && $b : err
 }
 
+: trace
+:
+{
+  : default
+  :
+  $c <'$* -o foo -e bar >! 2>!' && $b
+
+  : verbose
+  :
+  {
+    b += -v
+
+    : out
+    :
+    $c <'$* -o foo >!' && $b >foo 2>>/~%EOE%
+    %test .+ with .+ on .+%
+    mkdir test/
+    cd test/
+    mkdir test/1/
+    cd test/1/
+    %.*/driver(.exe)? -o foo%
+    rm test/1/stderr
+    rm test/1/
+    cd test/
+    rm test/
+    cd ./
+    EOE
+
+    : err
+    :
+    $c <'$* -e foo 2>!' && $b 2>>/~%EOE%
+    %test .+ with .+ on .+%
+    mkdir test/
+    cd test/
+    mkdir test/1/
+    cd test/1/
+    %.*/driver(.exe)? -e foo%
+    foo
+    rm test/1/stdout
+    rm test/1/
+    cd test/
+    rm test/
+    cd ./
+    EOE
+  }
+}
+
 : str
 :
 {
-- 
cgit v1.1