diff options
| author | Tom Tromey <tromey@redhat.com> | 2013-05-13 16:51:52 +0000 |
|---|---|---|
| committer | Tom Tromey <tromey@redhat.com> | 2013-05-13 16:51:52 +0000 |
| commit | ac1ca910d74d5bd1d2800cb190659c9e3043a904 (patch) | |
| tree | a62ca0d718e74c6dd7d0f7eca45ac3c9a1a728fe /gdb/opencl-lang.c | |
| parent | fd7b2a545d530118913b1aefbfd8526785d3c2cc (diff) | |
| download | gdb-ac1ca910d74d5bd1d2800cb190659c9e3043a904.zip gdb-ac1ca910d74d5bd1d2800cb190659c9e3043a904.tar.gz gdb-ac1ca910d74d5bd1d2800cb190659c9e3043a904.tar.bz2 | |
PR exp/15364:
* eval.c (evaluate_subexp_standard) <STRUCTOP_STRUCT,
STRUCTOP_PTR>: Return a not_lval value for
EVAL_AVOID_SIDE_EFFECTS.
* opencl-lang.c (evaluate_subexp_opencl): Return a not_lval value
for EVAL_AVOID_SIDE_EFFECTS.
gdb/testsuite
* gdb.base/exprs.exp (test_expr): Add regression test.
* gdb.base/exprs.c (null_t_struct): New global.
Diffstat (limited to 'gdb/opencl-lang.c')
| -rw-r--r-- | gdb/opencl-lang.c | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/gdb/opencl-lang.c b/gdb/opencl-lang.c index d7e66c4..4720e2b 100644 --- a/gdb/opencl-lang.c +++ b/gdb/opencl-lang.c @@ -1035,10 +1035,13 @@ Cannot perform conditional operation on vectors with different sizes")); } else { - /* Also handle EVAL_AVOID_SIDE_EFFECTS. */ - return value_struct_elt (&arg1, NULL, - &exp->elts[pc + 2].string, NULL, - "structure"); + struct value *v = value_struct_elt (&arg1, NULL, + &exp->elts[pc + 2].string, NULL, + "structure"); + + if (noside == EVAL_AVOID_SIDE_EFFECTS) + v = value_zero (value_type (v), not_lval); + return v; } } default: |