tests.bak/varenv6.sub

   1 #   This program is free software: you can redistribute it and/or modify
   2 #   it under the terms of the GNU General Public License as published by
   3 #   the Free Software Foundation, either version 3 of the License, or
   4 #   (at your option) any later version.
   5 #
   6 #   This program is distributed in the hope that it will be useful,
   7 #   but WITHOUT ANY WARRANTY; without even the implied warranty of
   8 #   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   9 #   GNU General Public License for more details.
  10 #
  11 #   You should have received a copy of the GNU General Public License
  12 #   along with this program.  If not, see <http://www.gnu.org/licenses/>.
  13 #
  14 f()
  15 {
  16         local str=F
  17         g str
  18 }
  19
  20 g()
  21 {
  22         local -n ref=$1
  23         printf "%s " "$ref"
  24         ref=G
  25 }
  26
  27 str=OUTSIDE;
  28 f
  29
  30 printf "%s\n" "$str"
  31
  32 unset -f f g
  33 unset str
  34
  35 f() { local -a arr=(F); g arr; };
  36
  37 g() { local -n ref=$1; printf "%s " "${ref[0]}"; ref=(G); };
  38
  39 arr=(OUTSIDE);
  40 f;
  41 printf "%s\n" "${arr[0]}"