Mercurial > octave-nkf
comparison src/variables.cc @ 2963:c0c280cda856
[project @ 1997-05-12 03:25:07 by jwe]
author | jwe |
---|---|
date | Mon, 12 May 1997 03:29:38 +0000 |
parents | c41e4dca98b9 |
children | b9c107cbe388 |
comparison
equal
deleted
inserted
replaced
2962:5e0fe4c5d52f | 2963:c0c280cda856 |
---|---|
337 octave_value vtmp; | 337 octave_value vtmp; |
338 | 338 |
339 if (tmp->is_constant ()) | 339 if (tmp->is_constant ()) |
340 vtmp = tmp->eval (); | 340 vtmp = tmp->eval (); |
341 | 341 |
342 // XXX FIXME XXX -- make this work for all types that can do | |
343 // structure reference operations. | |
342 if (vtmp.is_map ()) | 344 if (vtmp.is_map ()) |
343 { | 345 { |
344 for (int i = 1; i < elts.length (); i++) | 346 for (int i = 1; i < elts.length (); i++) |
345 { | 347 { |
346 vtmp = vtmp.struct_elt_val (elts[i], true); | 348 vtmp = vtmp.do_struct_elt_index_op (elts[i], true); |
347 | 349 |
348 if (! vtmp.is_map ()) | 350 if (! vtmp.is_map ()) |
349 break; | 351 break; |
350 } | 352 } |
351 | 353 |
382 octave_value vtmp; | 384 octave_value vtmp; |
383 | 385 |
384 if (tmp->is_constant ()) | 386 if (tmp->is_constant ()) |
385 vtmp = tmp->eval (); | 387 vtmp = tmp->eval (); |
386 | 388 |
389 // XXX FIXME XXX -- should this work for all types that can do | |
390 // structure reference operations? | |
391 | |
387 if (vtmp.is_map ()) | 392 if (vtmp.is_map ()) |
388 { | 393 { |
389 for (int i = 1; i < elts.length (); i++) | 394 for (int i = 1; i < elts.length (); i++) |
390 { | 395 { |
391 vtmp = vtmp.struct_elt_val (elts[i], true); | 396 vtmp = vtmp.do_struct_elt_index_op (elts[i], true); |
392 | 397 |
393 if (! vtmp.is_map ()) | 398 if (! vtmp.is_map ()) |
394 { | 399 { |
395 retval = false; | 400 retval = false; |
396 break; | 401 break; |