Mercurial > hgrepos > FreeBSD > ports > sysutils > local-bsdtools

comparison tests/farray-array.t @ 593:f29f53749a1c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
farray.sh: farray_get() and farray_tryget() now uses the _farr_make_index() function. So general indexes are supported now.
author Franz Glasner <fzglas.hg@dom66.de>
date Wed, 18 Sep 2024 15:57:31 +0200
parents dab62498e69c
children 4babcf9abc1a
comparison
equal deleted inserted replaced
592:88191982522d 593:f29f53749a1c
1 Basic tests of farray.sh's farray_XXX functions 1 Basic tests of farray.sh's farray_XXX functions
2 2
3 Shell is /bin/sh. 3 Shell is /bin/sh.
4
4 5
5 Setup 6 Setup
6 ===== 7 =====
7 8
8 $ set -u 9 $ set -u
74 $ farray_destroy TEST 75 $ farray_destroy TEST
75 ERROR: farray `TEST' does not exist: token empty 76 ERROR: farray `TEST' does not exist: token empty
76 [1] 77 [1]
77 $ check_no_array_artifacts 78 $ check_no_array_artifacts
78 79
80
79 Equality 81 Equality
80 ======== 82 ========
81 83
82 Equality (empty) 84 Equality (empty)
83 85
114 $ farray_are_equal TEST1 TEST2 116 $ farray_are_equal TEST1 TEST2
115 [1] 117 [1]
116 $ farray_destroy TEST1 118 $ farray_destroy TEST1
117 $ farray_destroy TEST2 119 $ farray_destroy TEST2
118 $ check_no_array_artifacts 120 $ check_no_array_artifacts
121
122
123 Get
124 ===
125
126 $ farray_create TEST 0 1 2 '3 4 5' $'" 678" \\\'910 ' 11
127
128 $ farray_get _var TEST 1
129 $ echo $_var
130 0
131 $ farray_tryget _var TEST 1
132 $ echo $_var
133 0
134 $ farray_get _var TEST -5
135 $ echo $_var
136 0
137 $ farray_tryget _var TEST -5
138 $ echo $_var
139 0
140 $ farray_get _var TEST 6
141 $ echo $_var
142 11
143 $ farray_tryget _var TEST 6
144 $ echo $_var
145 11
146 $ farray_get _var TEST 0
147 $ echo $_var
148 11
149 $ farray_tryget _var TEST 0
150 $ echo $_var
151 11
152 $ farray_get _var TEST 5
153 $ echo $_var
154 " 678" \'910
155 $ farray_tryget _var TEST 5
156 $ echo $_var
157 " 678" \'910
158 $ farray_get _var TEST -1
159 $ echo $_var
160 " 678" \'910
161 $ farray_tryget _var TEST -1
162 $ echo $_var
163 " 678" \'910
164
165 $ farray_tryget _var TEST -6
166 [1]
167 $ ( farray_get _var TEST -6 )
168 ERROR: array index out of bounds
169 [70]
170 $ farray_tryget _var TEST 7
171 [1]
172 $ ( farray_get _var TEST 7 )
173 ERROR: array index out of bounds
174 [70]
175
176 $ farray_destroy TEST
177 $ check_no_array_artifacts
178
119 179
120 Splicing 180 Splicing
121 ======== 181 ========
122 182
123 Replace complete array 183 Replace complete array