testing/3.OriginalTest.dir/varenv/nameref/nameref5.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 # nameref variables as for loop index variables are special
  15 v1=1
  16 v2=2
  17
  18 # simple for loop
  19 for v in v1 v2
  20 do
  21         typeset -n ref=$v
  22         echo $ref
  23 done
  24 unset v
  25
  26 set -- first second third fourth fifth
  27
  28 # unless you put a ${!v} in the for loop, ksh93 misbehaves
  29 typeset -n v=v1
  30 for v in v1 v2; do
  31         echo "${!v}: $v"
  32 done
  33 unset v
  34
  35 # example cribbed from ksh93 o'reilly book
  36 first="I am first"
  37 second="I am in the middle"
  38 third="I am last"
  39
  40 typeset -n ref=first
  41 for ref in first second third ; do
  42         echo "ref -> ${!ref}, value: $ref"
  43 done
  44 echo final state: "ref -> ${!ref}, value: $ref"
  45
  46 readonly one=1
  47 readonly two=2
  48 readonly three=3
  49
  50 typeset -n ref=one
  51 for ref in one two three; do
  52         echo "ref -> ${!ref}, value: $ref"
  53 done
  54 echo final state: "ref -> ${!ref}, value: $ref"
  55
  56 unset ref
  57 typeset -n ref=one
  58 readonly ref
  59
  60 for ref in one two three; do
  61         echo "ref -> ${!ref}, value: $ref"
  62 done
  63 echo final state: "ref -> ${!ref}, value: $ref"