1999-04-16 03:35:26 +02:00
|
|
|
|
/* Parser definitions for GDB.
|
2002-04-10 00:14:39 +02:00
|
|
|
|
|
2007-01-09 18:59:20 +01:00
|
|
|
|
Copyright (C) 1986, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997,
|
2008-01-01 23:53:26 +01:00
|
|
|
|
1998, 1999, 2000, 2002, 2007, 2008 Free Software Foundation, Inc.
|
2002-04-10 00:14:39 +02:00
|
|
|
|
|
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
|
2007-08-23 20:08:50 +02:00
|
|
|
|
the Free Software Foundation; either version 3 of the License, or
|
1999-07-07 22:19:36 +02:00
|
|
|
|
(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
|
2007-08-23 20:08:50 +02:00
|
|
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
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"
|
|
|
|
|
|
2003-02-19 David Carlton <carlton@math.stanford.edu>
* Makefile.in (SFILES): Add block.c.
(block_h): New.
(COMMON_OBS): Add block.o.
(block.o): New.
(x86-64-tdep.o): Add $(block_h).
(values.o, valops.o, tracepoint.o, symtab.o, symmisc.o, symfile.o)
(stack.o, printcmd.o, p-exp.tab.o, parse.o, objfiles.o)
(objc-exp.tab.o, objc-lang.o, nlmread.o, mips-tdep.o, mdebugread.o)
(m2-exp.tab.o, linespec.o, jv-lang.o, jv-exp.tab.o, infcmd.o)
(f-valprint.o, findvar.o, f-exp.tab.o, expprint.o, coffread.o)
(c-exp.tab.o, buildsym.o, breakpoint.o, blockframe.o, ax-gdb.o)
(alpha-tdep.o, ada-lang.o, ada-exp.tab.o, mi-cmd-stack.o): Ditto.
* value.h: Add opaque declaration for struct block.
* parser-defs.h, objc-lang.h, buildsym.h, breakpoint.h: Ditto.
* ada-lang.h: Ditto.
* x86-64-tdep.c: #include "block.h"
* values.c, valops.c, tracepoint.c, symtab.c, symmisc.c: Ditto.
* symfile.c, stack.c, printcmd.c, p-exp.y, parse.c: Ditto.
* objfiles.c, objc-exp.y, objc-lang.c, nlmread.c: Ditto.
* mips-tdep.c, mdebugread.c, m2-exp.y, linespec.c: Ditto.
* jv-lang.c, jv-exp.y, infcmd.c, f-valprint.c: Ditto.
* findvar.c, f-exp.y, expprint.c, coffread.c, c-exp.y: Ditto.
* buildsym.c, breakpoint.c, blockframe.c, ax-gdb.c: Ditto.
* alpha-tdep.c, ada-lang.c, ada-exp.y: Ditto.
* blockframe.c (blockvector_for_pc_sect): Move to "block.c".
(blockvector_for_pc, block_for_pc_sect, block_for_pc): Ditto.
* symtab.c (block_function): Ditto.
(contained_in): Ditto.
* frame.h: Move block_for_pc and block_for_pc_sect declarations to
block.h. Add opaque declaration for struct block.
* symtab.h: Move block_function and contained_in declarations to
block.h. Add opaque declarations for struct block, struct
blockvector.
(struct block): Move to block.h.
(struct blockvector): Ditto.
(BLOCK_START, BLOCK_END, BLOCK_FUNCTION, BLOCK_SUPERBLOCK)
(BLOCK_GCC_COMPILED, BLOCK_HASHTABLE, BLOCK_NSYMS, BLOCK_SYM)
(BLOCK_BUCKETS, BLOCK_BUCKET, BLOCK_HASHTABLE_SIZE)
(ALL_BLOCK_SYMBOLS, BLOCK_SHOULD_SORT, BLOCKVECTOR_NBLOCKS)
(BLOCKVECTOR_BLOCK, GLOBAL_BLOCK, STATIC_BLOCK, FIRST_LOCAL_BLOCK):
Ditto.
* block.c: New file.
* block.h: New file.
2003-02-19 David Carlton <carlton@math.stanford.edu>
* mi-cmd-stack.c: #include "block.h"
2003-02-20 01:01:07 +01:00
|
|
|
|
struct block;
|
|
|
|
|
|
1999-04-16 03:35:26 +02:00
|
|
|
|
extern struct expression *expout;
|
|
|
|
|
extern int expout_size;
|
|
|
|
|
extern int expout_ptr;
|
|
|
|
|
|
2008-09-11 16:09:37 +02:00
|
|
|
|
#define parse_gdbarch (expout->gdbarch)
|
|
|
|
|
#define parse_language (expout->language_defn)
|
|
|
|
|
|
1999-04-16 03:35:26 +02:00
|
|
|
|
/* If this is nonzero, this block is used as the lexical context
|
|
|
|
|
for symbol names. */
|
|
|
|
|
|
|
|
|
|
extern struct block *expression_context_block;
|
|
|
|
|
|
Expand preprocessor macros in C expressions.
* c-lang.h: #include "macroexp.h", for macro_lookup_ftype.
(scan_macro_expansion, scanning_macro_expansion,
finished_macro_expansion): New function declarations.
(expression_macro_lookup_func, expression_macro_lookup_baton): New
variable declarations.
* parser-defs.h (expression_context_pc): New declaration.
* parse.c (expression_context_pc): New variable.
(parse_exp_1): Set expression_context_pc, as well as
expression_context_block.
* c-exp.y (yylex): If we're not already reading the result of a
macro expansion, try to macro-expand the next token. When we're
done scanning a macro expansion, switch back to the mainline text.
Commas and `if's in a macro's expansion don't terminate the input.
* c-lang.c: #include "macroscope.h" and "gdb_assert.h".
(macro_original_text, macro_expanded_text,
expression_macro_lookup_func, expression_macro_lookup_baton): New
variables.
(scan_macro_expansion, scanning_macro_expansion,
finished_macro_expansion, scan_macro_cleanup, null_macro_lookup,
c_preprocess_and_parse): New functions.
(c_language_defn, cplus_language_defn, asm_language_defn): Call
c_preprocess_and_parse, instead of c_parse.
* Makefile.in (c_lang_h): Note that this #includes macroexp.h.
(c-lang.o): Note dependency on macroscope.h and gdb_assert.h.
2002-05-17 19:57:48 +02:00
|
|
|
|
/* If expression_context_block is non-zero, then this is the PC within
|
|
|
|
|
the block that we want to evaluate expressions at. When debugging
|
|
|
|
|
C or C++ code, we use this to find the exact line we're at, and
|
|
|
|
|
then look up the macro definitions active at that point. */
|
2002-07-24 05:03:52 +02:00
|
|
|
|
extern CORE_ADDR expression_context_pc;
|
Expand preprocessor macros in C expressions.
* c-lang.h: #include "macroexp.h", for macro_lookup_ftype.
(scan_macro_expansion, scanning_macro_expansion,
finished_macro_expansion): New function declarations.
(expression_macro_lookup_func, expression_macro_lookup_baton): New
variable declarations.
* parser-defs.h (expression_context_pc): New declaration.
* parse.c (expression_context_pc): New variable.
(parse_exp_1): Set expression_context_pc, as well as
expression_context_block.
* c-exp.y (yylex): If we're not already reading the result of a
macro expansion, try to macro-expand the next token. When we're
done scanning a macro expansion, switch back to the mainline text.
Commas and `if's in a macro's expansion don't terminate the input.
* c-lang.c: #include "macroscope.h" and "gdb_assert.h".
(macro_original_text, macro_expanded_text,
expression_macro_lookup_func, expression_macro_lookup_baton): New
variables.
(scan_macro_expansion, scanning_macro_expansion,
finished_macro_expansion, scan_macro_cleanup, null_macro_lookup,
c_preprocess_and_parse): New functions.
(c_language_defn, cplus_language_defn, asm_language_defn): Call
c_preprocess_and_parse, instead of c_parse.
* Makefile.in (c_lang_h): Note that this #includes macroexp.h.
(c-lang.o): Note dependency on macroscope.h and gdb_assert.h.
2002-05-17 19:57:48 +02:00
|
|
|
|
|
1999-04-16 03:35:26 +02:00
|
|
|
|
/* 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;
|
|
|
|
|
};
|
|
|
|
|
|
2002-11-19 04:15:01 +01:00
|
|
|
|
struct objc_class_str
|
|
|
|
|
{
|
|
|
|
|
struct stoken stoken;
|
|
|
|
|
struct type *type;
|
|
|
|
|
int class;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
1999-04-16 03:35:26 +02:00
|
|
|
|
/* 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,
|
2001-11-15 02:55:59 +01:00
|
|
|
|
tp_volatile,
|
|
|
|
|
tp_space_identifier
|
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
|
|
|
|
|
2007-10-25 20:01:58 +02:00
|
|
|
|
extern void write_exp_elt_decfloatcst (gdb_byte *);
|
|
|
|
|
|
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
|
|
|
|
|
2006-10-10 05:17:53 +02:00
|
|
|
|
extern void write_exp_elt_objfile (struct objfile *objfile);
|
|
|
|
|
|
2008-09-11 16:08:33 +02:00
|
|
|
|
extern void write_exp_msymbol (struct minimal_symbol *);
|
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
|
|
|
|
|
2008-06-06 22:58:08 +02:00
|
|
|
|
extern void mark_struct_expression (void);
|
|
|
|
|
|
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
|
|
|
|
|
2001-11-15 02:55:59 +01:00
|
|
|
|
extern void push_type_address_space (char *);
|
|
|
|
|
|
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
|
|
|
|
|
* parser-defs.h (struct exp_descriptor): New definition, containing
language-specific info for printing, prefixifying, dumping, and
evaluating expressions.
(exp_descriptor_standard): Declare new variable.
(print_subexp): Make global and declare here (from expprint.c).
(dump_subexp): Ditto.
(dump_subexp_body_standard): Declare.
(operator_length_standard): Declare.
(op_name_standard): Declare.
(print_subexp): Declare.
(print_subexp_standard): Declare.
* language.h (struct language_defn): Add la_exp_desc field to hold
pointer to table for language-specific operators.
Remove evaluate_exp field, which is now in struct exp_descriptor.
* parse.c (operator_length): Move most code to new
operator_length_standard function. Use language-specific information.
(operator_length_standard): New function taking most code from
operator_length.
(exp_descriptor_standard): New constant.
* expression.h (enum exp_opcode): Add definitions of OP_EXTENDED0
and OP_EXTENDED_LAST.
* expprint.c (print_subexp): Use language-specific print_subexp.
Make global; remove static declaration.
Move most code to print_subexp_standard.
(print_subexp_standard): New function, containing code formerly in
print_subexp.
(op_name): Add expression to argument signature.
Use langauge-specific op_name.
Move most code to op_name_standard.
(op_name_standard): New function, containing code formerly in op_name.
(dump_subexp): Use new version of op_name function.
Use language-specific dump_subexp_body, and move most existing code to
dump_subexp_body_standard.
(dump_raw_expression): Use new op_name interface.
(dump_subexp_body): Move most code to dump_subexp_body_standard.
(dump_subexp_body_standard): New function, containing code formerly
in dump_subexp_body.
* language.c (unknown_language): Add default la_exp_desc field and
remove evaluate_exp field.
(auto_language): Ditto.
(local_language): Ditto.
* f-lang.c (f_language_defn): Ditto.
* c-lang.c (c_language_defn): Ditto.
(cplus_language_defn): Ditto.
(asm_language_defn): Ditto.
(minimal_language_defn): Ditto.
* p-lang.c (pascal_language_defn): Ditto.
* m2-lang.c (m2_language_defn): Ditto.
* objc-lang.c (objc_language_defn): Ditto.
* jv-lang.c (exp_descriptor_java): New variable, containing
Java-specific expression evaluator.
(java_language_defn): Add la_exp_desc field and remove evaluate_exp
field.
* scm-lang.c (exp_descriptor_scm): New variable, containing
Scheme-specific expression evaluator.
(scm_language_defn): Add la_exp_desc field and remove evaluate_exp
field.
* objc-lang.c (print_object_command): Take evaluate_exp from the
la_exp_desc field.
* Makefile.in (eval.o): Add dependency on parser-defs.h.
* eval.c: Include parser-defs.h for the full declaration of
la_exp_desc's type.
(evaluate_subexp): Get evaluate_exp out of la_exp_desc field.
2003-09-25 10:40:45 +02:00
|
|
|
|
extern int dump_subexp (struct expression *, struct ui_file *, int);
|
|
|
|
|
|
|
|
|
|
extern int dump_subexp_body_standard (struct expression *,
|
|
|
|
|
struct ui_file *, int);
|
|
|
|
|
|
2003-09-24 10:29:42 +02:00
|
|
|
|
extern void operator_length (struct expression *, int, int *, int *);
|
|
|
|
|
|
* parser-defs.h (struct exp_descriptor): New definition, containing
language-specific info for printing, prefixifying, dumping, and
evaluating expressions.
(exp_descriptor_standard): Declare new variable.
(print_subexp): Make global and declare here (from expprint.c).
(dump_subexp): Ditto.
(dump_subexp_body_standard): Declare.
(operator_length_standard): Declare.
(op_name_standard): Declare.
(print_subexp): Declare.
(print_subexp_standard): Declare.
* language.h (struct language_defn): Add la_exp_desc field to hold
pointer to table for language-specific operators.
Remove evaluate_exp field, which is now in struct exp_descriptor.
* parse.c (operator_length): Move most code to new
operator_length_standard function. Use language-specific information.
(operator_length_standard): New function taking most code from
operator_length.
(exp_descriptor_standard): New constant.
* expression.h (enum exp_opcode): Add definitions of OP_EXTENDED0
and OP_EXTENDED_LAST.
* expprint.c (print_subexp): Use language-specific print_subexp.
Make global; remove static declaration.
Move most code to print_subexp_standard.
(print_subexp_standard): New function, containing code formerly in
print_subexp.
(op_name): Add expression to argument signature.
Use langauge-specific op_name.
Move most code to op_name_standard.
(op_name_standard): New function, containing code formerly in op_name.
(dump_subexp): Use new version of op_name function.
Use language-specific dump_subexp_body, and move most existing code to
dump_subexp_body_standard.
(dump_raw_expression): Use new op_name interface.
(dump_subexp_body): Move most code to dump_subexp_body_standard.
(dump_subexp_body_standard): New function, containing code formerly
in dump_subexp_body.
* language.c (unknown_language): Add default la_exp_desc field and
remove evaluate_exp field.
(auto_language): Ditto.
(local_language): Ditto.
* f-lang.c (f_language_defn): Ditto.
* c-lang.c (c_language_defn): Ditto.
(cplus_language_defn): Ditto.
(asm_language_defn): Ditto.
(minimal_language_defn): Ditto.
* p-lang.c (pascal_language_defn): Ditto.
* m2-lang.c (m2_language_defn): Ditto.
* objc-lang.c (objc_language_defn): Ditto.
* jv-lang.c (exp_descriptor_java): New variable, containing
Java-specific expression evaluator.
(java_language_defn): Add la_exp_desc field and remove evaluate_exp
field.
* scm-lang.c (exp_descriptor_scm): New variable, containing
Scheme-specific expression evaluator.
(scm_language_defn): Add la_exp_desc field and remove evaluate_exp
field.
* objc-lang.c (print_object_command): Take evaluate_exp from the
la_exp_desc field.
* Makefile.in (eval.o): Add dependency on parser-defs.h.
* eval.c: Include parser-defs.h for the full declaration of
la_exp_desc's type.
(evaluate_subexp): Get evaluate_exp out of la_exp_desc field.
2003-09-25 10:40:45 +02:00
|
|
|
|
extern void operator_length_standard (struct expression *, int, int *, int *);
|
|
|
|
|
|
|
|
|
|
extern char *op_name_standard (enum exp_opcode);
|
|
|
|
|
|
2000-05-28 03:12:42 +02:00
|
|
|
|
extern struct type *follow_types (struct type *);
|
1999-04-16 03:35:26 +02:00
|
|
|
|
|
2004-04-11 00:10:01 +02:00
|
|
|
|
extern void null_post_parser (struct expression **, int);
|
|
|
|
|
|
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;
|
|
|
|
|
|
2002-04-25 00:26:32 +02:00
|
|
|
|
/* After a token has been recognized, this variable points to it.
|
|
|
|
|
Currently used only for error reporting. */
|
|
|
|
|
extern char *prev_lexptr;
|
|
|
|
|
|
1999-04-16 03:35:26 +02:00
|
|
|
|
/* 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
|
|
|
|
|
* parser-defs.h (struct exp_descriptor): New definition, containing
language-specific info for printing, prefixifying, dumping, and
evaluating expressions.
(exp_descriptor_standard): Declare new variable.
(print_subexp): Make global and declare here (from expprint.c).
(dump_subexp): Ditto.
(dump_subexp_body_standard): Declare.
(operator_length_standard): Declare.
(op_name_standard): Declare.
(print_subexp): Declare.
(print_subexp_standard): Declare.
* language.h (struct language_defn): Add la_exp_desc field to hold
pointer to table for language-specific operators.
Remove evaluate_exp field, which is now in struct exp_descriptor.
* parse.c (operator_length): Move most code to new
operator_length_standard function. Use language-specific information.
(operator_length_standard): New function taking most code from
operator_length.
(exp_descriptor_standard): New constant.
* expression.h (enum exp_opcode): Add definitions of OP_EXTENDED0
and OP_EXTENDED_LAST.
* expprint.c (print_subexp): Use language-specific print_subexp.
Make global; remove static declaration.
Move most code to print_subexp_standard.
(print_subexp_standard): New function, containing code formerly in
print_subexp.
(op_name): Add expression to argument signature.
Use langauge-specific op_name.
Move most code to op_name_standard.
(op_name_standard): New function, containing code formerly in op_name.
(dump_subexp): Use new version of op_name function.
Use language-specific dump_subexp_body, and move most existing code to
dump_subexp_body_standard.
(dump_raw_expression): Use new op_name interface.
(dump_subexp_body): Move most code to dump_subexp_body_standard.
(dump_subexp_body_standard): New function, containing code formerly
in dump_subexp_body.
* language.c (unknown_language): Add default la_exp_desc field and
remove evaluate_exp field.
(auto_language): Ditto.
(local_language): Ditto.
* f-lang.c (f_language_defn): Ditto.
* c-lang.c (c_language_defn): Ditto.
(cplus_language_defn): Ditto.
(asm_language_defn): Ditto.
(minimal_language_defn): Ditto.
* p-lang.c (pascal_language_defn): Ditto.
* m2-lang.c (m2_language_defn): Ditto.
* objc-lang.c (objc_language_defn): Ditto.
* jv-lang.c (exp_descriptor_java): New variable, containing
Java-specific expression evaluator.
(java_language_defn): Add la_exp_desc field and remove evaluate_exp
field.
* scm-lang.c (exp_descriptor_scm): New variable, containing
Scheme-specific expression evaluator.
(scm_language_defn): Add la_exp_desc field and remove evaluate_exp
field.
* objc-lang.c (print_object_command): Take evaluate_exp from the
la_exp_desc field.
* Makefile.in (eval.o): Add dependency on parser-defs.h.
* eval.c: Include parser-defs.h for the full declaration of
la_exp_desc's type.
(evaluate_subexp): Get evaluate_exp out of la_exp_desc field.
2003-09-25 10:40:45 +02:00
|
|
|
|
/* Information needed to print, prefixify, and evaluate expressions for
|
|
|
|
|
a given language. */
|
|
|
|
|
|
|
|
|
|
struct exp_descriptor
|
|
|
|
|
{
|
|
|
|
|
/* Print subexpression. */
|
|
|
|
|
void (*print_subexp) (struct expression *, int *, struct ui_file *,
|
|
|
|
|
enum precedence);
|
|
|
|
|
|
|
|
|
|
/* Returns number of exp_elements needed to represent an operator and
|
|
|
|
|
the number of subexpressions it takes. */
|
|
|
|
|
void (*operator_length) (struct expression*, int, int*, int *);
|
|
|
|
|
|
|
|
|
|
/* Name of this operator for dumping purposes. */
|
|
|
|
|
char *(*op_name) (enum exp_opcode);
|
|
|
|
|
|
|
|
|
|
/* Dump the rest of this (prefix) expression after the operator
|
|
|
|
|
itself has been printed. See dump_subexp_body_standard in
|
|
|
|
|
(expprint.c). */
|
|
|
|
|
int (*dump_subexp_body) (struct expression *, struct ui_file *, int);
|
|
|
|
|
|
|
|
|
|
/* Evaluate an expression. */
|
|
|
|
|
struct value *(*evaluate_exp) (struct type *, struct expression *,
|
|
|
|
|
int *, enum noside);
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Default descriptor containing standard definitions of all
|
|
|
|
|
elements. */
|
|
|
|
|
extern const struct exp_descriptor exp_descriptor_standard;
|
|
|
|
|
|
|
|
|
|
/* Functions used by language-specific extended operators to (recursively)
|
|
|
|
|
print/dump subexpressions. */
|
|
|
|
|
|
|
|
|
|
extern void print_subexp (struct expression *, int *, struct ui_file *,
|
|
|
|
|
enum precedence);
|
|
|
|
|
|
|
|
|
|
extern void print_subexp_standard (struct expression *, int *,
|
|
|
|
|
struct ui_file *, enum precedence);
|
|
|
|
|
|
2002-06-21 16:32:10 +02:00
|
|
|
|
/* Function used to avoid direct calls to fprintf
|
|
|
|
|
in the code generated by the bison parser. */
|
|
|
|
|
|
|
|
|
|
extern void parser_fprintf (FILE *, const char *, ...) ATTR_FORMAT (printf, 2 ,3);
|
|
|
|
|
|
1999-07-07 22:19:36 +02:00
|
|
|
|
#endif /* PARSER_DEFS_H */
|