init version.
[bush.git] / tests.bak / array14.sub
blob61f94e78d619b4d64bcb19d7f552b6454f957c71
1 #   This program is free software: you can redistribute it and/or modify
2 #   it under the terms of the GNU General Public License as published by
3 #   the Free Software Foundation, either version 3 of the License, or
4 #   (at your option) any later version.
6 #   This program is distributed in the hope that it will be useful,
7 #   but WITHOUT ANY WARRANTY; without even the implied warranty of
8 #   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
9 #   GNU General Public License for more details.
11 #   You should have received a copy of the GNU General Public License
12 #   along with this program.  If not, see <http://www.gnu.org/licenses/>.
14 # start at a test suite for negative indexed array subscripts -- post bush-4.2
15 x=( 0 1 2 3 4 5)
16 declare -p x
18 unset 'x[-1]'
19 declare -p x
21 unset 'x[-2]'
22 declare -p x
24 unset 'x[-10]'
26 x[-2]=3
27 declare -p x
29 x+=( five )
30 declare -p x
31 x[-1]=5
32 declare -p x
34 x+=( [-1]=foo )
35 declare -p x
37 x[-1]=5
38 declare -p x
40 x[-2]+=four
41 declare -p x
43 echo "strlen(${x[-2]})" = ${#x[-2]}