OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [objcp/] [objcp-lang.c] - Diff between revs 290 and 338

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 290 Rev 338
/* Language-dependent hooks for Objective-C++.
/* Language-dependent hooks for Objective-C++.
   Copyright 2005, 2007, 2008 Free Software Foundation, Inc.
   Copyright 2005, 2007, 2008 Free Software Foundation, Inc.
   Contributed by Ziemowit Laski  <zlaski@apple.com>
   Contributed by Ziemowit Laski  <zlaski@apple.com>
 
 
This file is part of GCC.
This file is part of GCC.
 
 
GCC is free software; you can redistribute it and/or modify
GCC is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3, or (at your option)
the Free Software Foundation; either version 3, or (at your option)
any later version.
any later version.
 
 
GCC is distributed in the hope that it will be useful,
GCC is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.
GNU General Public License for more details.
 
 
You should have received a copy of the GNU General Public License
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING3.  If not see
along with GCC; see the file COPYING3.  If not see
<http://www.gnu.org/licenses/>.  */
<http://www.gnu.org/licenses/>.  */
 
 
 
 
#include "config.h"
#include "config.h"
#include "system.h"
#include "system.h"
#include "coretypes.h"
#include "coretypes.h"
#include "tm.h"
#include "tm.h"
#include "tree.h"
#include "tree.h"
#include "cp-tree.h"
#include "cp-tree.h"
#include "c-common.h"
#include "c-common.h"
#include "toplev.h"
#include "toplev.h"
#include "objc-act.h"
#include "objc-act.h"
#include "langhooks.h"
#include "langhooks.h"
#include "langhooks-def.h"
#include "langhooks-def.h"
#include "diagnostic.h"
#include "diagnostic.h"
#include "debug.h"
#include "debug.h"
#include "cp-objcp-common.h"
#include "cp-objcp-common.h"
#include "except.h"
#include "except.h"
 
 
enum c_language_kind c_language = clk_objcxx;
enum c_language_kind c_language = clk_objcxx;
static void objcxx_init_ts (void);
static void objcxx_init_ts (void);
static tree objcxx_eh_personality (void);
static tree objcxx_eh_personality (void);
 
 
/* Lang hooks common to C++ and ObjC++ are declared in cp/cp-objcp-common.h;
/* Lang hooks common to C++ and ObjC++ are declared in cp/cp-objcp-common.h;
   consequently, there should be very few hooks below.  */
   consequently, there should be very few hooks below.  */
 
 
#undef LANG_HOOKS_NAME
#undef LANG_HOOKS_NAME
#define LANG_HOOKS_NAME "GNU Objective-C++"
#define LANG_HOOKS_NAME "GNU Objective-C++"
#undef LANG_HOOKS_INIT
#undef LANG_HOOKS_INIT
#define LANG_HOOKS_INIT objc_init
#define LANG_HOOKS_INIT objc_init
#undef LANG_HOOKS_DECL_PRINTABLE_NAME
#undef LANG_HOOKS_DECL_PRINTABLE_NAME
#define LANG_HOOKS_DECL_PRINTABLE_NAME  objc_printable_name
#define LANG_HOOKS_DECL_PRINTABLE_NAME  objc_printable_name
#undef LANG_HOOKS_GIMPLIFY_EXPR 
#undef LANG_HOOKS_GIMPLIFY_EXPR 
#define LANG_HOOKS_GIMPLIFY_EXPR objc_gimplify_expr
#define LANG_HOOKS_GIMPLIFY_EXPR objc_gimplify_expr
#undef LANG_HOOKS_INIT_TS
#undef LANG_HOOKS_INIT_TS
#define LANG_HOOKS_INIT_TS objcxx_init_ts
#define LANG_HOOKS_INIT_TS objcxx_init_ts
#undef LANG_HOOKS_EH_PERSONALITY
#undef LANG_HOOKS_EH_PERSONALITY
#define LANG_HOOKS_EH_PERSONALITY objcxx_eh_personality
#define LANG_HOOKS_EH_PERSONALITY objcxx_eh_personality
#undef LANG_HOOKS_EH_RUNTIME_TYPE
#undef LANG_HOOKS_EH_RUNTIME_TYPE
#define LANG_HOOKS_EH_RUNTIME_TYPE build_eh_type_type
#define LANG_HOOKS_EH_RUNTIME_TYPE build_eh_type_type
 
 
/* Each front end provides its own lang hook initializer.  */
/* Each front end provides its own lang hook initializer.  */
struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER;
struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER;
 
 
/* Lang hook routines common to C++ and ObjC++ appear in cp/cp-objcp-common.c;
/* Lang hook routines common to C++ and ObjC++ appear in cp/cp-objcp-common.c;
   there should be very few (if any) routines below.  */
   there should be very few (if any) routines below.  */
 
 
tree
tree
objcp_tsubst_copy_and_build (tree t, tree args, tsubst_flags_t complain,
objcp_tsubst_copy_and_build (tree t, tree args, tsubst_flags_t complain,
                             tree in_decl, bool function_p ATTRIBUTE_UNUSED)
                             tree in_decl, bool function_p ATTRIBUTE_UNUSED)
{
{
#define RECURSE(NODE)                                                   \
#define RECURSE(NODE)                                                   \
  tsubst_copy_and_build (NODE, args, complain, in_decl,                 \
  tsubst_copy_and_build (NODE, args, complain, in_decl,                 \
                         /*function_p=*/false,                          \
                         /*function_p=*/false,                          \
                         /*integral_constant_expression_p=*/false)
                         /*integral_constant_expression_p=*/false)
 
 
  /* The following two can only occur in Objective-C++.  */
  /* The following two can only occur in Objective-C++.  */
 
 
  switch ((int) TREE_CODE (t))
  switch ((int) TREE_CODE (t))
    {
    {
    case MESSAGE_SEND_EXPR:
    case MESSAGE_SEND_EXPR:
      return objc_finish_message_expr
      return objc_finish_message_expr
        (RECURSE (TREE_OPERAND (t, 0)),
        (RECURSE (TREE_OPERAND (t, 0)),
         TREE_OPERAND (t, 1),  /* No need to expand the selector.  */
         TREE_OPERAND (t, 1),  /* No need to expand the selector.  */
         RECURSE (TREE_OPERAND (t, 2)));
         RECURSE (TREE_OPERAND (t, 2)));
 
 
    case CLASS_REFERENCE_EXPR:
    case CLASS_REFERENCE_EXPR:
      return objc_get_class_reference
      return objc_get_class_reference
        (RECURSE (TREE_OPERAND (t, 0)));
        (RECURSE (TREE_OPERAND (t, 0)));
 
 
    default:
    default:
      break;
      break;
    }
    }
 
 
  /* Fall back to C++ processing.  */
  /* Fall back to C++ processing.  */
  return NULL_TREE;
  return NULL_TREE;
 
 
#undef RECURSE
#undef RECURSE
}
}
 
 
static void
static void
objcxx_init_ts (void)
objcxx_init_ts (void)
{
{
  /* objc decls */
  /* objc decls */
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_NON_COMMON] = 1;
 
 
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_WITH_VIS] = 1;
 
 
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_WRTL] = 1;
 
 
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_MINIMAL] = 1;
 
 
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[CLASS_METHOD_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[INSTANCE_METHOD_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[KEYWORD_DECL][TS_DECL_COMMON] = 1;
 
 
  /* C++ decls */
  /* C++ decls */
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_NON_COMMON] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_NON_COMMON] = 1;
 
 
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_WITH_VIS] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_WITH_VIS] = 1;
 
 
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_WRTL] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_WRTL] = 1;
 
 
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_COMMON] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_COMMON] = 1;
 
 
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[NAMESPACE_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[USING_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_MINIMAL] = 1;
  tree_contains_struct[TEMPLATE_DECL][TS_DECL_MINIMAL] = 1;
 
 
  init_shadowed_var_for_decl ();
  init_shadowed_var_for_decl ();
}
}
 
 
static GTY(()) tree objcp_eh_personality_decl;
static GTY(()) tree objcp_eh_personality_decl;
 
 
static tree
static tree
objcxx_eh_personality (void)
objcxx_eh_personality (void)
{
{
  if (!objcp_eh_personality_decl)
  if (!objcp_eh_personality_decl)
    objcp_eh_personality_decl
    objcp_eh_personality_decl
        = build_personality_function (USING_SJLJ_EXCEPTIONS
        = build_personality_function (USING_SJLJ_EXCEPTIONS
                                      ? "__gxx_personality_sj0"
                                      ? "__gxx_personality_sj0"
                                      : "__gxx_personality_v0");
                                      : "__gxx_personality_v0");
 
 
  return objcp_eh_personality_decl;
  return objcp_eh_personality_decl;
}
}
 
 
 
 
void
void
finish_file (void)
finish_file (void)
{
{
  objc_finish_file ();
  objc_finish_file ();
}
}
 
 
#include "gtype-objcp.h"
#include "gtype-objcp.h"
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.