aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-lang.c
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2023-01-31 13:41:35 -0700
committerTom Tromey <tom@tromey.com>2023-02-13 15:21:08 -0700
commitee7bb2944b75ce482dbf3bdb2d396efc98f1cf89 (patch)
treed5ffc773a34b580cd981ce5c529f8232c4e5a355 /gdb/f-lang.c
parentb27556e3c10e197cc31021649a6113bb305b970e (diff)
downloadbinutils-ee7bb2944b75ce482dbf3bdb2d396efc98f1cf89.zip
binutils-ee7bb2944b75ce482dbf3bdb2d396efc98f1cf89.tar.gz
binutils-ee7bb2944b75ce482dbf3bdb2d396efc98f1cf89.tar.bz2
Turn value_zero into static "constructor"
This turns value_zero into a static "constructor" of value. Approved-By: Simon Marchi <simon.marchi@efficios.com>
Diffstat (limited to 'gdb/f-lang.c')
-rw-r--r--gdb/f-lang.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c
index ccaf4fd..10c46fa 100644
--- a/gdb/f-lang.c
+++ b/gdb/f-lang.c
@@ -961,7 +961,7 @@ eval_op_f_cmplx (type *expect_type, expression *exp, noside noside,
return value_cast (result_type, arg1);
else
return value_literal_complex (arg1,
- value_zero (arg1->type (), not_lval),
+ value::zero (arg1->type (), not_lval),
result_type);
}
@@ -1637,7 +1637,7 @@ fortran_structop_operation::evaluate (struct type *expect_type,
= gdb::make_array_view (valaddr, elt_type->length ());
elt_type = resolve_dynamic_type (elt_type, view, address);
}
- elt = value_zero (elt_type, VALUE_LVAL (elt));
+ elt = value::zero (elt_type, VALUE_LVAL (elt));
}
return elt;