]> git.saurik.com Git - bison.git/blame - examples/variant.yy
c++: m4 stylistic change
[bison.git] / examples / variant.yy
CommitLineData
3272a725 1/*
7d6bad19 2 Copyright (C) 2008-2013 Free Software Foundation, Inc.
3272a725
AD
3
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
13
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>.
16*/
17
5ab8c47b 18%debug
5de9c593 19%skeleton "lalr1.cc"
5ab8c47b 20%defines
e36ec1f4 21%define api.token.constructor
ae8880de 22%define api.value.type variant
72c12bfa 23%define parse.assert
882f02ed 24%locations
5ab8c47b
AD
25
26%code requires // *.hh
27{
9718cfa9 28#include <list>
5ab8c47b 29#include <string>
9718cfa9 30typedef std::list<std::string> strings_type;
5ab8c47b
AD
31}
32
33%code // *.cc
34{
35#include <algorithm>
36#include <iostream>
9718cfa9 37#include <iterator>
5ab8c47b
AD
38#include <sstream>
39
9718cfa9 40 // Prototype of the yylex function providing subsequent tokens.
0b328702
AD
41 namespace yy
42 {
43 static parser::symbol_type yylex ();
44 }
9718cfa9
AD
45
46 // Printing a list of strings.
47 // Koening look up will look into std, since that's an std::list.
48 namespace std
49 {
50 std::ostream&
0078681b 51 operator<< (std::ostream& o, const strings_type& s)
9718cfa9 52 {
0078681b
AD
53 std::copy (s.begin (), s.end (),
54 std::ostream_iterator<strings_type::value_type> (o, "\n"));
9718cfa9
AD
55 return o;
56 }
57 }
58
59 // Conversion to string.
60 template <typename T>
61 inline
62 std::string
63 string_cast (const T& t)
64 {
65 std::ostringstream o;
66 o << t;
0078681b 67 return o.str ();
9718cfa9 68 }
5ab8c47b
AD
69}
70
cb823b6f 71%token <::std::string> TEXT;
9718cfa9 72%token <int> NUMBER;
304b384e 73%printer { yyoutput << $$; } <*>;
9718cfa9 74%token END_OF_FILE 0;
5ab8c47b 75
cb823b6f
AD
76%type <::std::string> item;
77%type <::std::list<std::string>> list;
5ab8c47b
AD
78
79%%
80
81result:
0078681b 82 list { std::cout << $1 << std::endl; }
9718cfa9
AD
83;
84
85list:
86 /* nothing */ { /* Generates an empty string list */ }
87| list item { std::swap ($$, $1); $$.push_back ($2); }
5ab8c47b
AD
88;
89
9718cfa9
AD
90item:
91 TEXT { std::swap ($$, $1); }
92| NUMBER { $$ = string_cast ($1); }
5ab8c47b
AD
93;
94%%
95
0b328702 96namespace yy
5ab8c47b 97{
0b328702
AD
98 // The yylex function providing subsequent tokens:
99 // TEXT "I have three numbers for you."
100 // NUMBER 1
101 // NUMBER 2
102 // NUMBER 3
103 // TEXT "And that's all!"
104 // END_OF_FILE
105
106 static
107 parser::symbol_type
108 yylex ()
5ab8c47b 109 {
0b328702
AD
110 static int stage = -1;
111 ++stage;
112 parser::location_type loc(0, stage + 1, stage + 1);
113 switch (stage)
114 {
115 case 0:
116 return parser::make_TEXT ("I have three numbers for you.", loc);
117 case 1:
118 case 2:
119 case 3:
120 return parser::make_NUMBER (stage, loc);
121 case 4:
122 return parser::make_TEXT ("And that's all!", loc);
123 default:
124 return parser::make_END_OF_FILE (loc);
125 }
5ab8c47b 126 }
5ab8c47b 127
0b328702
AD
128 // Mandatory error function
129 void
130 parser::error (const parser::location_type& loc, const std::string& msg)
131 {
132 std::cerr << loc << ": " << msg << std::endl;
133 }
5ab8c47b
AD
134}
135
136int
0078681b 137main ()
5ab8c47b
AD
138{
139 yy::parser p;
9718cfa9 140 p.set_debug_level (!!getenv ("YYDEBUG"));
0078681b 141 return p.parse ();
5ab8c47b
AD
142}
143
144// Local Variables:
145// mode: C++
146// End: