| Jari Aalto | 7117c2d | 2002-07-17 14:10:11 +0000 | [diff] [blame] | 1 | # tests of ksh93-like dup-and-close redirection operators |
| 2 | exec 9<$0 | ||||
| 3 | |||||
| 4 | f() | ||||
| 5 | { | ||||
| 6 | exec 5<$0 | ||||
| 7 | |||||
| 8 | exec 0<&5- | ||||
| 9 | |||||
| 10 | while read line; do | ||||
| 11 | echo "$line" | ||||
| 12 | done | ||||
| 13 | } | ||||
| 14 | |||||
| 15 | f | ||||
| 16 | |||||
| 17 | typeset -f f | ||||
| 18 | |||||
| 19 | # make sure it was closed | ||||
| 20 | read -u 5 foo | ||||
| 21 | echo after read | ||||
| 22 | |||||
| 23 | exec 5<&0 | ||||
| 24 | |||||
| 25 | exec <&- | ||||
| 26 | |||||
| 27 | read abcde | ||||
| 28 | |||||
| 29 | exec 0<&9- | ||||
| 30 | read line | ||||
| 31 | echo $line | ||||