81f653d624
gcc/ada/ * gcc-interface/ada-tree.h (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. * gcc-interface/misc.c (gnat_init_ts): New function. (LANG_HOOKS_INIT_TS): Define. gcc/ * c-decl.c (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. * print-tree.c (print_node): Likewise. * tree-inline.c (copy_tree_r): Likewise. * c-lang.c (LANG_HOOKS_INIT_TS): Define. * lto-streamer-in.c (lto_input_tree_pointers): Check for TS_TYPED instead of TS_COMMON. * lto-streamer-out.c (lto_output_tree_pointers): Likewise. * tree.c (initialize_tree_contains_struct): Handle TS_TYPED. (copy_node_stat): Zero TREE_CHAIN only if necessary. (MARK_TS_BASE, MARK_TS_TYPED, MARK_TS_COMMON): Move these... (MARK_TS_DECL_COMMON, MARK_TS_DECL_COMMON, MARK_TS_DECL_WRTL): ...and these... (MARK_TS_DECL_WITH_VIS, MARK_TS_DECL_NON_COMMON): ...and these... * tree.h: ...here. (TREE_CHAIN): Check for a TS_COMMON structure. (TREE_TYPE): Check for a TS_TYPED structure. gcc/c-family/ * c-common.h (c_common_init_ts): Declare. * c-common.c (c_common_init_ts): Define. gcc/cp/ * cp-lang.c (cp_init_ts): Call cp_common_init_ts. Move tree_contains_struct initialization to... * cp-objcp-common.c (cp_common_init_ts): ...here. Use MARK_* macros. * cp-objcp-common.h (cp_common_init_ts): Declare. * cp-tree.h (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. gcc/fortran/ * f95-lang.c (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. gcc/go/ * go-lang.c (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. gcc/java/ * java-tree.h (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. gcc/lto/ * lto-tree.h (union lang_tree_node): Check for TS_COMMON before calling TREE_CHAIN. * lto.c (lto_fixup_common): Likewise. gcc/objc/ * objc-lang.c (objc_init_ts): Move code for this function... * objc-act.c (objc_common_init_ts): ...here. Define. * objc-act.h (objc_common_init_ts): Declare. gcc/objcp/ * objcp-lang.c (objcxx_init_ts): Call objc_common_init_ts and cp_common_init_ts. From-SVN: r172359
99 lines
2.8 KiB
C
99 lines
2.8 KiB
C
/* Language-dependent hooks for Objective-C++.
|
|
Copyright 2005, 2007, 2008, 2010, 2011 Free Software Foundation, Inc.
|
|
Contributed by Ziemowit Laski <zlaski@apple.com>
|
|
|
|
This file is part of GCC.
|
|
|
|
GCC 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 3, or (at your option)
|
|
any later version.
|
|
|
|
GCC 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 GCC; see the file COPYING3. If not see
|
|
<http://www.gnu.org/licenses/>. */
|
|
|
|
#include "config.h"
|
|
#include "system.h"
|
|
#include "coretypes.h"
|
|
#include "tm.h"
|
|
#include "tree.h"
|
|
#include "cp-tree.h"
|
|
#include "c-family/c-common.h"
|
|
#include "c-family/c-objc.h"
|
|
#include "objc-act.h"
|
|
#include "langhooks.h"
|
|
#include "langhooks-def.h"
|
|
#include "target.h"
|
|
#include "cp-objcp-common.h"
|
|
|
|
enum c_language_kind c_language = clk_objcxx;
|
|
static void objcxx_init_ts (void);
|
|
|
|
/* Lang hooks common to C++ and ObjC++ are declared in cp/cp-objcp-common.h;
|
|
consequently, there should be very few hooks below. */
|
|
|
|
#undef LANG_HOOKS_NAME
|
|
#define LANG_HOOKS_NAME "GNU Objective-C++"
|
|
#undef LANG_HOOKS_INIT
|
|
#define LANG_HOOKS_INIT objc_init
|
|
#undef LANG_HOOKS_GIMPLIFY_EXPR
|
|
#define LANG_HOOKS_GIMPLIFY_EXPR objc_gimplify_expr
|
|
#undef LANG_HOOKS_INIT_TS
|
|
#define LANG_HOOKS_INIT_TS objcxx_init_ts
|
|
|
|
/* Each front end provides its own lang hook initializer. */
|
|
struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER;
|
|
|
|
/* Lang hook routines common to C++ and ObjC++ appear in cp/cp-objcp-common.c;
|
|
there should be very few (if any) routines below. */
|
|
|
|
tree
|
|
objcp_tsubst_copy_and_build (tree t, tree args, tsubst_flags_t complain,
|
|
tree in_decl, bool function_p ATTRIBUTE_UNUSED)
|
|
{
|
|
#define RECURSE(NODE) \
|
|
tsubst_copy_and_build (NODE, args, complain, in_decl, \
|
|
/*function_p=*/false, \
|
|
/*integral_constant_expression_p=*/false)
|
|
|
|
/* The following two can only occur in Objective-C++. */
|
|
|
|
switch ((int) TREE_CODE (t))
|
|
{
|
|
case MESSAGE_SEND_EXPR:
|
|
return objc_finish_message_expr
|
|
(RECURSE (TREE_OPERAND (t, 0)),
|
|
TREE_OPERAND (t, 1), /* No need to expand the selector. */
|
|
RECURSE (TREE_OPERAND (t, 2)), NULL);
|
|
|
|
case CLASS_REFERENCE_EXPR:
|
|
return objc_get_class_reference
|
|
(RECURSE (TREE_OPERAND (t, 0)));
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
/* Fall back to C++ processing. */
|
|
return NULL_TREE;
|
|
|
|
#undef RECURSE
|
|
}
|
|
|
|
static void
|
|
objcxx_init_ts (void)
|
|
{
|
|
objc_common_init_ts ();
|
|
cp_common_init_ts ();
|
|
|
|
init_shadowed_var_for_decl ();
|
|
}
|
|
|
|
#include "gtype-objcp.h"
|