/* Definitions for values of C expressions, for GDB.
- Copyright 1986, 1987, 1989, 1992, 1993, 1994 Free Software Foundation, Inc.
-This file is part of GDB.
+ Copyright 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
+ 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
+ Free Software Foundation, Inc.
-This program is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
+ This file is part of GDB.
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-GNU General Public License for more details.
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
-You should have received a copy of the GNU General Public License
-along with this program; if not, write to the Free Software
-Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 59 Temple Place - Suite 330,
+ Boston, MA 02111-1307, USA. */
#if !defined (VALUE_H)
#define VALUE_H 1
-/*
- * The structure which defines the type of a value. It should never
- * be possible for a program lval value to survive over a call to the inferior
- * (ie to be put into the history list or an internal variable).
- */
-enum lval_type {
- /* Not an lval. */
- not_lval,
- /* In memory. Could be a saved register. */
- lval_memory,
- /* In a register. */
- lval_register,
- /* In a gdb internal variable. */
- lval_internalvar,
- /* Part of a gdb internal variable (structure field). */
- lval_internalvar_component,
- /* In a register series in a frame not the current one, which may have been
- partially saved or saved in different places (otherwise would be
- lval_register or lval_memory). */
- lval_reg_frame_relative
-};
+#include "doublest.h"
+#include "frame.h" /* For struct frame_id. */
+
+struct block;
+struct expression;
+struct regcache;
+struct symbol;
+struct type;
+struct ui_file;
+
+/* The structure which defines the type of a value. It should never
+ be possible for a program lval value to survive over a call to the
+ inferior (i.e. to be put into the history list or an internal
+ variable). */
struct value
+{
+ /* Type of value; either not an lval, or one of the various
+ different possible kinds of lval. */
+ enum lval_type lval;
+
+ /* Is it modifiable? Only relevant if lval != not_lval. */
+ int modifiable;
+
+ /* Location of value (if lval). */
+ union
{
- /* Type of value; either not an lval, or one of the various
- different possible kinds of lval. */
- enum lval_type lval;
- /* Is it modifiable? Only relevant if lval != not_lval. */
- int modifiable;
- /* Location of value (if lval). */
- union
- {
- /* Address in inferior or byte of registers structure. */
- CORE_ADDR address;
- /* Pointer to internal variable. */
- struct internalvar *internalvar;
- /* Number of register. Only used with
- lval_reg_frame_relative. */
- int regnum;
- } location;
- /* Describes offset of a value within lval a structure in bytes. */
- int offset;
- /* Only used for bitfields; number of bits contained in them. */
- int bitsize;
- /* Only used for bitfields; position of start of field.
- For BITS_BIG_ENDIAN=0 targets, it is the position of the LSB.
- For BITS_BIG_ENDIAN=1 targets, it is the position of the MSB. */
+ /* If lval == lval_memory, this is the address in the inferior.
+ If lval == lval_register, this is the byte offset into the
+ registers structure. */
+ CORE_ADDR address;
+
+ /* Pointer to internal variable. */
+ struct internalvar *internalvar;
+
+ /* Number of register. Only used with lval_reg_frame_relative. */
+ int regnum;
+ } location;
+
+ /* Describes offset of a value within lval of a structure in bytes.
+ If lval == lval_memory, this is an offset to the address.
+ If lval == lval_register, this is a further offset from
+ location.address within the registers structure.
+ Note also the member embedded_offset below. */
+ int offset;
+
+ /* Only used for bitfields; number of bits contained in them. */
+ int bitsize;
+
+ /* Only used for bitfields; position of start of field.
+ For BITS_BIG_ENDIAN=0 targets, it is the position of the LSB.
+ For BITS_BIG_ENDIAN=1 targets, it is the position of the MSB. */
int bitpos;
- /* Frame value is relative to. In practice, this address is only
- used if the value is stored in several registers in other than
- the current frame, and these registers have not all been saved
- at the same place in memory. This will be described in the
- lval enum above as "lval_reg_frame_relative". */
- CORE_ADDR frame_addr;
- /* Type of the value. */
- struct type *type;
+
+ /* Frame value is relative to. In practice, this ID is only used if
+ the value is stored in several registers in other than the
+ current frame, and these registers have not all been saved at the
+ same place in memory. This will be described in the lval enum
+ above as "lval_reg_frame_relative". */
+ struct frame_id frame_id;
+
+ /* Type of the value. */
+ struct type *type;
+
+ /* If a value represents a C++ object, then the `type' field gives
+ the object's compile-time type. If the object actually belongs
+ to some class derived from `type', perhaps with other base
+ classes and additional members, then `type' is just a subobject
+ of the real thing, and the full object is probably larger than
+ `type' would suggest.
+
+ If `type' is a dynamic class (i.e. one with a vtable), then GDB
+ can actually determine the object's run-time type by looking at
+ the run-time type information in the vtable. When this
+ information is available, we may elect to read in the entire
+ object, for several reasons:
+
+ - When printing the value, the user would probably rather see the
+ full object, not just the limited portion apparent from the
+ compile-time type.
+
+ - If `type' has virtual base classes, then even printing `type'
+ alone may require reaching outside the `type' portion of the
+ object to wherever the virtual base class has been stored.
+
+ When we store the entire object, `enclosing_type' is the run-time
+ type -- the complete object -- and `embedded_offset' is the
+ offset of `type' within that larger type, in bytes. The
+ VALUE_CONTENTS macro takes `embedded_offset' into account, so
+ most GDB code continues to see the `type' portion of the value,
+ just as the inferior would.
+
+ If `type' is a pointer to an object, then `enclosing_type' is a
+ pointer to the object's run-time type, and `pointed_to_offset' is
+ the offset in bytes from the full object to the pointed-to object
+ -- that is, the value `embedded_offset' would have if we
+ followed the pointer and fetched the complete object. (I don't
+ really see the point. Why not just determine the run-time type
+ when you indirect, and avoid the special case? The contents
+ don't matter until you indirect anyway.)
+
+ If we're not doing anything fancy, `enclosing_type' is equal to
+ `type', and `embedded_offset' is zero, so everything works
+ normally. */
+ struct type *enclosing_type;
+ int embedded_offset;
+ int pointed_to_offset;
+
/* Values are stored in a chain, so that they can be deleted
easily over calls to the inferior. Values assigned to internal
variables or put into the value history are taken off this
list. */
struct value *next;
- /* ??? When is this used? */
- union {
- CORE_ADDR memaddr;
- char *myaddr;
- } substring_addr;
-
- /* If an lval is forced to repeat, a new value is created with
- these fields set. The new value is not an lval. */
- short repeated;
- short repetitions;
- /* Register number if the value is from a register. Is not kept
- if you take a field of a structure that is stored in a
- register. Shouldn't it be? */
+ /* Register number if the value is from a register. */
short regno;
- /* If zero, contents of this value are in the contents field.
- If nonzero, contents are in inferior memory at address
- in the location.address field plus the offset field
- (and the lval field should be lval_memory). */
+
+ /* If zero, contents of this value are in the contents field. If
+ nonzero, contents are in inferior memory at address in the
+ location.address field plus the offset field (and the lval
+ field should be lval_memory).
+
+ WARNING: This field is used by the code which handles
+ watchpoints (see breakpoint.c) to decide whether a particular
+ value can be watched by hardware watchpoints. If the lazy flag
+ is set for some member of a value chain, it is assumed that
+ this member of the chain doesn't need to be watched as part of
+ watching the value itself. This is how GDB avoids watching the
+ entire struct or array when the user wants to watch a single
+ struct member or array element. If you ever change the way
+ lazy flag is set and reset, be sure to consider this use as
+ well! */
char lazy;
+
/* If nonzero, this is the value of a variable which does not
actually exist in the program. */
char optimized_out;
+
+ /* The BFD section associated with this value. */
+ asection *bfd_section;
+
/* Actual contents of the value. For use of this value; setting
it uses the stuff above. Not valid if lazy is nonzero.
Target byte-order. We force it to be aligned properly for any
- possible value. */
- union {
+ possible value. Note that a value therefore extends beyond
+ what is declared here. */
+ union
+ {
long contents[1];
- double force_double_align;
- LONGEST force_longlong_align;
- char *literal_data;
+ DOUBLEST force_doublest_align;
+ LONGEST force_longest_align;
+ CORE_ADDR force_core_addr_align;
+ void *force_pointer_align;
} aligner;
-
- };
-
-typedef struct value *value_ptr;
+ /* Do not add any new members here -- contents above will trash them. */
+};
#define VALUE_TYPE(val) (val)->type
+#define VALUE_ENCLOSING_TYPE(val) (val)->enclosing_type
#define VALUE_LAZY(val) (val)->lazy
+
/* VALUE_CONTENTS and VALUE_CONTENTS_RAW both return the address of
- the gdb buffer used to hold a copy of the contents of the lval.
- VALUE_CONTENTS is used when the contents of the buffer are needed --
- it uses value_fetch_lazy() to load the buffer from the process being
- debugged if it hasn't already been loaded. VALUE_CONTENTS_RAW is
- used when data is being stored into the buffer, or when it is
- certain that the contents of the buffer are valid. */
-#define VALUE_CONTENTS_RAW(val) ((char *) (val)->aligner.contents)
-#define VALUE_CONTENTS(val) ((void)(VALUE_LAZY(val) && value_fetch_lazy(val)),\
- VALUE_CONTENTS_RAW(val))
-extern int value_fetch_lazy PARAMS ((value_ptr val));
+ the gdb buffer used to hold a copy of the contents of the lval.
+ VALUE_CONTENTS is used when the contents of the buffer are needed
+ -- it uses value_fetch_lazy() to load the buffer from the process
+ being debugged if it hasn't already been loaded.
+ VALUE_CONTENTS_RAW is used when data is being stored into the
+ buffer, or when it is certain that the contents of the buffer are
+ valid.
+
+ Note: The contents pointer is adjusted by the offset required to
+ get to the real subobject, if the value happens to represent
+ something embedded in a larger run-time object. */
+
+#define VALUE_CONTENTS_RAW(val) \
+ ((char *) (val)->aligner.contents + (val)->embedded_offset)
+#define VALUE_CONTENTS(val) \
+ ((void)(VALUE_LAZY(val) && value_fetch_lazy(val)), VALUE_CONTENTS_RAW(val))
+
+/* The ALL variants of the above two macros do not adjust the returned
+ pointer by the embedded_offset value. */
+
+#define VALUE_CONTENTS_ALL_RAW(val) ((char *) (val)->aligner.contents)
+#define VALUE_CONTENTS_ALL(val) \
+ ((void) (VALUE_LAZY(val) && value_fetch_lazy(val)), \
+ VALUE_CONTENTS_ALL_RAW(val))
+
+extern int value_fetch_lazy (struct value *val);
#define VALUE_LVAL(val) (val)->lval
#define VALUE_ADDRESS(val) (val)->location.address
#define VALUE_INTERNALVAR(val) (val)->location.internalvar
#define VALUE_FRAME_REGNUM(val) ((val)->location.regnum)
-#define VALUE_FRAME(val) ((val)->frame_addr)
+#define VALUE_FRAME_ID(val) ((val)->frame_id)
#define VALUE_OFFSET(val) (val)->offset
#define VALUE_BITSIZE(val) (val)->bitsize
#define VALUE_BITPOS(val) (val)->bitpos
#define VALUE_NEXT(val) (val)->next
-#define VALUE_REPEATED(val) (val)->repeated
-#define VALUE_REPETITIONS(val) (val)->repetitions
#define VALUE_REGNO(val) (val)->regno
#define VALUE_OPTIMIZED_OUT(val) ((val)->optimized_out)
-
-/* This is probably not the right thing to do for in-gdb arrays. FIXME */
-/* Overload the contents field to store literal data for
- arrays. */
-
-#define VALUE_LITERAL_DATA(val) ((val)->aligner.literal_data)
-
-/* Pointer to
- the base substring, for F77 string substring operators.
- We use this ONLY when doing operations of the form
-
- FOO= 'hello'
- FOO(2:4) = 'foo'
-
- In the above case VALUE_SUBSTRING_* would point to
- FOO(2) in the original FOO string.
-
- Depending on whether the base object is allocated in the
- inferior or the superior process, use VALUE_SUBSTRING_MYADDR or
- VALUE_SUBSTRING_MEMADDR. */
-
-#define VALUE_SUBSTRING_MEMADDR(val) (val)->substring_addr.memaddr
-#define VALUE_SUBSTRING_MYADDR(val) (val)->substring_addr.myaddr
-
-/* Convert a REF to the object referenced. */
-
-#define COERCE_REF(arg) \
-{ if (TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_REF) \
- arg = value_at_lazy (TYPE_TARGET_TYPE (VALUE_TYPE (arg)), \
- unpack_long (VALUE_TYPE (arg), \
- VALUE_CONTENTS (arg)));}
+#define VALUE_EMBEDDED_OFFSET(val) ((val)->embedded_offset)
+#define VALUE_POINTED_TO_OFFSET(val) ((val)->pointed_to_offset)
+#define VALUE_BFD_SECTION(val) ((val)->bfd_section)
+
+/* Convert a REF to the object referenced. */
+
+#define COERCE_REF(arg) \
+ do { \
+ struct type *value_type_arg_tmp = check_typedef (VALUE_TYPE (arg)); \
+ if (TYPE_CODE (value_type_arg_tmp) == TYPE_CODE_REF) \
+ arg = value_at_lazy (TYPE_TARGET_TYPE (value_type_arg_tmp), \
+ unpack_pointer (VALUE_TYPE (arg), \
+ VALUE_CONTENTS (arg)), \
+ VALUE_BFD_SECTION (arg)); \
+ } while (0)
/* If ARG is an array, convert it to a pointer.
If ARG is an enum, convert it to an integer.
References are dereferenced. */
-#define COERCE_ARRAY(arg) \
-{ COERCE_REF(arg); \
- if (VALUE_REPEATED (arg) \
- || TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_ARRAY) \
- arg = value_coerce_array (arg); \
- if (TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_FUNC) \
- arg = value_coerce_function (arg); \
- if (TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_ENUM) \
- arg = value_cast (builtin_type_unsigned_int, arg); \
-}
+#define COERCE_ARRAY(arg) \
+ do { \
+ COERCE_REF(arg); \
+ if (current_language->c_style_arrays \
+ && TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_ARRAY) \
+ arg = value_coerce_array (arg); \
+ if (TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_FUNC) \
+ arg = value_coerce_function (arg); \
+ } while (0)
+
+#define COERCE_NUMBER(arg) \
+ do { COERCE_ARRAY(arg); COERCE_ENUM(arg); } while (0)
+
+/* NOTE: cagney/2002-12-17: This macro was handling a chill language
+ problem but that language has gone away. */
+#define COERCE_VARYING_ARRAY(arg, real_arg_type)
/* If ARG is an enum, convert it to an integer. */
-#define COERCE_ENUM(arg) \
-{ COERCE_REF (arg); \
- if (TYPE_CODE (VALUE_TYPE (arg)) == TYPE_CODE_ENUM) \
- arg = value_cast (builtin_type_unsigned_int, arg); \
-}
+#define COERCE_ENUM(arg) \
+ do { \
+ if (TYPE_CODE (check_typedef (VALUE_TYPE (arg))) == TYPE_CODE_ENUM) \
+ arg = value_cast (builtin_type_unsigned_int, arg); \
+ } while (0)
/* Internal variables (variables for convenience of use of debugger)
are recorded as a chain of these structures. */
{
struct internalvar *next;
char *name;
- value_ptr value;
+ struct value *value;
};
-/* Pointer to member function. Depends on compiler implementation. */
+/* Pointer to member function. Depends on compiler implementation. */
#define METHOD_PTR_IS_VIRTUAL(ADDR) ((ADDR) & 0x80000000)
#define METHOD_PTR_FROM_VOFFSET(OFFSET) (0x80000000 + (OFFSET))
#define METHOD_PTR_TO_VOFFSET(ADDR) (~0x80000000 & (ADDR))
-
\f
+
#include "symtab.h"
#include "gdbtypes.h"
#include "expression.h"
-#ifdef __STDC__
struct frame_info;
struct fn_field;
-#endif
-extern void
-print_address_demangle PARAMS ((CORE_ADDR, GDB_FILE *, int));
+extern void print_address_demangle (CORE_ADDR, struct ui_file *, int);
-extern LONGEST value_as_long PARAMS ((value_ptr val));
+extern LONGEST value_as_long (struct value *val);
+extern DOUBLEST value_as_double (struct value *val);
+extern CORE_ADDR value_as_address (struct value *val);
-extern double value_as_double PARAMS ((value_ptr val));
+extern LONGEST unpack_long (struct type *type, const char *valaddr);
+extern DOUBLEST unpack_double (struct type *type, const char *valaddr,
+ int *invp);
+extern CORE_ADDR unpack_pointer (struct type *type, const char *valaddr);
+extern LONGEST unpack_field_as_long (struct type *type, const char *valaddr,
+ int fieldno);
-extern CORE_ADDR value_as_pointer PARAMS ((value_ptr val));
+extern struct value *value_from_longest (struct type *type, LONGEST num);
+extern struct value *value_from_pointer (struct type *type, CORE_ADDR addr);
+extern struct value *value_from_double (struct type *type, DOUBLEST num);
+extern struct value *value_from_string (char *string);
-extern LONGEST unpack_long PARAMS ((struct type *type, char *valaddr));
+extern struct value *value_at (struct type *type, CORE_ADDR addr,
+ asection * sect);
+extern struct value *value_at_lazy (struct type *type, CORE_ADDR addr,
+ asection * sect);
-extern double unpack_double PARAMS ((struct type *type, char *valaddr,
- int *invp));
+extern struct value *value_from_register (struct type *type, int regnum,
+ struct frame_info *frame);
-extern CORE_ADDR unpack_pointer PARAMS ((struct type *type, char *valaddr));
+extern struct value *value_of_variable (struct symbol *var, struct block *b);
-extern LONGEST unpack_field_as_long PARAMS ((struct type *type, char *valaddr,
- int fieldno));
+extern struct value *value_of_register (int regnum,
+ struct frame_info *frame);
-extern value_ptr value_from_longest PARAMS ((struct type *type, LONGEST num));
+extern int symbol_read_needs_frame (struct symbol *);
-extern value_ptr value_from_double PARAMS ((struct type *type, double num));
+extern struct value *read_var_value (struct symbol *var,
+ struct frame_info *frame);
-extern value_ptr value_at PARAMS ((struct type *type, CORE_ADDR addr));
+extern struct value *locate_var_value (struct symbol *var,
+ struct frame_info *frame);
-extern value_ptr value_at_lazy PARAMS ((struct type *type, CORE_ADDR addr));
+extern struct value *allocate_value (struct type *type);
-extern value_ptr value_from_register PARAMS ((struct type *type, int regnum,
- struct frame_info * frame));
+extern struct value *allocate_repeat_value (struct type *type, int count);
-extern value_ptr value_of_variable PARAMS ((struct symbol *var,
- struct block *b));
+extern struct value *value_change_enclosing_type (struct value *val,
+ struct type *new_type);
-extern value_ptr value_of_register PARAMS ((int regnum));
+extern struct value *value_mark (void);
-extern int symbol_read_needs_frame PARAMS ((struct symbol *));
+extern void value_free_to_mark (struct value *mark);
-extern value_ptr read_var_value PARAMS ((struct symbol *var,
- struct frame_info *frame));
+extern struct value *value_string (char *ptr, int len);
+extern struct value *value_bitstring (char *ptr, int len);
-extern value_ptr locate_var_value PARAMS ((struct symbol *var,
- struct frame_info *frame));
+extern struct value *value_array (int lowbound, int highbound,
+ struct value ** elemvec);
-extern value_ptr allocate_value PARAMS ((struct type *type));
+extern struct value *value_concat (struct value *arg1, struct value *arg2);
-extern value_ptr allocate_repeat_value PARAMS ((struct type *type, int count));
+extern struct value *value_binop (struct value *arg1, struct value *arg2,
+ enum exp_opcode op);
-extern value_ptr value_mark PARAMS ((void));
+extern struct value *value_add (struct value *arg1, struct value *arg2);
-extern void value_free_to_mark PARAMS ((value_ptr mark));
+extern struct value *value_sub (struct value *arg1, struct value *arg2);
-extern value_ptr value_string PARAMS ((char *ptr, int len));
+extern struct value *value_coerce_array (struct value *arg1);
-extern value_ptr value_array PARAMS ((int lowbound, int highbound,
- value_ptr *elemvec));
+extern struct value *value_coerce_function (struct value *arg1);
-extern value_ptr value_concat PARAMS ((value_ptr arg1, value_ptr arg2));
+extern struct value *value_ind (struct value *arg1);
-extern value_ptr value_binop PARAMS ((value_ptr arg1, value_ptr arg2,
- enum exp_opcode op));
+extern struct value *value_addr (struct value *arg1);
-extern value_ptr value_add PARAMS ((value_ptr arg1, value_ptr arg2));
+extern struct value *value_assign (struct value *toval, struct value *fromval);
-extern value_ptr value_sub PARAMS ((value_ptr arg1, value_ptr arg2));
+extern struct value *value_neg (struct value *arg1);
-extern value_ptr value_coerce_array PARAMS ((value_ptr arg1));
+extern struct value *value_complement (struct value *arg1);
-extern value_ptr value_coerce_function PARAMS ((value_ptr arg1));
+extern struct value *value_struct_elt (struct value **argp,
+ struct value **args,
+ char *name, int *static_memfuncp,
+ char *err);
-extern value_ptr value_ind PARAMS ((value_ptr arg1));
+extern struct value *value_struct_elt_for_reference (struct type *domain,
+ int offset,
+ struct type *curtype,
+ char *name,
+ struct type *intype);
-extern value_ptr value_addr PARAMS ((value_ptr arg1));
+extern struct value *value_static_field (struct type *type, int fieldno);
-extern value_ptr value_assign PARAMS ((value_ptr toval, value_ptr fromval));
+extern struct fn_field *value_find_oload_method_list (struct value **, char *,
+ int, int *,
+ struct type **, int *);
-extern value_ptr value_neg PARAMS ((value_ptr arg1));
+extern int find_overload_match (struct type **arg_types, int nargs,
+ char *name, int method, int lax,
+ struct value **objp, struct symbol *fsym,
+ struct value **valp, struct symbol **symp,
+ int *staticp);
-extern value_ptr value_complement PARAMS ((value_ptr arg1));
+extern struct value *value_field (struct value *arg1, int fieldno);
-extern value_ptr value_struct_elt PARAMS ((value_ptr *argp, value_ptr *args,
- char *name,
- int *static_memfuncp, char *err));
+extern struct value *value_primitive_field (struct value *arg1, int offset,
+ int fieldno,
+ struct type *arg_type);
-extern value_ptr value_struct_elt_for_reference PARAMS ((struct type *domain,
- int offset,
- struct type *curtype,
- char *name,
- struct type *intype));
-extern value_ptr value_field PARAMS ((value_ptr arg1, int fieldno));
+extern struct type *value_rtti_target_type (struct value *, int *, int *,
+ int *);
-extern value_ptr value_primitive_field PARAMS ((value_ptr arg1, int offset,
- int fieldno,
- struct type *arg_type));
+extern struct value *value_full_object (struct value *, struct type *, int,
+ int, int);
-extern value_ptr value_cast PARAMS ((struct type *type, value_ptr arg2));
+extern struct value *value_cast (struct type *type, struct value *arg2);
-extern value_ptr value_zero PARAMS ((struct type *type, enum lval_type lv));
+extern struct value *value_zero (struct type *type, enum lval_type lv);
-extern value_ptr value_repeat PARAMS ((value_ptr arg1, int count));
+extern struct value *value_repeat (struct value *arg1, int count);
-extern value_ptr value_subscript PARAMS ((value_ptr array, value_ptr idx));
+extern struct value *value_subscript (struct value *array, struct value *idx);
-extern value_ptr value_from_vtable_info PARAMS ((value_ptr arg,
- struct type *type));
+extern struct value *value_being_returned (struct type *valtype,
+ struct regcache *retbuf,
+ int struct_return);
-extern value_ptr value_being_returned PARAMS ((struct type *valtype,
- char retbuf[REGISTER_BYTES],
- int struct_return));
+extern struct value *value_in (struct value *element, struct value *set);
-extern value_ptr value_in PARAMS ((value_ptr element, value_ptr set));
+extern int value_bit_index (struct type *type, char *addr, int index);
-extern int value_bit_index PARAMS ((struct type *type, char *addr, int index));
+extern int using_struct_return (struct value *function, CORE_ADDR funcaddr,
+ struct type *value_type, int gcc_p);
-extern int using_struct_return PARAMS ((value_ptr function, CORE_ADDR funcaddr,
- struct type *value_type, int gcc_p));
+extern void set_return_value (struct value *val);
-extern void set_return_value PARAMS ((value_ptr val));
+extern struct value *evaluate_expression (struct expression *exp);
-extern value_ptr evaluate_expression PARAMS ((struct expression *exp));
+extern struct value *evaluate_type (struct expression *exp);
-extern value_ptr evaluate_type PARAMS ((struct expression *exp));
+extern struct value *evaluate_subexp_with_coercion (struct expression *,
+ int *, enum noside);
-extern value_ptr parse_and_eval PARAMS ((char *exp));
+extern struct value *parse_and_eval (char *exp);
-extern value_ptr parse_to_comma_and_eval PARAMS ((char **expp));
+extern struct value *parse_to_comma_and_eval (char **expp);
-extern struct type *parse_and_eval_type PARAMS ((char *p, int length));
+extern struct type *parse_and_eval_type (char *p, int length);
-extern CORE_ADDR parse_and_eval_address PARAMS ((char *exp));
+extern CORE_ADDR parse_and_eval_address (char *exp);
-extern CORE_ADDR parse_and_eval_address_1 PARAMS ((char **expptr));
+extern CORE_ADDR parse_and_eval_address_1 (char **expptr);
-extern value_ptr access_value_history PARAMS ((int num));
+extern LONGEST parse_and_eval_long (char *exp);
-extern value_ptr value_of_internalvar PARAMS ((struct internalvar *var));
+extern struct value *access_value_history (int num);
-extern void set_internalvar PARAMS ((struct internalvar *var, value_ptr val));
+extern struct value *value_of_internalvar (struct internalvar *var);
-extern void set_internalvar_component PARAMS ((struct internalvar *var,
- int offset,
- int bitpos, int bitsize,
- value_ptr newvalue));
+extern void set_internalvar (struct internalvar *var, struct value *val);
-extern struct internalvar *lookup_internalvar PARAMS ((char *name));
+extern void set_internalvar_component (struct internalvar *var,
+ int offset,
+ int bitpos, int bitsize,
+ struct value *newvalue);
-extern int value_equal PARAMS ((value_ptr arg1, value_ptr arg2));
+extern struct internalvar *lookup_internalvar (char *name);
-extern int value_less PARAMS ((value_ptr arg1, value_ptr arg2));
+extern int value_equal (struct value *arg1, struct value *arg2);
-extern int value_logical_not PARAMS ((value_ptr arg1));
+extern int value_less (struct value *arg1, struct value *arg2);
-/* C++ */
-
-extern value_ptr value_of_this PARAMS ((int complain));
-
-extern value_ptr value_x_binop PARAMS ((value_ptr arg1, value_ptr arg2,
- enum exp_opcode op,
- enum exp_opcode otherop));
-
-extern value_ptr value_x_unop PARAMS ((value_ptr arg1, enum exp_opcode op));
-
-extern value_ptr value_fn_field PARAMS ((value_ptr *arg1p, struct fn_field *f,
- int j,
- struct type* type, int offset));
-
-extern value_ptr value_virtual_fn_field PARAMS ((value_ptr *arg1p,
- struct fn_field *f, int j,
- struct type *type,
- int offset));
+extern int value_logical_not (struct value *arg1);
-extern int binop_user_defined_p PARAMS ((enum exp_opcode op,
- value_ptr arg1, value_ptr arg2));
-
-extern int unop_user_defined_p PARAMS ((enum exp_opcode op, value_ptr arg1));
+/* C++ */
-extern int destructor_name_p PARAMS ((const char *name,
- const struct type *type));
+extern struct value *value_of_this (int complain);
-#define value_free(val) free ((PTR)val)
+extern struct value *value_x_binop (struct value *arg1, struct value *arg2,
+ enum exp_opcode op,
+ enum exp_opcode otherop,
+ enum noside noside);
-extern void free_all_values PARAMS ((void));
+extern struct value *value_x_unop (struct value *arg1, enum exp_opcode op,
+ enum noside noside);
-extern void release_value PARAMS ((value_ptr val));
+extern struct value *value_fn_field (struct value ** arg1p, struct fn_field *f,
+ int j, struct type *type, int offset);
-extern int record_latest_value PARAMS ((value_ptr val));
+extern int binop_user_defined_p (enum exp_opcode op, struct value *arg1,
+ struct value *arg2);
-extern void registers_changed PARAMS ((void));
+extern int unop_user_defined_p (enum exp_opcode op, struct value *arg1);
-extern void read_register_bytes PARAMS ((int regbyte, char *myaddr, int len));
+extern int destructor_name_p (const char *name, const struct type *type);
-extern void write_register_bytes PARAMS ((int regbyte, char *myaddr, int len));
+#define value_free(val) xfree (val)
-extern void
-read_register_gen PARAMS ((int regno, char *myaddr));
+extern void free_all_values (void);
-extern CORE_ADDR
-read_register PARAMS ((int regno));
+extern void release_value (struct value *val);
-extern void
-write_register PARAMS ((int regno, LONGEST val));
+extern int record_latest_value (struct value *val);
-extern void
-supply_register PARAMS ((int regno, char *val));
+extern void modify_field (char *addr, LONGEST fieldval, int bitpos,
+ int bitsize);
-extern void
-get_saved_register PARAMS ((char *raw_buffer, int *optimized,
- CORE_ADDR *addrp, struct frame_info *frame,
- int regnum, enum lval_type *lval));
+extern void type_print (struct type * type, char *varstring,
+ struct ui_file * stream, int show);
-extern void
-modify_field PARAMS ((char *addr, LONGEST fieldval, int bitpos, int bitsize));
+extern char *baseclass_addr (struct type *type, int index, char *valaddr,
+ struct value **valuep, int *errp);
-extern void
-type_print PARAMS ((struct type *type, char *varstring, GDB_FILE *stream,
- int show));
+extern void print_longest (struct ui_file * stream, int format,
+ int use_local, LONGEST val);
-extern char *baseclass_addr PARAMS ((struct type *type, int index,
- char *valaddr,
- value_ptr *valuep, int *errp));
+extern void print_floating (char *valaddr, struct type * type,
+ struct ui_file * stream);
-extern void
-print_longest PARAMS ((GDB_FILE *stream, int format, int use_local,
- LONGEST val));
+extern int value_print (struct value *val, struct ui_file *stream, int format,
+ enum val_prettyprint pretty);
-extern void
-print_floating PARAMS ((char *valaddr, struct type *type, GDB_FILE *stream));
+extern void value_print_array_elements (struct value *val,
+ struct ui_file *stream, int format,
+ enum val_prettyprint pretty);
-extern int value_print PARAMS ((value_ptr val, GDB_FILE *stream, int format,
- enum val_prettyprint pretty));
+extern struct value *value_release_to_mark (struct value *mark);
-extern void
-value_print_array_elements PARAMS ((value_ptr val, GDB_FILE* stream,
- int format, enum val_prettyprint pretty));
+extern int val_print (struct type * type, char *valaddr,
+ int embedded_offset, CORE_ADDR address,
+ struct ui_file * stream, int format,
+ int deref_ref, int recurse,
+ enum val_prettyprint pretty);
-extern value_ptr
-value_release_to_mark PARAMS ((value_ptr mark));
+extern int val_print_string (CORE_ADDR addr, int len, int width, struct ui_file *stream);
-extern int
-val_print PARAMS ((struct type *type, char *valaddr, CORE_ADDR address,
- GDB_FILE *stream, int format, int deref_ref,
- int recurse, enum val_prettyprint pretty));
+extern void print_variable_value (struct symbol * var,
+ struct frame_info * frame,
+ struct ui_file *stream);
-extern int
-val_print_string PARAMS ((CORE_ADDR addr, unsigned int len, GDB_FILE *stream));
+extern int check_field (struct value *, const char *);
-extern void
-print_variable_value PARAMS ((struct symbol *var, struct frame_info *frame,
- GDB_FILE *stream));
+extern void typedef_print (struct type * type, struct symbol * news,
+ struct ui_file * stream);
-extern value_ptr value_arg_coerce PARAMS ((value_ptr));
+extern char *internalvar_name (struct internalvar *var);
-extern int check_field PARAMS ((value_ptr, const char *));
+extern void clear_value_history (void);
-extern void
-c_typedef_print PARAMS ((struct type *type, struct symbol *new, GDB_FILE *stream));
+extern void clear_internalvars (void);
-extern char *
-internalvar_name PARAMS ((struct internalvar *var));
+/* From values.c */
-extern void
-clear_value_history PARAMS ((void));
+extern struct value *value_copy (struct value *);
-extern void
-clear_internalvars PARAMS ((void));
+/* From valops.c */
-/* From values.c */
+extern struct value *varying_to_slice (struct value *);
-extern value_ptr value_copy PARAMS ((value_ptr));
+extern struct value *value_slice (struct value *, int, int);
-extern int baseclass_offset PARAMS ((struct type *, int, value_ptr, int));
+extern struct value *value_literal_complex (struct value *, struct value *,
+ struct type *);
-/* From valops.c */
+extern void find_rt_vbase_offset (struct type *, struct type *, char *, int,
+ int *, int *);
-extern value_ptr call_function_by_hand PARAMS ((value_ptr, int, value_ptr *));
+extern struct value *find_function_in_inferior (const char *);
-extern value_ptr f77_value_literal_complex PARAMS ((value_ptr, value_ptr, int));
+extern struct value *value_allocate_space_in_inferior (int);
-extern value_ptr f77_value_literal_string PARAMS ((int, int, value_ptr *));
+extern CORE_ADDR legacy_push_arguments (int nargs, struct value ** args,
+ CORE_ADDR sp, int struct_return,
+ CORE_ADDR struct_addr);
-extern value_ptr f77_value_substring PARAMS ((value_ptr, int, int));
+extern struct value *value_of_local (const char *name, int complain);
-#endif /* !defined (VALUE_H) */
+#endif /* !defined (VALUE_H) */