gcc/objcp/objcp-lang.cc

   1 /* Language-dependent hooks for Objective-C++.
   2    Copyright (C) 2005-2023 Free Software Foundation, Inc.
   3    Contributed by Ziemowit Laski  <zlaski@apple.com>
   4
   5 This file is part of GCC.
   6
   7 GCC is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 3, or (at your option)
  10 any later version.
  11
  12 GCC is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with GCC; see the file COPYING3.  If not see
  19 <http://www.gnu.org/licenses/>.  */
  20
  21 #include "config.h"
  22 #include "system.h"
  23 #include "coretypes.h"
  24 #include "cp-tree.h"
  25 #include "c-family/c-objc.h"
  26 #include "objc-act.h"
  27 #include "langhooks.h"
  28 #include "langhooks-def.h"
  29 #include "cp-objcp-common.h"
  30
  31 enum c_language_kind c_language = clk_objcxx;
  32 static void objcxx_init_ts (void);
  33
  34 /* Lang hooks common to C++ and ObjC++ are declared in cp/cp-objcp-common.h;
  35    consequently, there should be very few hooks below.  */
  36
  37 #undef LANG_HOOKS_NAME
  38 #define LANG_HOOKS_NAME "GNU Objective-C++"
  39 #undef LANG_HOOKS_INIT
  40 #define LANG_HOOKS_INIT objc_init
  41 #undef LANG_HOOKS_GIMPLIFY_EXPR
  42 #define LANG_HOOKS_GIMPLIFY_EXPR objc_gimplify_expr
  43 #undef LANG_HOOKS_INIT_TS
  44 #define LANG_HOOKS_INIT_TS objcxx_init_ts
  45
  46 /* Each front end provides its own lang hook initializer.  */
  47 struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER;
  48
  49 /* Lang hook routines common to C++ and ObjC++ appear in cp/cp-objcp-common.cc;
  50    there should be very few (if any) routines below.  */
  51
  52 tree
  53 objcp_tsubst_expr (tree t, tree args, tsubst_flags_t complain, tree in_decl)
  54 {
  55 #define RECURSE(NODE)                                                   \
  56   tsubst_expr (NODE, args, complain, in_decl)
  57
  58   /* The following two can only occur in Objective-C++.  */
  59
  60   switch ((int) TREE_CODE (t))
  61     {
  62     case MESSAGE_SEND_EXPR:
  63       return objc_finish_message_expr
  64         (RECURSE (TREE_OPERAND (t, 0)),
  65          TREE_OPERAND (t, 1),  /* No need to expand the selector.  */
  66          RECURSE (TREE_OPERAND (t, 2)), NULL);
  67
  68     case CLASS_REFERENCE_EXPR:
  69       {
  70         tree ident = TREE_OPERAND (t, 0);
  71         if (TYPE_P (ident))
  72           ident = tsubst (ident, args, complain, in_decl);
  73         else
  74           ident = RECURSE (ident);
  75         return objc_get_class_reference (ident);
  76       }
  77
  78     default:
  79       break;
  80     }
  81
  82   /* Fall back to C++ processing.  */
  83   return NULL_TREE;
  84
  85 #undef RECURSE
  86 }
  87
  88 /* Implement c-family hook to add language-specific features
  89    for __has_{feature,extension}.  */
  90
  91 void
  92 c_family_register_lang_features ()
  93 {
  94   objc_common_register_features ();
  95   cp_register_features ();
  96 }
  97
  98 static void
  99 objcxx_init_ts (void)
 100 {
 101   objc_common_init_ts ();
 102   cp_common_init_ts ();
 103 }
 104
 105 #include "gtype-objcp.h"