Root/
| 1 | #!/bin/bash |
| 2 | . ./Common |
| 3 | |
| 4 | ############################################################################### |
| 5 | |
| 6 | tst "substitutions: expand \$ from regular var" -q X=foo <<EOF |
| 7 | !-s |
| 8 | X=?*? { Y=\$\$ } |
| 9 | EOF |
| 10 | |
| 11 | expect <<EOF |
| 12 | Y=foo |
| 13 | EOF |
| 14 | |
| 15 | #------------------------------------------------------------------------------ |
| 16 | |
| 17 | tst "substitutions: expand \$ from FN" -q F1=bar <<EOF |
| 18 | !-s |
| 19 | FN=?*? { Y=\$\$ } |
| 20 | EOF |
| 21 | |
| 22 | expect <<EOF |
| 23 | Y=bar |
| 24 | EOF |
| 25 | |
| 26 | #------------------------------------------------------------------------------ |
| 27 | |
| 28 | tst_fail "substitutions: expand \$ without match" <<EOF |
| 29 | !-s |
| 30 | X=\$\$ |
| 31 | EOF |
| 32 | |
| 33 | expect <<EOF |
| 34 | s:2: \$\$ without match |
| 35 | EOF |
| 36 | |
| 37 | #------------------------------------------------------------------------------ |
| 38 | |
| 39 | tst "substitutions: assign to \$ from regular var" -q X=bar <<EOF |
| 40 | !-s |
| 41 | X=?*? { \$=foo } |
| 42 | EOF |
| 43 | |
| 44 | expect <<EOF |
| 45 | X=foo |
| 46 | EOF |
| 47 | |
| 48 | #------------------------------------------------------------------------------ |
| 49 | |
| 50 | tst "substitutions: assign to \$ from FN" -q F1=foo <<EOF |
| 51 | !-s |
| 52 | FN=?*? { \$=bar } |
| 53 | EOF |
| 54 | |
| 55 | expect <<EOF |
| 56 | F1=bar |
| 57 | EOF |
| 58 | |
| 59 | #------------------------------------------------------------------------------ |
| 60 | |
| 61 | tst_fail "substitutions: assign to \$ without match" <<EOF |
| 62 | !-s |
| 63 | \$=bar |
| 64 | EOF |
| 65 | |
| 66 | expect <<EOF |
| 67 | s:2: \$ without match |
| 68 | EOF |
| 69 | |
| 70 | #------------------------------------------------------------------------------ |
| 71 | |
| 72 | tst "substitutions: match \$ from regular var" -q X=bar <<EOF |
| 73 | !-s |
| 74 | X=?*? { \$=b(*) { Y=\$1 } } |
| 75 | EOF |
| 76 | |
| 77 | expect <<EOF |
| 78 | Y=ar |
| 79 | EOF |
| 80 | |
| 81 | #------------------------------------------------------------------------------ |
| 82 | |
| 83 | tst "substitutions: match \$ from FN" -q F1=foo <<EOF |
| 84 | !-s |
| 85 | FN=?*? { \$=(*)o { Y=\$1 } } |
| 86 | EOF |
| 87 | |
| 88 | expect <<EOF |
| 89 | Y=fo |
| 90 | EOF |
| 91 | |
| 92 | #------------------------------------------------------------------------------ |
| 93 | |
| 94 | tst_fail "substitutions: match \$ without match" <<EOF |
| 95 | !-s |
| 96 | \$=* { X=X } |
| 97 | EOF |
| 98 | |
| 99 | expect <<EOF |
| 100 | s:2: \$ without match |
| 101 | EOF |
| 102 | |
| 103 | ############################################################################### |
| 104 |
Branches:
master
