* trans-stmt.c (gfc_trans_simple_do): New function.
[official-gcc.git] / libiberty / cp-demangle.h
blob02e74ec8735365788bab6ed5c80ed663083a03a4
1 /* Internal demangler interface for g++ V3 ABI.
2 Copyright (C) 2003, 2004 Free Software Foundation, Inc.
3 Written by Ian Lance Taylor <ian@wasabisystems.com>.
5 This file is part of the libiberty library, which is part of GCC.
7 This file 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 2 of the License, or
10 (at your option) any later version.
12 In addition to the permissions in the GNU General Public License, the
13 Free Software Foundation gives you unlimited permission to link the
14 compiled version of this file into combinations with other programs,
15 and to distribute those combinations without any restriction coming
16 from the use of this file. (The General Public License restrictions
17 do apply in other respects; for example, they cover modification of
18 the file, and distribution when not linked into a combined
19 executable.)
21 This program is distributed in the hope that it will be useful,
22 but WITHOUT ANY WARRANTY; without even the implied warranty of
23 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 GNU General Public License for more details.
26 You should have received a copy of the GNU General Public License
27 along with this program; if not, write to the Free Software
28 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
31 /* This file provides some definitions shared by cp-demangle.c and
32 cp-demint.c. It should not be included by any other files. */
34 /* Information we keep for operators. */
36 struct demangle_operator_info
38 /* Mangled name. */
39 const char *code;
40 /* Real name. */
41 const char *name;
42 /* Length of real name. */
43 int len;
44 /* Number of arguments. */
45 int args;
48 /* How to print the value of a builtin type. */
50 enum d_builtin_type_print
52 /* Print as (type)val. */
53 D_PRINT_DEFAULT,
54 /* Print as integer. */
55 D_PRINT_INT,
56 /* Print as unsigned integer, with trailing "u". */
57 D_PRINT_UNSIGNED,
58 /* Print as long, with trailing "l". */
59 D_PRINT_LONG,
60 /* Print as unsigned long, with trailing "ul". */
61 D_PRINT_UNSIGNED_LONG,
62 /* Print as long long, with trailing "ll". */
63 D_PRINT_LONG_LONG,
64 /* Print as unsigned long long, with trailing "ull". */
65 D_PRINT_UNSIGNED_LONG_LONG,
66 /* Print as bool. */
67 D_PRINT_BOOL,
68 /* Print as float--put value in square brackets. */
69 D_PRINT_FLOAT,
70 /* Print in usual way, but here to detect void. */
71 D_PRINT_VOID
74 /* Information we keep for a builtin type. */
76 struct demangle_builtin_type_info
78 /* Type name. */
79 const char *name;
80 /* Length of type name. */
81 int len;
82 /* Type name when using Java. */
83 const char *java_name;
84 /* Length of java name. */
85 int java_len;
86 /* How to print a value of this type. */
87 enum d_builtin_type_print print;
90 /* The information structure we pass around. */
92 struct d_info
94 /* The string we are demangling. */
95 const char *s;
96 /* The end of the string we are demangling. */
97 const char *send;
98 /* The options passed to the demangler. */
99 int options;
100 /* The next character in the string to consider. */
101 const char *n;
102 /* The array of components. */
103 struct demangle_component *comps;
104 /* The index of the next available component. */
105 int next_comp;
106 /* The number of available component structures. */
107 int num_comps;
108 /* The array of substitutions. */
109 struct demangle_component **subs;
110 /* The index of the next substitution. */
111 int next_sub;
112 /* The number of available entries in the subs array. */
113 int num_subs;
114 /* The number of substitutions which we actually made from the subs
115 array, plus the number of template parameter references we
116 saw. */
117 int did_subs;
118 /* The last name we saw, for constructors and destructors. */
119 struct demangle_component *last_name;
120 /* A running total of the length of large expansions from the
121 mangled name to the demangled name, such as standard
122 substitutions and builtin types. */
123 int expansion;
126 #define d_peek_char(di) (*((di)->n))
127 #define d_peek_next_char(di) ((di)->n[1])
128 #define d_advance(di, i) ((di)->n += (i))
129 #define d_next_char(di) (*((di)->n++))
130 #define d_str(di) ((di)->n)
132 /* Functions and arrays in cp-demangle.c which are referenced by
133 functions in cp-demint.c. */
134 #ifdef IN_GLIBCPP_V3
135 #define CP_STATIC_IF_GLIBCPP_V3 static
136 #else
137 #define CP_STATIC_IF_GLIBCPP_V3 extern
138 #endif
140 CP_STATIC_IF_GLIBCPP_V3
141 const struct demangle_operator_info cplus_demangle_operators[];
143 #define D_BUILTIN_TYPE_COUNT (26)
145 CP_STATIC_IF_GLIBCPP_V3
146 const struct demangle_builtin_type_info
147 cplus_demangle_builtin_types[D_BUILTIN_TYPE_COUNT];
149 CP_STATIC_IF_GLIBCPP_V3
150 struct demangle_component *
151 cplus_demangle_mangled_name PARAMS ((struct d_info *, int));
153 CP_STATIC_IF_GLIBCPP_V3
154 struct demangle_component *
155 cplus_demangle_type PARAMS ((struct d_info *));
157 extern void
158 cplus_demangle_init_info PARAMS ((const char *, int, size_t, struct d_info *));
160 /* cp-demangle.c needs to define this a little differently */
161 #undef CP_STATIC_IF_GLIBCPP_V3