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

diff tests/farray-array.t @ 773:bae0652d0577

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
farray.sh: More tests for sorting: using a random array
author Franz Glasner <fzglas.hg@dom66.de>
date Wed, 23 Oct 2024 18:33:38 +0200
parents 03350d2a2af6
children 75a8b69c04f0
line wrap: on
line diff
--- a/tests/farray-array.t	Wed Oct 23 16:44:12 2024 +0200
+++ b/tests/farray-array.t	Wed Oct 23 18:33:38 2024 +0200
@@ -1385,6 +1385,7 @@
 
   $ farray_create TEST 5 3 2 4
   $ farray_sort TEST
+  $ check_array_is_sorted "$TEST"
   $ farray_debug TEST
   DEBUG: array `TEST' has length 4
   DEBUG:   the items:
@@ -1395,6 +1396,19 @@
   $ farray_release TEST
   $ check_no_array_artifacts
 
+  $ create_random_array UNSORTED 1000
+  $ check_array_is_sorted "$UNSORTED"
+  [1]
+
+  $ farray_create TEST
+  $ farray_splice "" TEST 1 "" UNSORTED
+  $ farray_gnomesort TEST
+  $ check_array_is_sorted "$TEST"
+  $ farray_release TEST
+
+  $ farray_release UNSORTED
+  $ check_no_array_artifacts
+
 
 Binary Search
 =============