From: Gabriel Dos Reis Date: Thu, 24 Aug 2000 23:42:35 +0000 (+0000) Subject: error.c (tree_formatting_info): New data type. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=a1066c99f7071d94c76612f303b57fab60fdc067;p=gcc.git error.c (tree_formatting_info): New data type. * error.c (tree_formatting_info): New data type. (tree_being_formatted): New macro. (tree_formatting_flags): Likewise. (put_whitespace): Likewise. (print_tree_identifier): Likewise. (print_identifier): Likewise. (cp_tree_printer, print_function_argument_list, print_declaration, print_expression, print_function_declaration, print_function_parameter, print_type, print_cv_qualifier): New functions. (init_error): Initialize lang_printer. From-SVN: r35965 --- diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog index 9028c79bd09..d0d7e0dee49 100644 --- a/gcc/cp/ChangeLog +++ b/gcc/cp/ChangeLog @@ -1,3 +1,17 @@ +2000-08-25 Gabriel Dos Reis + + * error.c (tree_formatting_info): New data type. + (tree_being_formatted): New macro. + (tree_formatting_flags): Likewise. + (put_whitespace): Likewise. + (print_tree_identifier): Likewise. + (print_identifier): Likewise. + (cp_tree_printer, print_function_argument_list, print_declaration, + print_expression, print_function_declaration, + print_function_parameter, print_type, print_cv_qualifier): New + functions. + (init_error): Initialize lang_printer. + 2000-08-24 Jason Merrill * typeck.c (build_ptrmemfunc): Just reinterpret if there's no diff --git a/gcc/cp/error.c b/gcc/cp/error.c index 52612a76390..74d3cba3d04 100644 --- a/gcc/cp/error.c +++ b/gcc/cp/error.c @@ -27,11 +27,30 @@ Boston, MA 02111-1307, USA. */ #include "toplev.h" #include "diagnostic.h" +enum pad { none, before, after }; + +/* This data structure bundles altogether, all the information necessary + for pretty-printing a C++ source-level entity represented by a tree. */ +typedef struct +{ + tree decl; + int flags; + enum pad pad; +} tree_formatting_info, *tfi_t; + +#define tree_being_formatted(TFI) (TFI)->decl +#define tree_formatting_flags(TFI) (TFI)->flags +#define put_whitespace(TFI) (TFI)->pad + typedef const char *cp_printer (); #define obstack_chunk_alloc xmalloc #define obstack_chunk_free free +#define print_tree_identifier(BUFFER, TID) \ + output_add_string (BUFFER, IDENTIFIER_POINTER (TID)) +#define print_identifier(BUFFER, ID) output_add_string (BUFFER, ID) + /* Obstack where we build text strings for overloading, etc. */ static struct obstack scratch_obstack; static char *scratch_firstobj; @@ -56,8 +75,6 @@ static char *scratch_firstobj; # define NEXT_CODE(t) (TREE_CODE (TREE_TYPE (t))) -enum pad { none, before, after }; - static const char *args_to_string PARAMS ((tree, int)); static const char *assop_to_string PARAMS ((enum tree_code, int)); static const char *code_to_string PARAMS ((enum tree_code, int)); @@ -109,6 +126,15 @@ static void cp_diagnostic_finalizer PARAMS ((output_buffer *, static void cp_print_error_function PARAMS ((output_buffer *, diagnostic_context *)); +static int cp_tree_printer PARAMS ((output_buffer *)); +static void print_function_argument_list PARAMS ((output_buffer *, tfi_t)); +static void print_declaration PARAMS ((output_buffer *, tfi_t)); +static void print_expression PARAMS ((output_buffer *, tfi_t)); +static void print_function_declaration PARAMS ((output_buffer *, tfi_t)); +static void print_function_parameter PARAMS ((output_buffer *, int)); +static void print_type PARAMS ((output_buffer *, tfi_t)); +static void print_cv_qualifier PARAMS ((output_buffer *, tfi_t)); + #define A args_to_string #define C code_to_string @@ -156,6 +182,8 @@ init_error () print_error_function = lang_print_error_function; lang_diagnostic_starter = cp_diagnostic_starter; lang_diagnostic_finalizer = cp_diagnostic_finalizer; + + lang_printer = cp_tree_printer; } /* Dump a scope, if deemed necessary. */ @@ -2596,3 +2624,161 @@ print_instantiation_context () (diagnostic_buffer, current_instantiation (), input_filename, lineno); flush_diagnostic_buffer (); } + +/* Called from output_format -- during diagnostic message processing -- + to handle C++ specific format specifier with the following meanings: + %A function argument-list. + %D declaration. + %E expression. + %F function declaration. + %P function parameter whose position is indicated by an integer. + %T type. + %V cv-qualifier. */ +static int +cp_tree_printer (buffer) + output_buffer *buffer; +{ + int be_verbose = 0; + tree_formatting_info tfi; + + put_whitespace (&tfi) = none; + + if (*output_buffer_text_cursor (buffer) == '+') + ++output_buffer_text_cursor (buffer); + if (*output_buffer_text_cursor (buffer) == '#') + { + be_verbose = 1; + ++output_buffer_text_cursor (buffer); + } + + if (*output_buffer_text_cursor (buffer) == 'P') + print_function_parameter + (buffer, va_arg (output_buffer_format_args (buffer), int)); + else + { + tree_being_formatted (&tfi) = + va_arg (output_buffer_format_args (buffer), tree); + + switch (*output_buffer_text_cursor (buffer)) + { + case 'A': + print_function_argument_list (buffer, &tfi); + break; + + case 'D': + print_declaration (buffer, &tfi); + break; + + case 'E': + print_expression (buffer, &tfi); + break; + + case 'F': + print_function_declaration (buffer, &tfi); + break; + + case 'T': + print_type (buffer, &tfi); + break; + + case 'V': + print_cv_qualifier (buffer, &tfi); + break; + + default: + return 0; + } + } + + return 1; +} + +/* Print a function argument-list represented by tree_being_formatted (TFI) + onto BUFFER. */ +static void +print_function_argument_list (buffer, tfi) + output_buffer *buffer __attribute__ ((__unused__)); + tfi_t tfi __attribute__ ((__unused__)); +{ +} + +/* Print a declaration represented by tree_being_formatted (TFI) + onto buffer. */ +static void +print_declaration (buffer, tfi) + output_buffer *buffer __attribute__ ((__unused__)); + tfi_t tfi __attribute__ ((__unused__)); +{ +} + +/* Print an expression represented by tree_being_formatted (TFI) + onto BUFFER. */ +static void +print_expression (buffer, tfi) + output_buffer *buffer __attribute__ ((__unused__)); + tfi_t tfi __attribute__ ((__unused__)); +{ +} + +/* Print a function declaration represented by tree_being_formatted (TFI) + onto BUFFER. */ +static void +print_function_declaration (buffer, tfi) + output_buffer *buffer __attribute__ ((__unused__)); + tfi_t tfi __attribute__ ((__unused__)); +{ +} + +/* Print a type represented by tree_being_formattted (TFI) onto BUFFER. */ +static void +print_type (buffer, tfi) + output_buffer *buffer __attribute__ ((__unused__)); + tfi_t tfi __attribute__ ((__unused__)); +{ +} + +/* Print the N'th function parameter onto BUFFER. A negative value of N + means the implicit "this" parameter of a member function. */ +static void +print_function_parameter (buffer, n) + output_buffer *buffer; + int n; +{ + if (n < 0) + print_identifier (buffer, "this"); + else + output_decimal (buffer, n + 1); +} + +/* Print the cv-quafilers of tree_being_formatted (TFI) onto BUFFER. */ +static void +print_cv_qualifier (buffer, tfi) + output_buffer *buffer; + tree_formatting_info *tfi; +{ + int cv = TYPE_QUALS (tree_being_formatted (tfi)); + int pad_after = after == put_whitespace (tfi); + static const int mask[] + = {TYPE_QUAL_CONST, TYPE_QUAL_VOLATILE, TYPE_QUAL_RESTRICT}; + static const char *const qualifier[] + = { "const", "volatile", "__restrict__" }; + + if (cv != 0) + { + int i; + for (i = 0; i != 3; ++i) + if (mask[i] & cv) + { + if (put_whitespace (tfi) == before) + output_add_space (buffer); + print_identifier (buffer, qualifier[i]); + put_whitespace (tfi) = before; + } + + if (pad_after) + { + output_add_space (buffer); + put_whitespace (tfi) = none; + } + } +}