mirror of
git://gcc.gnu.org/git/gcc.git
synced 2024-12-21 08:03:41 +08:00
2ce07e2d92
gcc: * c-common.h (make_fname_decl): Declare. * c-common.c (make_fname_decl): Define. (declare_hidden_char_array): Remove. (declare_function_name): Use make_fname_decl. * c-decl.c (c_make_fname_decl): New function. (init_decl_processing): Set make_fname_decl. gcc/cp: * decl.c (cp_make_fname_decl): New function. (wrapup_globals_for_namespace): Don't emit unused static vars. (init_decl_processing): Remove comment about use of array_domain_type. Set make_fname_decl. (cp_finish_decl): Remove __FUNCTION__ nadgering. * semantics.c (begin_compound_stmt): Remove current_function_name_declared flagging. (expand_stmt): Don't emit unused local statics. * typeck.c (decay_conversion): Don't treat __FUNCTION__ decls specially. From-SVN: r32418
143 lines
5.8 KiB
C
143 lines
5.8 KiB
C
/* Definitions for c-common.c.
|
|
Copyright (C) 1987, 1993, 1994, 1995, 1997, 1998,
|
|
1999, 2000 Free Software Foundation, Inc.
|
|
|
|
This file is part of GNU CC.
|
|
|
|
GNU CC 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, or (at your option)
|
|
any later version.
|
|
|
|
GNU CC 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 GNU CC; see the file COPYING. If not, write to
|
|
the Free Software Foundation, 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
/* Standard named or nameless data types of the C compiler. */
|
|
|
|
enum c_tree_index
|
|
{
|
|
CTI_WCHAR_TYPE,
|
|
CTI_SIGNED_WCHAR_TYPE,
|
|
CTI_UNSIGNED_WCHAR_TYPE,
|
|
CTI_WIDEST_INT_LIT_TYPE,
|
|
CTI_WIDEST_UINT_LIT_TYPE,
|
|
|
|
CTI_CHAR_ARRAY_TYPE,
|
|
CTI_WCHAR_ARRAY_TYPE,
|
|
CTI_INT_ARRAY_TYPE,
|
|
CTI_STRING_TYPE,
|
|
CTI_CONST_STRING_TYPE,
|
|
|
|
CTI_BOOLEAN_TYPE,
|
|
CTI_BOOLEAN_TRUE,
|
|
CTI_BOOLEAN_FALSE,
|
|
CTI_DEFAULT_FUNCTION_TYPE,
|
|
CTI_VOID_LIST,
|
|
|
|
CTI_VOID_FTYPE,
|
|
CTI_VOID_FTYPE_PTR,
|
|
CTI_INT_FTYPE_INT,
|
|
CTI_PTR_FTYPE_SIZETYPE,
|
|
|
|
CTI_MAX
|
|
};
|
|
|
|
extern tree c_global_trees[CTI_MAX];
|
|
|
|
#define wchar_type_node c_global_trees[CTI_WCHAR_TYPE]
|
|
#define signed_wchar_type_node c_global_trees[CTI_SIGNED_WCHAR_TYPE]
|
|
#define unsigned_wchar_type_node c_global_trees[CTI_UNSIGNED_WCHAR_TYPE]
|
|
#define widest_integer_literal_type_node c_global_trees[CTI_WIDEST_INT_LIT_TYPE]
|
|
#define widest_unsigned_literal_type_node c_global_trees[CTI_WIDEST_UINT_LIT_TYPE]
|
|
|
|
#define boolean_type_node c_global_trees[CTI_BOOLEAN_TYPE]
|
|
#define boolean_true_node c_global_trees[CTI_BOOLEAN_TRUE]
|
|
#define boolean_false_node c_global_trees[CTI_BOOLEAN_FALSE]
|
|
|
|
#define char_array_type_node c_global_trees[CTI_CHAR_ARRAY_TYPE]
|
|
#define wchar_array_type_node c_global_trees[CTI_WCHAR_ARRAY_TYPE]
|
|
#define int_array_type_node c_global_trees[CTI_INT_ARRAY_TYPE]
|
|
#define string_type_node c_global_trees[CTI_STRING_TYPE]
|
|
#define const_string_type_node c_global_trees[CTI_CONST_STRING_TYPE]
|
|
|
|
#define default_function_type c_global_trees[CTI_DEFAULT_FUNCTION_TYPE]
|
|
#define void_list_node c_global_trees[CTI_VOID_LIST]
|
|
#define void_ftype c_global_trees[CTI_VOID_FTYPE]
|
|
#define void_ftype_ptr c_global_trees[CTI_VOID_FTYPE_PTR]
|
|
#define int_ftype_int c_global_trees[CTI_INT_FTYPE_INT]
|
|
#define ptr_ftype_sizetype c_global_trees[CTI_PTR_FTYPE_SIZETYPE]
|
|
|
|
/* Pointer to function to generate the VAR_DECL for __FUNCTION__ etc.
|
|
ID is the identifier to use, NAME is the string.
|
|
TYPE_DEP indicates whether it depends on type of the function or not
|
|
(i.e. __PRETTY_FUNCTION__). */
|
|
|
|
extern tree (*make_fname_decl) PARAMS ((tree, const char *, int));
|
|
|
|
extern void declare_function_name PARAMS ((void));
|
|
extern void decl_attributes PARAMS ((tree, tree, tree));
|
|
extern void init_function_format_info PARAMS ((void));
|
|
extern void check_function_format PARAMS ((tree, tree, tree));
|
|
extern void c_apply_type_quals_to_decl PARAMS ((int, tree));
|
|
extern int c_get_alias_set PARAMS ((tree));
|
|
/* Print an error message for invalid operands to arith operation CODE.
|
|
NOP_EXPR is used as a special case (see truthvalue_conversion). */
|
|
extern void binary_op_error PARAMS ((enum tree_code));
|
|
extern void c_expand_expr_stmt PARAMS ((tree));
|
|
extern void c_expand_start_cond PARAMS ((tree, int, int));
|
|
extern void c_expand_start_else PARAMS ((void));
|
|
extern void c_expand_end_cond PARAMS ((void));
|
|
/* Validate the expression after `case' and apply default promotions. */
|
|
extern tree check_case_value PARAMS ((tree));
|
|
/* Concatenate a list of STRING_CST nodes into one STRING_CST. */
|
|
extern tree combine_strings PARAMS ((tree));
|
|
extern void constant_expression_warning PARAMS ((tree));
|
|
extern tree convert_and_check PARAMS ((tree, tree));
|
|
extern void overflow_warning PARAMS ((tree));
|
|
extern void unsigned_conversion_warning PARAMS ((tree, tree));
|
|
/* Read the rest of the current #-directive line. */
|
|
#if USE_CPPLIB
|
|
extern char *get_directive_line PARAMS ((void));
|
|
#define GET_DIRECTIVE_LINE() get_directive_line ()
|
|
#else
|
|
extern char *get_directive_line PARAMS ((FILE *));
|
|
#define GET_DIRECTIVE_LINE() get_directive_line (finput)
|
|
#endif
|
|
|
|
/* Subroutine of build_binary_op, used for comparison operations.
|
|
See if the operands have both been converted from subword integer types
|
|
and, if so, perhaps change them both back to their original type. */
|
|
extern tree shorten_compare PARAMS ((tree *, tree *, tree *, enum tree_code *));
|
|
/* Prepare expr to be an argument of a TRUTH_NOT_EXPR,
|
|
or validate its data type for an `if' or `while' statement or ?..: exp. */
|
|
extern tree truthvalue_conversion PARAMS ((tree));
|
|
extern tree type_for_mode PARAMS ((enum machine_mode, int));
|
|
extern tree type_for_size PARAMS ((unsigned, int));
|
|
|
|
/* Build tree nodes and builtin functions common to both C and C++ language
|
|
frontends. */
|
|
extern void c_common_nodes_and_builtins PARAMS ((int, int, int));
|
|
|
|
extern tree build_va_arg PARAMS ((tree, tree));
|
|
|
|
/* Nonzero if the type T promotes to itself.
|
|
ANSI C states explicitly the list of types that promote;
|
|
in particular, short promotes to int even if they have the same width. */
|
|
#define C_PROMOTING_INTEGER_TYPE_P(t) \
|
|
(TREE_CODE ((t)) == INTEGER_TYPE \
|
|
&& (TYPE_MAIN_VARIANT (t) == char_type_node \
|
|
|| TYPE_MAIN_VARIANT (t) == signed_char_type_node \
|
|
|| TYPE_MAIN_VARIANT (t) == unsigned_char_type_node \
|
|
|| TYPE_MAIN_VARIANT (t) == short_integer_type_node \
|
|
|| TYPE_MAIN_VARIANT (t) == short_unsigned_type_node))
|
|
|
|
extern int self_promoting_args_p PARAMS ((tree));
|
|
extern tree simple_type_promotes_to PARAMS ((tree));
|