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

diff tests/farray-array.t @ 651:57ee25cec0dd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
farray.sh: farray_istrue() and falist_istrue(): truth tests for arrays and alists. The rules are as in Python: non-empty arrays/alists are truish, empty arrays/alists are falsy.
author Franz Glasner <fzglas.hg@dom66.de>
date Fri, 27 Sep 2024 22:45:45 +0200
parents 2d0201f54870
children 36d953791e0c
line wrap: on
line diff
--- a/tests/farray-array.t	Fri Sep 27 21:23:19 2024 +0200
+++ b/tests/farray-array.t	Fri Sep 27 22:45:45 2024 +0200
@@ -22,6 +22,8 @@
   0 (no-eol)
   $ farray_length _var EMPTY
   $ test ${_var} -eq 0
+  $ farray_istrue EMPTY
+  [1]
   $ farray_debug EMPTY
   DEBUG: array `EMPTY' has length 0
   $ farray_destroy EMPTY
@@ -34,6 +36,7 @@
   5 (no-eol)
   $ farray_length _var TEST
   $ test ${_var} -eq 5
+  $ farray_istrue TEST
   $ farray_debug TEST
   DEBUG: array `TEST' has length 5
   DEBUG:   its contents:
@@ -48,6 +51,7 @@
 Create, clear and destroy an array
 
   $ farray_create TEST 0 1 2 '3  4   5' $'" 678" \\\'90 '
+  $ farray_istrue TEST
   $ farray_print_length TEST
   5 (no-eol)
   $ farray_length _var TEST
@@ -61,11 +65,16 @@
   DEBUG:     4: `3  4   5'
   DEBUG:     5: `" 678" \'90 '
   $ farray_clear TEST
+  $ farray_istrue TEST
+  [1]
   $ farray_print_length TEST
   0 (no-eol)
   $ farray_length _var TEST
   $ test ${_var} -eq 0
   $ farray_destroy TEST
+  $ farray_istrue TEST
+  ERROR: farray `TEST' not created properly: token empty
+  [1]
   $ check_no_array_artifacts
 
 Duplicate destruction