This is the mail archive of the gdb-patches@sourceware.org mailing list for the GDB project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [PUSHED 10/11] gdb/fortran: Add support for the ABS intrinsic function


>>>>> "Andrew" == Andrew Burgess <andrew.burgess@embecosm.com> writes:

Andrew> Adds support for the abs intrinsic function, this requires adding a
Andrew> new pattern to the Fortran parser.  Currently only float and integer
Andrew> argument types are supported to ABS, complex is still not supported,
Andrew> this can be added later if needed.

Sorry for not looking at these earlier...

Andrew> +/* Create and return a value object of TYPE containing the value D.  The
Andrew> +   TYPE must be of TYPE_CODE_FLT, and must be large enough to hold D once
Andrew> +   it is converted to target format.  */
Andrew> +
Andrew> +static struct value *
Andrew> +value_from_host_double (struct type *type, double d)
Andrew> +{
Andrew> +  struct value *value = allocate_value (type);
Andrew> +  gdb_assert (TYPE_CODE (type) == TYPE_CODE_FLT);
Andrew> +  target_float_from_host_double (value_contents_raw (value),
Andrew> +                                 value_type (value), d);
Andrew> +  return value;

This seems reasonable to move to value.c.  At least py-value.c could use it.
I can do that if you also think it's worthwhile.

Tom


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]