mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-08-05 21:50:21 +08:00
gdb: Move value_from_host_double into value.c and make more use of it
The function value_from_host_double can be moved from f-lang.c into value.c as a generally useful function, and then used more widely. Tested on X86-64/GNU Linux with no regressions. gdb/ChangeLog: * f-lang.c (value_from_host_double): Moved to... * value.c (value_from_host_double): ...here. * value.h (value_from_host_double): Declare. * guile/scm-math.c (vlscm_convert_typed_number): Use value_from_host_double. (vlscm_convert_number): Likewise. * guile/scm-value.c (gdbscm_value_to_real): Likewise. * python/py-value.c (convert_value_from_python): Likewise.
This commit is contained in:
14
gdb/f-lang.c
14
gdb/f-lang.c
@ -241,20 +241,6 @@ f_collect_symbol_completion_matches (completion_tracker &tracker,
|
||||
text, word, ":", code);
|
||||
}
|
||||
|
||||
/* Create and return a value object of TYPE containing the value D. The
|
||||
TYPE must be of TYPE_CODE_FLT, and must be large enough to hold D once
|
||||
it is converted to target format. */
|
||||
|
||||
static struct value *
|
||||
value_from_host_double (struct type *type, double d)
|
||||
{
|
||||
struct value *value = allocate_value (type);
|
||||
gdb_assert (TYPE_CODE (type) == TYPE_CODE_FLT);
|
||||
target_float_from_host_double (value_contents_raw (value),
|
||||
value_type (value), d);
|
||||
return value;
|
||||
}
|
||||
|
||||
/* Special expression evaluation cases for Fortran. */
|
||||
struct value *
|
||||
evaluate_subexp_f (struct type *expect_type, struct expression *exp,
|
||||
|
Reference in New Issue
Block a user