1999-04-16 03:35:26 +02:00
|
|
|
|
/* Parser definitions for GDB.
|
2001-03-06 09:22:02 +01:00
|
|
|
|
Copyright 1986, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997,
|
|
|
|
|
1998, 1999, 2000 Free Software Foundation, Inc.
|
1999-04-16 03:35:26 +02:00
|
|
|
|
Modified from expread.y by the Department of Computer Science at the
|
|
|
|
|
State University of New York at Buffalo.
|
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
This file is part of GDB.
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
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.
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
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.
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
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. */
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
|
|
|
|
#if !defined (PARSER_DEFS_H)
|
|
|
|
|
#define PARSER_DEFS_H 1
|
|
|
|
|
|
* defs.h (HOST_FLOAT_FORMAT, HOST_DOUBLE_FORMAT)
(HOST_FLOAT_FORMAT, HOST_DOUBLE_FORMAT)
(HOST_LONG_DOUBLE_FORMAT, DOUBLEST)
(floatformat_to_doublest, floatformat_from_doublest)
(floatformat_is_negative, floatformat_is_nan)
(floatformat_mantissa, store_floating)
(extract_floating): Move declaration from here.
* doublest.h: To here. New file.
* utils.c (get_field, floatformat_to_doublest, put_field)
(ldfrexp, floatformat_from_doublest, floatformat_is_negative)
(floatformat_is_nan, floatformat_mantissa)
(FLOATFORMAT_CHAR_BIT): Move from here.
* doublest.c: To here. New file.
* findvar.c (store_floating, extract_floating): Move from here.
* doublest.c: To here.
* Makefile.in (SFILES): Add doublest.c.
(COMMON_OBS): Add doublest.o.
(doublest.o): Specify dependencies.
(doublest_h): Define.
* config/m88k/tm-m88k.h: Include "doublest.h".
* config/i960/tm-i960.h: Ditto.
* config/i386/tm-symmetry.h: Ditto.
* rs6000-tdep.c, valarith.c: Ditto.
* valprint.c, stabsread.c, sh-tdep.c: Ditto.
* ia64-tdep.c, i387-tdep.c, i386-tdep.c: Ditto.
* values.c, arm-tdep.c, arm-linux-tdep.c: Ditto.
* alpha-tdep.c, ax.h, expression.h: Ditto.
* sh-tdep.c, parse.c, top.c, value.h: Ditto.
* Makefile.in (arm-tdep.o): Add $(doublest_h).
(i386-tdep.o, i387-tdep.o, ia64-tdep.o): Ditto.
(rs6000-tdep.o, stabsread.o, valarith.o): Ditto.
(values.o, valprint.o, arm-linux-tdep.o): Ditto.
(alpha-tdep.o, ax_h, parse.o, top.o, value_h): Ditto.
(parser_defs_h): Ditto.
(expression_h): Add $(doublest_h) and $(symtab_h).
2001-08-01 20:39:27 +02:00
|
|
|
|
#include "doublest.h"
|
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
struct std_regs
|
|
|
|
|
{
|
|
|
|
|
char *name;
|
|
|
|
|
int regnum;
|
|
|
|
|
};
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
1999-06-07 21:19:32 +02:00
|
|
|
|
extern struct std_regs *std_regs;
|
1999-04-16 03:35:26 +02:00
|
|
|
|
extern unsigned num_std_regs;
|
|
|
|
|
|
|
|
|
|
extern struct expression *expout;
|
|
|
|
|
extern int expout_size;
|
|
|
|
|
extern int expout_ptr;
|
|
|
|
|
|
|
|
|
|
/* If this is nonzero, this block is used as the lexical context
|
|
|
|
|
for symbol names. */
|
|
|
|
|
|
|
|
|
|
extern struct block *expression_context_block;
|
|
|
|
|
|
|
|
|
|
/* The innermost context required by the stack and register variables
|
|
|
|
|
we've encountered so far. */
|
|
|
|
|
extern struct block *innermost_block;
|
|
|
|
|
|
|
|
|
|
/* The block in which the most recently discovered symbol was found.
|
|
|
|
|
FIXME: Should be declared along with lookup_symbol in symtab.h; is not
|
|
|
|
|
related specifically to parsing. */
|
|
|
|
|
extern struct block *block_found;
|
|
|
|
|
|
|
|
|
|
/* Number of arguments seen so far in innermost function call. */
|
|
|
|
|
extern int arglist_len;
|
|
|
|
|
|
|
|
|
|
/* A string token, either a char-string or bit-string. Char-strings are
|
|
|
|
|
used, for example, for the names of symbols. */
|
|
|
|
|
|
|
|
|
|
struct stoken
|
|
|
|
|
{
|
|
|
|
|
/* Pointer to first byte of char-string or first bit of bit-string */
|
|
|
|
|
char *ptr;
|
|
|
|
|
/* Length of string in bytes for char-string or bits for bit-string */
|
|
|
|
|
int length;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
struct ttype
|
|
|
|
|
{
|
|
|
|
|
struct stoken stoken;
|
|
|
|
|
struct type *type;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
struct symtoken
|
|
|
|
|
{
|
|
|
|
|
struct stoken stoken;
|
|
|
|
|
struct symbol *sym;
|
|
|
|
|
int is_a_field_of_this;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
/* For parsing of complicated types.
|
|
|
|
|
An array should be preceded in the list by the size of the array. */
|
|
|
|
|
enum type_pieces
|
1999-07-07 22:19:36 +02:00
|
|
|
|
{
|
2001-09-28 00:39:05 +02:00
|
|
|
|
tp_end = -1,
|
|
|
|
|
tp_pointer,
|
|
|
|
|
tp_reference,
|
|
|
|
|
tp_array,
|
|
|
|
|
tp_function,
|
|
|
|
|
tp_const,
|
|
|
|
|
tp_volatile
|
1999-07-07 22:19:36 +02:00
|
|
|
|
};
|
1999-04-16 03:35:26 +02:00
|
|
|
|
/* The stack can contain either an enum type_pieces or an int. */
|
1999-07-07 22:19:36 +02:00
|
|
|
|
union type_stack_elt
|
|
|
|
|
{
|
|
|
|
|
enum type_pieces piece;
|
|
|
|
|
int int_val;
|
|
|
|
|
};
|
1999-04-16 03:35:26 +02:00
|
|
|
|
extern union type_stack_elt *type_stack;
|
|
|
|
|
extern int type_stack_depth, type_stack_size;
|
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt (union exp_element);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_opcode (enum exp_opcode);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_sym (struct symbol *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_longcst (LONGEST);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_dblcst (DOUBLEST);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_type (struct type *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_intern (struct internalvar *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_string (struct stoken);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_bitstring (struct stoken);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_elt_block (struct block *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_exp_msymbol (struct minimal_symbol *,
|
|
|
|
|
struct type *, struct type *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void write_dollar_variable (struct stoken str);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern struct symbol *parse_nested_classes_for_hpacc (char *, int, char **,
|
|
|
|
|
int *, char **);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern char *find_template_name_end (char *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void start_arglist (void);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern int end_arglist (void);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern char *copy_name (struct stoken);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void push_type (enum type_pieces);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern void push_type_int (int);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern enum type_pieces pop_type (void);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern int pop_type_int (void);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern int length_of_subexp (struct expression *, int);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern struct type *follow_types (struct type *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
|
|
|
|
/* During parsing of a C expression, the pointer to the next character
|
|
|
|
|
is in this variable. */
|
|
|
|
|
|
|
|
|
|
extern char *lexptr;
|
|
|
|
|
|
|
|
|
|
/* Tokens that refer to names do so with explicit pointer and length,
|
|
|
|
|
so they can share the storage that lexptr is parsing.
|
|
|
|
|
|
|
|
|
|
When it is necessary to pass a name to a function that expects
|
|
|
|
|
a null-terminated string, the substring is copied out
|
|
|
|
|
into a block of storage that namecopy points to.
|
|
|
|
|
|
|
|
|
|
namecopy is allocated once, guaranteed big enough, for each parsing. */
|
|
|
|
|
|
|
|
|
|
extern char *namecopy;
|
|
|
|
|
|
|
|
|
|
/* Current depth in parentheses within the expression. */
|
|
|
|
|
|
|
|
|
|
extern int paren_depth;
|
|
|
|
|
|
|
|
|
|
/* Nonzero means stop parsing on first comma (if not within parentheses). */
|
|
|
|
|
|
|
|
|
|
extern int comma_terminates;
|
|
|
|
|
|
|
|
|
|
/* These codes indicate operator precedences for expression printing,
|
|
|
|
|
least tightly binding first. */
|
|
|
|
|
/* Adding 1 to a precedence value is done for binary operators,
|
|
|
|
|
on the operand which is more tightly bound, so that operators
|
|
|
|
|
of equal precedence within that operand will get parentheses. */
|
|
|
|
|
/* PREC_HYPER and PREC_ABOVE_COMMA are not the precedence of any operator;
|
|
|
|
|
they are used as the "surrounding precedence" to force
|
|
|
|
|
various kinds of things to be parenthesized. */
|
|
|
|
|
enum precedence
|
1999-07-07 22:19:36 +02:00
|
|
|
|
{
|
|
|
|
|
PREC_NULL, PREC_COMMA, PREC_ABOVE_COMMA, PREC_ASSIGN, PREC_LOGICAL_OR,
|
|
|
|
|
PREC_LOGICAL_AND, PREC_BITWISE_IOR, PREC_BITWISE_AND, PREC_BITWISE_XOR,
|
|
|
|
|
PREC_EQUAL, PREC_ORDER, PREC_SHIFT, PREC_ADD, PREC_MUL, PREC_REPEAT,
|
|
|
|
|
PREC_HYPER, PREC_PREFIX, PREC_SUFFIX, PREC_BUILTIN_FUNCTION
|
|
|
|
|
};
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
|
|
|
|
/* Table mapping opcodes into strings for printing operators
|
|
|
|
|
and precedences of the operators. */
|
|
|
|
|
|
|
|
|
|
struct op_print
|
1999-07-07 22:19:36 +02:00
|
|
|
|
{
|
|
|
|
|
char *string;
|
|
|
|
|
enum exp_opcode opcode;
|
|
|
|
|
/* Precedence of operator. These values are used only by comparisons. */
|
|
|
|
|
enum precedence precedence;
|
|
|
|
|
|
|
|
|
|
/* For a binary operator: 1 iff right associate.
|
|
|
|
|
For a unary operator: 1 iff postfix. */
|
|
|
|
|
int right_assoc;
|
|
|
|
|
};
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
1999-05-25 20:09:09 +02:00
|
|
|
|
/* The generic method for targets to specify how their registers are
|
|
|
|
|
named. The mapping can be derived from three sources:
|
|
|
|
|
REGISTER_NAME; std_regs; or a target specific alias hook. */
|
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern int target_map_name_to_register (char *, int);
|
1999-05-25 20:09:09 +02:00
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
#endif /* PARSER_DEFS_H */
|