]> git.saurik.com Git - bison.git/blob - data/c++.m4
Partial m4sugar merge from autoconf: m4_shiftn.
[bison.git] / data / c++.m4
1 -*- Autoconf -*-
2
3 # C++ skeleton for Bison
4
5 # Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation,
6 # Inc.
7
8 # This program is free software: you can redistribute it and/or modify
9 # it under the terms of the GNU General Public License as published by
10 # the Free Software Foundation, either version 3 of the License, or
11 # (at your option) any later version.
12 #
13 # This program is distributed in the hope that it will be useful,
14 # but WITHOUT ANY WARRANTY; without even the implied warranty of
15 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 # GNU General Public License for more details.
17 #
18 # You should have received a copy of the GNU General Public License
19 # along with this program. If not, see <http://www.gnu.org/licenses/>.
20
21 m4_include(b4_pkgdatadir/[c.m4])
22
23 ## ---------------- ##
24 ## Default values. ##
25 ## ---------------- ##
26
27 # Default parser class name.
28 b4_percent_define_default([[parser_class_name]], [[parser]])
29 b4_percent_define_default([[location_type]], [[location]])
30 b4_percent_define_default([[filename_type]], [[std::string]])
31 b4_percent_define_default([[namespace]], m4_defn([b4_prefix]))
32 b4_percent_define_default([[global_tokens_and_yystype]], [[false]])
33 b4_percent_define_default([[define_location_comparison]],
34 [m4_if(b4_percent_define_get([[filename_type]]),
35 [std::string], [[true]], [[false]])])
36
37
38 ## ----------- ##
39 ## Namespace. ##
40 ## ----------- ##
41
42 m4_define([b4_namespace_ref], [b4_percent_define_get([[namespace]])])
43
44 # Don't permit an empty b4_namespace_ref. Any `::parser::foo' appended to it
45 # would compile as an absolute reference with `parser' in the global namespace.
46 # b4_namespace_open would open an anonymous namespace and thus establish
47 # internal linkage. This would compile. However, it's cryptic, and internal
48 # linkage for the parser would be specified in all translation units that
49 # include the header, which is always generated. If we ever need to permit
50 # internal linkage somehow, surely we can find a cleaner approach.
51 m4_if(m4_bregexp(b4_namespace_ref, [^[ ]*$]), [-1], [],
52 [b4_complain_at(b4_percent_define_get_loc([[namespace]]),
53 [[namespace reference is empty]])])
54
55 # Instead of assuming the C++ compiler will do it, Bison should reject any
56 # invalid b4_namepsace_ref that would be converted to a valid
57 # b4_namespace_open. The problem is that Bison doesn't always output
58 # b4_namespace_ref to uncommented code but should reserve the ability to do so
59 # in future releases without risking breaking any existing user grammars.
60 # Specifically, don't allow empty names as b4_namespace_open would just convert
61 # those into anonymous namespaces, and that might tempt some users.
62 m4_if(m4_bregexp(b4_namespace_ref, [::[ ]*::]), [-1], [],
63 [b4_complain_at(b4_percent_define_get_loc([[namespace]]),
64 [[namespace reference has consecutive "::"]])])
65 m4_if(m4_bregexp(b4_namespace_ref, [::[ ]*$]), [-1], [],
66 [b4_complain_at(b4_percent_define_get_loc([[namespace]]),
67 [[namespace reference has a trailing "::"]])])
68
69 m4_define([b4_namespace_open],
70 [b4_user_code([b4_percent_define_get_syncline([[namespace]])
71 [namespace ]m4_bpatsubst(m4_dquote(m4_bpatsubst(m4_dquote(b4_namespace_ref),
72 [^\(.\)[ ]*::], [\1])),
73 [::], [ { namespace ])[ {]])])
74
75 m4_define([b4_namespace_close],
76 [b4_user_code([b4_percent_define_get_syncline([[namespace]])
77 m4_bpatsubst(m4_dquote(m4_bpatsubst(m4_dquote(b4_namespace_ref),
78 [^\(.\)[ ]*\(::\)?\([^][:]\|:[^][:]\)*],
79 [\1])),
80 [::\([^][:]\|:[^][:]\)*], [} ])[} // ]b4_namespace_ref])])
81
82
83 # b4_token_enums(LIST-OF-PAIRS-TOKEN-NAME-TOKEN-NUMBER)
84 # -----------------------------------------------------
85 # Output the definition of the tokens as enums.
86 m4_define([b4_token_enums],
87 [/* Tokens. */
88 enum yytokentype {
89 m4_map_sep([ b4_token_enum], [,
90 ],
91 [$@])
92 };
93 ])
94
95
96 ## ----------------- ##
97 ## Semantic Values. ##
98 ## ----------------- ##
99
100
101 # b4_lhs_value([TYPE])
102 # --------------------
103 # Expansion of $<TYPE>$.
104 m4_define([b4_lhs_value],
105 [(yyval[]m4_ifval([$1], [.$1]))])
106
107
108 # b4_rhs_value(RULE-LENGTH, NUM, [TYPE])
109 # --------------------------------------
110 # Expansion of $<TYPE>NUM, where the current rule has RULE-LENGTH
111 # symbols on RHS.
112 m4_define([b4_rhs_value],
113 [(yysemantic_stack_@{($1) - ($2)@}m4_ifval([$3], [.$3]))])
114
115 # b4_lhs_location()
116 # -----------------
117 # Expansion of @$.
118 m4_define([b4_lhs_location],
119 [(yyloc)])
120
121
122 # b4_rhs_location(RULE-LENGTH, NUM)
123 # ---------------------------------
124 # Expansion of @NUM, where the current rule has RULE-LENGTH symbols
125 # on RHS.
126 m4_define([b4_rhs_location],
127 [(yylocation_stack_@{($1) - ($2)@})])
128
129
130 # b4_parse_param_decl
131 # -------------------
132 # Extra formal arguments of the constructor.
133 # Change the parameter names from "foo" into "foo_yyarg", so that
134 # there is no collision bw the user chosen attribute name, and the
135 # argument name in the constructor.
136 m4_define([b4_parse_param_decl],
137 [m4_ifset([b4_parse_param],
138 [m4_map_sep([b4_parse_param_decl_1], [, ], [b4_parse_param])])])
139
140 m4_define([b4_parse_param_decl_1],
141 [$1_yyarg])
142
143
144
145 # b4_parse_param_cons
146 # -------------------
147 # Extra initialisations of the constructor.
148 m4_define([b4_parse_param_cons],
149 [m4_ifset([b4_parse_param],
150 [
151 b4_cc_constructor_calls(b4_parse_param)])])
152 m4_define([b4_cc_constructor_calls],
153 [m4_map_sep([b4_cc_constructor_call], [,
154 ], [$@])])
155 m4_define([b4_cc_constructor_call],
156 [$2 ($2_yyarg)])
157
158 # b4_parse_param_vars
159 # -------------------
160 # Extra instance variables.
161 m4_define([b4_parse_param_vars],
162 [m4_ifset([b4_parse_param],
163 [
164 /* User arguments. */
165 b4_cc_var_decls(b4_parse_param)])])
166 m4_define([b4_cc_var_decls],
167 [m4_map_sep([b4_cc_var_decl], [
168 ], [$@])])
169 m4_define([b4_cc_var_decl],
170 [ $1;])