Fix gnat.dg/opt39.adb on hppa.
[official-gcc.git] / gcc / c / c-lang.h
blob4fea11855f1de53f77718f6097aa325cc6608814
1 /* Definitions for C language specific types.
2 Copyright (C) 2009-2023 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
9 version.
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 for more details.
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>. */
20 #ifndef GCC_C_LANG_H
21 #define GCC_C_LANG_H
23 #include "c-family/c-common.h"
25 /* In a RECORD_TYPE, a sorted array of the fields of the type, not a
26 tree for size reasons. */
27 struct GTY(()) sorted_fields_type {
28 int len;
29 tree GTY((length ("%h.len"))) elts[1];
32 struct GTY(()) lang_type {
33 /* In a RECORD_TYPE, a sorted array of the fields of the type. */
34 struct sorted_fields_type * GTY ((reorder ("resort_sorted_fields"))) s;
35 /* In an ENUMERAL_TYPE, the min and max values. */
36 tree enum_min;
37 tree enum_max;
38 /* In a RECORD_TYPE, information specific to Objective-C, such
39 as a list of adopted protocols or a pointer to a corresponding
40 @interface. See objc/objc-act.h for details. */
41 tree objc_info;
44 struct GTY(()) lang_decl {
45 char dummy;
48 /* Save and restore the variables in this file and elsewhere
49 that keep track of the progress of compilation of the current function.
50 Used for nested functions. */
52 struct GTY(()) language_function {
53 struct c_language_function base;
54 unsigned char x_in_statement;
55 struct c_switch * GTY((skip)) x_switch_stack;
56 struct c_arg_info * GTY((skip)) arg_info;
57 int returns_value;
58 int returns_null;
59 int returns_abnormally;
60 int warn_about_return_type;
63 struct GTY(()) c_omp_declare_target_attr {
64 int device_type;
67 /* If non-zero, implicit "omp declare target" attribute is added into the
68 attribute lists. */
69 extern GTY(()) vec<c_omp_declare_target_attr, va_gc>
70 *current_omp_declare_target_attribute;
71 /* Similarly whether we are in between #pragma omp begin assumes and
72 #pragma omp end assumes (and how many times when nested). */
73 extern GTY(()) int current_omp_begin_assumes;
75 #endif /* ! GCC_C_LANG_H */