From 120bd36024971107c9f5dce6882e343c836a6402 Mon Sep 17 00:00:00 2001 From: Ken Werner Date: Wed, 3 Nov 2010 14:06:27 +0000 Subject: gdb: * valarith.c (value_pos, value_neg, value_complement): Handle vector types. * valops.c (value_one): Likewise. gdb/testsuite: * gdb.base/gnu_vector.exp: Add unary operator tests. --- gdb/valops.c | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'gdb/valops.c') diff --git a/gdb/valops.c b/gdb/valops.c index 07b62a1..22ba54a 100644 --- a/gdb/valops.c +++ b/gdb/valops.c @@ -871,6 +871,20 @@ value_one (struct type *type, enum lval_type lv) { val = value_from_longest (type, (LONGEST) 1); } + else if (TYPE_CODE (type1) == TYPE_CODE_ARRAY && TYPE_VECTOR (type1)) + { + struct type *eltype = check_typedef (TYPE_TARGET_TYPE (type1)); + int i, n = TYPE_LENGTH (type1) / TYPE_LENGTH (eltype); + struct value *tmp; + + val = allocate_value (type); + for (i = 0; i < n; i++) + { + tmp = value_one (eltype, lv); + memcpy (value_contents_writeable (val) + i * TYPE_LENGTH (eltype), + value_contents_all (tmp), TYPE_LENGTH (eltype)); + } + } else { error (_("Not a numeric type.")); -- cgit v1.1