#   This program is free software: you can redistribute it and/or modify
#   it under the terms of the GNU General Public License as published by
#   the Free Software Foundation, either version 3 of the License, or
#   (at your option) any later version.
#
#   This program is distributed in the hope that it will be useful,
#   but WITHOUT ANY WARRANTY; without even the implied warranty of
#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#   GNU General Public License for more details.
#
#   You should have received a copy of the GNU General Public License
#   along with this program.  If not, see <http://www.gnu.org/licenses/>.
#
# tests for `problem' keys when using associative arrays and assoc_expand_once
# deal with problems for now; this is a placeholder for if and when I fix them

typeset -A a
shopt -s assoc_expand_once

k='['
echo $(( a[$k]=7 ))

k=']'
echo $(( a[$k]=7 ))

unset a

declare -A A

for k in $'\t' ' '; do
   (( A[$k]=2 ))
done
declare -p A

for k in ']' '*' '@'; do
   (( A[$k]=2 ))
done

declare -p A

unset A
declare -A A
for k in ']' '*' '@' $'\t' ' '; do
   A[$k]=2
done
declare -p A

unset A
declare -A A

for k in $'\t' ' ' ']' '*' '@'; do
   read "A[$k]" <<< X
done
declare -p A

unset A
declare -A A

for k in $'\t' ' ' ']' '*' '@'; do
	printf -v "A[$k]" "%s" X
done
declare -p A

unset A
declare -A A

for k in ']' '*' '@'; do
   declare A[$k]=X
done
declare -p A

unset A
declare -A A

for k in ']' '*' '@'; do
   declare "A[$k]=X"
done
declare -p A
