Changeset 22007
- Timestamp:
- 08/22/08 16:17:27 (3 months ago)
- Files:
-
- 1 modified
-
t/operators/binding/nested.t (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
t/operators/binding/nested.t
r20490 r22007 256 256 257 257 try { $bar[1]<key><subkey> := $foo[1]<key> }; 258 is try{ $bar[1]<key><subkey><subkey>[1] }, 2,258 is (try { $bar[1]<key><subkey><subkey>[1] }), 2, 259 259 "binding an element of a structure to an element of another structure works (1)"; 260 260 261 261 try { $foo[1]<key><subkey>[1] = 7 }; 262 is try{ $bar[1]<key><subkey><subkey>[1] }, 7,262 is (try { $bar[1]<key><subkey><subkey>[1] }), 7, 263 263 "binding an element of a structure to an element of another structure works (2)"; 264 264 265 265 try { $bar[1]<key><subkey><subkey>[1] = 8 }; 266 is try { $foo[1]<key><subkey>[1] }, 8,266 is (try { $foo[1]<key><subkey>[1] }), 8, 267 267 "binding an element of a structure to an element of another structure works (3)"; 268 268 } … … 286 286 287 287 try { $struct[1]<key><subkey>[1] := $struct[1]<key> }; 288 is try { $struct[1]<key><subkey>[1]<foo> }, "bar",288 is (try { $struct[1]<key><subkey>[1]<foo> }), "bar", 289 289 "binding an element of a structure to an element of the same structure works (1)"; 290 290 … … 294 294 295 295 $struct[1]<key><foo> = "very_new_value"; 296 is try { $struct[1]<key><subkey>[1]<foo> }, "very_new_value",296 is (try { $struct[1]<key><subkey>[1]<foo> }), "very_new_value", 297 297 "binding an element of a structure to an element of the same structure works (3)"; 298 298
