view tests/farray-misc.t @ 753:d75979fdf67d

farray.sh: FIX: falist_clear did release keys instead of values: this is now fixed
author Franz Glasner <fzglas.hg@dom66.de>
date Wed, 16 Oct 2024 13:05:30 +0200
parents cf0f18d3d41b
children c14c7b5b5fea
line wrap: on
line source

Basic tests of farray.sh's internal helper functions

Shell is /bin/sh.


Setup
=====

  $ set -u
  $ . "${TESTDIR}/testsetup.sh"
  $ _p_datadir="${TESTDIR}/../share/local-bsdtools"
  $ . "${_p_datadir}/farray.sh"


Plain Decimal Number Checks
===========================

Valid
-----

  $ _farr_is_decimal_number 0
  $ _farr_is_decimal_number 12345678901234567890
  $ _farr_is_decimal_number -12345678901234567890
  $ _farr_is_decimal_number +12345678901234567890

Octal

  $ _farr_is_decimal_number 01234567012345670
  $ _farr_is_decimal_number -01234567012345670
  $ _farr_is_decimal_number +01234567012345670


Invalid
-------

  $ _farr_is_decimal_number x
  [1]
  $ _farr_is_decimal_number ''
  [1]
  $ _farr_is_decimal_number '+'
  [1]
  $ _farr_is_decimal_number '-'
  [1]
  $ _farr_is_decimal_number '0x1'
  [1]
  $ _farr_is_decimal_number *12345678901234567890
  [1]
  $ _farr_is_decimal_number 0x0123456789abcdef
  [1]
  $ _farr_is_decimal_number 0123456789abcdef
  [1]
  $ _farr_is_decimal_number 01234567890
  [1]
  $ _farr_is_decimal_number -01234567890
  [1]
  $ _farr_is_decimal_number +01234567890
  [1]


Index Checks
============

  $ _farr_make_index _res 5
  $ echo $_res
  5

  $ _farr_make_index _res "" 123
  $ echo $_res
  124

  $ _farr_make_index _res 0 123
  $ echo $_res
  123

  $ _farr_make_index _res -122 123
  $ echo $_res
  1

  $ _farr_make_index _res -123 123
  $ echo $_res
  0

  $ _farr_make_index _res 124 123
  $ echo $_res
  124

  $ _farr_make_index _res 125 123
  $ echo $_res
  125

  $ ( _farr_make_index _res 0 )
  ERROR: cannot compute effective index because no length is given
  [70]

  $ ( _farr_make_index _res "" )
  ERROR: length not given: cannot autocompute index
  [70]

  $ ( _farr_make_index _res 0x1 )
  ERROR: given index is not a valid decimal number
  [70]

  $ ( _farr_make_index _res 0 0x1 )
  ERROR: given length is not a valid decimal number
  [70]