From 6793eafd244113d075f4b1ad059a996e1d06aced Mon Sep 17 00:00:00 2001
From: Sven Wischnowsky <wischnow@users.sourceforge.net>
Date: Mon, 2 Apr 2001 12:30:56 +0000
Subject: moved to ./Test/A04redirect.ztst

---
 Test/04redirect.ztst | 215 ---------------------------------------------------
 1 file changed, 215 deletions(-)
 delete mode 100644 Test/04redirect.ztst

(limited to 'Test')

diff --git a/Test/04redirect.ztst b/Test/04redirect.ztst
deleted file mode 100644
index 85bcaee43..000000000
--- a/Test/04redirect.ztst
+++ /dev/null
@@ -1,215 +0,0 @@
-# Tests corresponding to the `Redirection' texinfo node.
-
-%prep
-  mkdir redir.tmp && cd redir.tmp
-
-%test
-
-  print 'This is file redir' >redir  &&  cat redir
-0:'>' and '<' redirection
->This is file redir
-
-  rm -f redir
-  print 'This is still file redir' <>redir >&0  &&  cat <>redir
-0:'<>' redirection
->This is still file redir
-
-  rm -f redir
-  print 'With a bar' >|redir  &&  cat redir
-0:'>|' redirection
->With a bar
-
-  rm -f redir
-  print 'With a bang' >!redir  &&  cat redir
-0:'>!' redirection
->With a bang
-
-  rm -f redir
-  print 'Line 1' >>redir  &&  print 'Line 2' >>redir  &&  cat redir
-0:'>>' redirection
->Line 1
->Line 2
-
-  rm -f redir
-  print 'Line a' >>|redir  &&  print 'Line b' >>!redir
-0:'>>|' and '>>!' redirection
-
-  foo=bar
-  cat <<'  HERE'
-  $foo
-  HERE
-  eval "$(print 'cat <<HERE\n$foo\nHERE')"
-0:Here-documents
->  $foo
->bar
-
-  cat <<-HERE
-# note tabs at the start of the following lines
-	$foo$foo
-	HERE
-0:Here-documents stripping tabs
->barbar
-
-  cat <<<"This is a line with a $foo in it"
-0:'<<<' redirection
->This is a line with a bar in it
-
-  exec 3>redir  &&  print hello >&3  &&  print goodbye >&3  && cat redir
-0:'>&' redirection
->hello
->goodbye
-
-  exec 3<redir && read foo <&3 && print $foo && read foo <&3 && print $foo
-0:'<&' redirection
->hello
->goodbye
-
-  read foo <&-
-1:'<&-' redirection
-
-  print foo >&-
-0:'>&-' redirection
-
-  fn() { local foo; read foo; print $foo; }
-  coproc fn
-  print test output >&p
-  read bar <&p
-  print $bar
-0:'>&p' and '<&p' redirection
->test output
-
-  ( print Output; print Error >& 2 ) >&errout  &&  cat errout
-0:'>&FILE' handling
->Output
->Error
-
-  rm -f errout
-  ( print Output2; print Error2 >& 2 ) &>errout  &&  cat errout
-0:'&>FILE' handling
->Output2
->Error2
-
-  rm -f errout
-  ( print Output3; print Error3 >& 2 ) >&|errout  &&  cat errout
-  ( print Output4; print Error4 >& 2 ) >&!errout  &&  cat errout
-  ( print Output5; print Error5 >& 2 ) &>|errout  &&  cat errout
-  ( print Output6; print Error6 >& 2 ) &>!errout  &&
-  ( print Output7; print Error7 >& 2 ) >>&errout  &&
-  ( print Output8; print Error8 >& 2 ) &>>errout  &&
-  ( print Output9; print Error9 >& 2 ) >>&|errout  &&
-  ( print Output10; print Error10 >& 2 ) &>>|errout  &&
-  ( print Output11; print Error11 >& 2 ) >>&!errout  &&
-  ( print Output12; print Error12 >& 2 ) &>>!errout  &&  cat errout
-0:'>&|', '>&!', '&>|', '&>!' redirection
->Output3
->Error3
->Output4
->Error4
->Output5
->Error5
->Output6
->Error6
->Output7
->Error7
->Output8
->Error8
->Output9
->Error9
->Output10
->Error10
->Output11
->Error11
->Output12
->Error12
-
-  rm -f errout
-  ( print Output; print Error 1>&2 ) 1>errout 2>&1  && cat errout
-0:'Combining > with >& (1)'
->Output
->Error
-
-  rm -f errout
-  ( print Output; print Error 1>&2 ) 2>&1 1>errout   &&  print errout:  &&
-  cat errout
-0:'Combining > with >& (2)'
->Error
->errout:
->Output
-
-# Following two tests have to be separated since in
-#   print bar >foo >bar && print "$(<foo) $(<bar)"
-# the multios aren't flushed until after the substitutions take
-# place.  This can't be right.
-  rm -f errout
-  print doo be doo be doo >foo >bar 
-0:setup 2-file multio
-
-  print "foo: $(<foo)\nbar: $(<bar)"
-0:read 2-file multio
->foo: doo be doo be doo
->bar: doo be doo be doo
-
-  rm -f foo bar
-  print dont be dont be dont >foo | sed 's/dont/wont/g' >bar
-0:setup file+pipe multio
-
-  print "foo: $(<foo)\nbar: $(<bar)"
-0:read file+pipe multio
->foo: dont be dont be dont
->bar: wont be wont be wont
-
-  rm -f *
-  touch out1 out2
-  print All files >*
-0:setup multio with globbing
-
-  print *
-  print "out1: $(<out1)\nout2: $(<out2)"
-0:read multio with globbing
->out1 out2
->out1: All files
->out2: All files
-
-  print This is out1 >out1
-  print This is out2 >out2
-0:setup multio for input
-
-# Currently, <out{1,2} doesn't work: this is a bug.
-  cat <out*
-0:read multio input
->This is out1
->This is out2
-
-  cat out1 | sed s/out/bout/ <out2
-0:read multio input with pipe
->This is bout1
->This is bout2
-
-  unset NULLCMD
-  >out1
-1:null redir with NULLCMD unset
-?ZTST_execchunk:2: redirection with no command
-
-  READNULLCMD=cat
-  print cat input >out1
-  <out1
-1:READNULLCMD with NULLCMD unset
-?ZTST_execchunk:2: redirection with no command
-
-  NULLCMD=:
-  >out1
-  [[ ! -s out1 ]] || print out1 is not empty
-0:null redir with NULLCMD=:
-<input
-
-  print cat input >out1
-  <out1
-0:READNULLCMD
->cat input
-
-  NULLCMD=cat
-  >out1
-  cat out1
-0:null redir with NULLCMD=cat
-<input
->input
-- 
cgit 1.4.1