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

comparison tests/farray-alist.t @ 614:62fbc4316d97

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
farray.sh: Implement falist_update(): update an existing alist from another
author Franz Glasner <fzglas.hg@dom66.de>
date Thu, 19 Sep 2024 22:20:02 +0200
parents 17194ffe3638
children 454ce7fa25c8
comparison
equal deleted inserted replaced
613:17194ffe3638 614:62fbc4316d97
272 $ falist_destroy LIST2 272 $ falist_destroy LIST2
273 $ falist_destroy LIST3 273 $ falist_destroy LIST3
274 $ falist_destroy LIST4 274 $ falist_destroy LIST4
275 275
276 $ check_no_alist_artifacts 276 $ check_no_alist_artifacts
277
278
279 Updating
280 ========
281
282 $ falist_create ARR "Key 1" "Value 1" "Key 2" 'Value 2 '\'''
283 $ falist_create UPDATE1 "Key 1" "Value 1" "Key 2" 'Value 2 '\'''
284 $ falist_create UPDATE2 "Key 2" 'Value 2 (Updated) '\''' "Key 3" "Value 3"
285 $ falist_create EMPTY
286
287 $ falist_are_equal_with_order ARR UPDATE1
288 $ falist_are_equal_with_order ARR UPDATE2
289 [1]
290
291 $ falist_update ARR UPDATE1
292 $ falist_are_equal_with_order ARR UPDATE1
293
294 $ falist_update ARR UPDATE2
295 $ falist_debug ARR
296 DEBUG: alist `ARR' has length 3
297 DEBUG: `Key 1' -> `Value 1'
298 DEBUG: `Key 2' -> `Value 2 (Updated) ''
299 DEBUG: `Key 3' -> `Value 3'
300
301 Updating an into an empty alist is just a copy
302
303 $ falist_update EMPTY UPDATE1
304 $ falist_debug EMPTY
305 DEBUG: alist `EMPTY' has length 2
306 DEBUG: `Key 1' -> `Value 1'
307 DEBUG: `Key 2' -> `Value 2 ''
308 $ falist_debug UPDATE1
309 DEBUG: alist `UPDATE1' has length 2
310 DEBUG: `Key 1' -> `Value 1'
311 DEBUG: `Key 2' -> `Value 2 ''
312
313 $ falist_destroy ARR
314 $ falist_destroy UPDATE1
315 $ falist_destroy UPDATE2
316 $ falist_destroy EMPTY
317
318 $ check_no_alist_artifacts