126b724a98
* src/ltlast/bunop.hh, src/ltlast/bunop.cc: New files for bounded unary operators. * src/ltlast/Makefile.am, src/ltlast/allnodes.hh: Add them. * src/ltlast/predecl.hh (bunop): Declare. * src/ltlast/unop.hh, src/ltlast/unop.cc (Star): Remove declaration of Star and associated code. * src/ltlast/visitor.hh: Add visit(bunop* node) methods. * src/ltlparse/ltlparse.yy, src/ltlparse/ltlscan.ll: Add parse rules for LTL. This required passing the parse_error list to the lexer, so it can report scanning errors when it reads a number that does not fit in an unsigned int. * src/ltlparse/parsedecl.hh (YY_DECL): Take error_list as third argument. * src/ltltest/consterm.test, src/ltltest/tostring.test, src/ltltest/equals.test, src/tgbatest/ltl2tgba.test: More tests. * src/ltlvisit/basicreduce.cc, src/ltlvisit/clone.cc, src/ltlvisit/clone.hh, src/ltlvisit/consterm.cc, src/ltlvisit/dotty.cc, src/ltlvisit/mark.cc, src/ltlvisit/nenoform.cc, src/ltlvisit/postfix.cc, src/ltlvisit/postfix.hh, src/ltlvisit/reduce.cc, src/ltlvisit/syntimpl.cc, src/ltlvisit/tostring.cc, src/ltlvisit/tunabbrev.cc, src/tgba/formula2bdd.cc, src/tgbaalgos/eltl2tgba_lacim.cc, src/tgbaalgos/ltl2taa.cc, src/tgbaalgos/ltl2tgba_lacim.cc: Adjust syntax to use "bunop::Star" instead of "unop::Star". * src/tgbaalgos/ltl2tgba_fm.cc: Likewise, but also adjust the code to handle the bounds of the operator.
109 lines
2.6 KiB
C++
109 lines
2.6 KiB
C++
// Copyright (C) 2009, 2010 Laboratoire de Recherche et Développement
|
|
// de l'Epita (LRDE).
|
|
// Copyright (C) 2003 Laboratoire d'Informatique de Paris 6 (LIP6),
|
|
// département Systèmes Répartis Coopératifs (SRC), Université Pierre
|
|
// et Marie Curie.
|
|
//
|
|
// This file is part of Spot, a model checking library.
|
|
//
|
|
// Spot 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 2 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// Spot 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 Spot; see the file COPYING. If not, write to the Free
|
|
// Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
|
|
// 02111-1307, USA.
|
|
|
|
#include "ltlast/allnodes.hh"
|
|
#include "clone.hh"
|
|
|
|
namespace spot
|
|
{
|
|
namespace ltl
|
|
{
|
|
clone_visitor::clone_visitor()
|
|
{
|
|
}
|
|
|
|
clone_visitor::~clone_visitor()
|
|
{
|
|
}
|
|
|
|
formula*
|
|
clone_visitor::result() const
|
|
{
|
|
return result_;
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(atomic_prop* ap)
|
|
{
|
|
result_ = ap->clone();
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(constant* c)
|
|
{
|
|
result_ = c->clone();
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(bunop* bo)
|
|
{
|
|
result_ = bunop::instance(bo->op(), recurse(bo->child()),
|
|
bo->min(), bo->max());
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(unop* uo)
|
|
{
|
|
result_ = unop::instance(uo->op(), recurse(uo->child()));
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(binop* bo)
|
|
{
|
|
result_ = binop::instance(bo->op(),
|
|
recurse(bo->first()), recurse(bo->second()));
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(automatop* ao)
|
|
{
|
|
automatop::vec* res = new automatop::vec;
|
|
for (unsigned i = 0; i < ao->size(); ++i)
|
|
res->push_back(recurse(ao->nth(i)));
|
|
result_ = automatop::instance(ao->get_nfa(), res, ao->is_negated());
|
|
}
|
|
|
|
void
|
|
clone_visitor::visit(multop* mo)
|
|
{
|
|
multop::vec* res = new multop::vec;
|
|
unsigned mos = mo->size();
|
|
for (unsigned i = 0; i < mos; ++i)
|
|
res->push_back(recurse(mo->nth(i)));
|
|
result_ = multop::instance(mo->op(), res);
|
|
}
|
|
|
|
formula*
|
|
clone_visitor::recurse(formula* f)
|
|
{
|
|
return f->clone();
|
|
}
|
|
|
|
formula*
|
|
clone(const formula* f)
|
|
{
|
|
formula* res = const_cast<formula*>(f)->clone();
|
|
return res;
|
|
}
|
|
}
|
|
}
|