mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-09 20:33:03 +00:00
153 lines
3.2 KiB
Plaintext
153 lines
3.2 KiB
Plaintext
/*
|
|
Copyright (C) 2008-2015 Free Software Foundation, Inc.
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
%debug
|
|
%language "c++"
|
|
%defines
|
|
%define api.token.constructor
|
|
%define api.value.type variant
|
|
%define parse.assert
|
|
%locations
|
|
|
|
%code requires // *.hh
|
|
{
|
|
#include <list>
|
|
#include <string>
|
|
typedef std::list<std::string> strings_type;
|
|
}
|
|
|
|
%code // *.cc
|
|
{
|
|
#include <algorithm>
|
|
#include <iostream>
|
|
#include <iterator>
|
|
#include <sstream>
|
|
|
|
// Prototype of the yylex function providing subsequent tokens.
|
|
namespace yy
|
|
{
|
|
static parser::symbol_type yylex ();
|
|
}
|
|
|
|
// Printing a list of strings.
|
|
// Koening look up will look into std, since that's an std::list.
|
|
namespace std
|
|
{
|
|
std::ostream&
|
|
operator<< (std::ostream& o, const strings_type& ss)
|
|
{
|
|
o << "(" << &ss << ") {";
|
|
const char *sep = "";
|
|
for (strings_type::const_iterator i = ss.begin(), end = ss.end();
|
|
i != end; ++i)
|
|
{
|
|
o << sep << *i;
|
|
sep = ", ";
|
|
}
|
|
return o << "}";
|
|
}
|
|
}
|
|
|
|
// Conversion to string.
|
|
template <typename T>
|
|
inline
|
|
std::string
|
|
string_cast (const T& t)
|
|
{
|
|
std::ostringstream o;
|
|
o << t;
|
|
return o.str ();
|
|
}
|
|
}
|
|
|
|
%token <::std::string> TEXT;
|
|
%token <int> NUMBER;
|
|
%printer { yyoutput << $$; } <*>;
|
|
%token END_OF_FILE 0;
|
|
|
|
%type <::std::string> item;
|
|
%type <::std::list<std::string>> list;
|
|
|
|
%%
|
|
|
|
result:
|
|
list { std::cout << $1 << std::endl; }
|
|
;
|
|
|
|
list:
|
|
/* nothing */ { /* Generates an empty string list */ }
|
|
| list item { std::swap ($$, $1); $$.push_back ($2); }
|
|
;
|
|
|
|
item:
|
|
TEXT { std::swap ($$, $1); }
|
|
| NUMBER { $$ = string_cast ($1); }
|
|
;
|
|
%%
|
|
|
|
namespace yy
|
|
{
|
|
// The yylex function providing subsequent tokens:
|
|
// TEXT "I have three numbers for you."
|
|
// NUMBER 1
|
|
// NUMBER 2
|
|
// NUMBER 3
|
|
// TEXT "And that's all!"
|
|
// END_OF_FILE
|
|
|
|
static
|
|
parser::symbol_type
|
|
yylex ()
|
|
{
|
|
static int stage = -1;
|
|
++stage;
|
|
parser::location_type loc(0, stage + 1, stage + 1);
|
|
switch (stage)
|
|
{
|
|
case 0:
|
|
return parser::make_TEXT ("I have three numbers for you.", loc);
|
|
case 1:
|
|
case 2:
|
|
case 3:
|
|
return parser::make_NUMBER (stage, loc);
|
|
case 4:
|
|
return parser::make_TEXT ("And that's all!", loc);
|
|
default:
|
|
return parser::make_END_OF_FILE (loc);
|
|
}
|
|
}
|
|
|
|
// Mandatory error function
|
|
void
|
|
parser::error (const parser::location_type& loc, const std::string& msg)
|
|
{
|
|
std::cerr << loc << ": " << msg << std::endl;
|
|
}
|
|
}
|
|
|
|
int
|
|
main ()
|
|
{
|
|
yy::parser p;
|
|
p.set_debug_level (!!getenv ("YYDEBUG"));
|
|
return p.parse ();
|
|
}
|
|
|
|
// Local Variables:
|
|
// mode: C++
|
|
// End:
|