external/cde
1
0
Fork 0
mirror of git://git.code.sf.net/p/cdesktopenv/code synced 2025-03-09 15:50:02 +00:00
Code Issues Releases Wiki Activity

Various cleanups, mostly in regression tests

Browse source 
src/cmd/ksh93/data/variables.sh: shtab_variables[]:
- Remove unused "CSWIDTH" entry. All use of it (including the
  matching CSWIDTHNOD macro) was removed in version 2003-04-22.

src/cmd/ksh93/tests/variables.sh:
- For the tests on the shtab_variables[] variables, read the
  variable names straight from variables.c instead of synching
  the list in the test script, which would surely be forgotten.

src/cmd/ksh93/tests/*.sh:
- Fix a number of mistaken tries to count errors from a subshell.
- Fix miscellaneous minor breakage and typos.
This commit is contained in:
Martijn Dekker 2022-01-21 16:34:11 +00:00
parent 8afc4756e8
commit cda661d34c
6 changed files with 50 additions and 87 deletions
Download patch file Download diff file Expand all files Collapse all files

24
src/cmd/ksh93/tests/subshell.sh
View file

@ -65,16 +65,22 @@ z.bar[1]=(x=12 y=5)
eval val="$z"
(
z.foo[three]=good
[[ ${z.foo[three]} == good ]] || err_exit 'associative array assignment in subshell not working'
)
[[ ${z.foo[three]} == good ]]
) || err_exit 'associative array assignment in subshell not working'
[[ $z == "$val" ]] || err_exit 'compound variable changes after associative array assignment'
eval val="$z"
(
z.foo[two]=ok
[[ ${z.foo[two]} == ok ]] || err_exit 'associative array assignment to compound variable in subshell not working'
[[ ${z.foo[two]} == ok ]] || exit 101
z.bar[1]=yes
[[ ${z.bar[1]} == yes ]] || err_exit 'indexed array assignment to compound variable in subshell not working'
[[ ${z.bar[1]} == yes ]] || exit 102
)
case $? in
0) ;;
101) err_exit 'associative array assignment to compound variable in subshell not working' ;;
102) err_exit 'indexed array assignment to compound variable in subshell not working' ;;
*) err_exit 'assignment to compound variable in subshell fails' ;;
esac
[[ $z == "$val" ]] || err_exit 'compound variable changes after associative array assignment'
x=(
@ -84,10 +90,16 @@ x=(
eval val="$x"
(
unset x.foo
[[ ${x.foo.qqq} ]] && err_exit 'x.foo.qqq should be unset'
[[ ${x.foo.qqq} ]] && exit 101
x.foo=good
[[ ${x.foo} == good ]] || err_exit 'x.foo should be good'
[[ ${x.foo} == good ]] || exit 102
)
case $? in
0) ;;
101) err_exit 'x.foo.qqq should be unset' ;;
102) err_exit 'x.foo should be good' ;;
*) err_exit "x.foo fails" ;;
esac
[[ $x == "$val" ]] || err_exit 'compound variable changes after unset leaves'
unset l
(