about summary refs log tree commit diff
path: root/Test/14array.ztst
blob: 1cdf53c2d753eea8508d4bc939f61c69641c27ff (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
# Tests for array indexing

%prep

  foo=(a b c d e f g)

%test

  echo .$foo[1].
0:The first element
>.a.

  echo .$foo[1,4].
0:Normal multi-item indexing
>.a b c d.

  echo .$foo[1,0].
0:This should be empty
>..

  echo .$foo[4,1].
0:Another empty slice
>..

  echo .$foo[1,-8].
0:An empty slice with a negative end
>..

  echo .$foo[0].
0:Treat 0 like 1
>.a.

  echo .$foo[0,0].
0:Treat 0,0 like 1,1.
>.a.

  echo .$foo[0,1].
0:Another weird way to access the first element
>.a.

  echo .$foo[3].
0:An inner element
>.c.

  echo .$foo[2,2].
0:Another inner element
>.b.

  echo .$foo[2,-4].
0:A slice with a negative end
>.b c d.

  echo .$foo[-4,5].
0:A slice with a negative start
>.d e.

  echo .$foo[-6,-2].
0:A slice with a negative start and end
>.b c d e f.

  setopt ksh_arrays
  echo .${foo[1,2]}.
  unsetopt ksh_arrays
0:Ksh array indexing
>.b c.

  setopt ksh_arrays
  echo .${foo[0,1]}.
  unsetopt ksh_arrays
0:Ksh array indexing (ii)
>.a b.

  setopt ksh_arrays
  echo .${foo[1,-1]}.
  unsetopt ksh_arrays
0:Ksh array indexing (iii)
>.b c d e f g.