root/tlate/tlate.hh

/*  This file is part of Alue, the multiprotocol Internet discussion daemon

    Copyright © 2009 Antti-Juhani Kaijanaho

    Alue 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.

    Alue 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 Alue.  If not, see <http://www.gnu.org/licenses/>.

 */

#ifndef GUARD_TLATE_TLATE_HH
#define GUARD_TLATE_TLATE_HH

#include "scanner.hh"
#include "string_value.hh"
#include "overriding_structured_value.hh"

#include <boost/shared_ptr.hpp>
#include <iostream>
#include <set>

namespace tlate
{
        class tlate
        {
        protected:
                const std::string fname;
                const int line;

                tlate(std::string fname, int line) 
                        : fname(fname)
                        , line(line)
                        {}

                std::string pos() {
                        std::ostringstream os;
                        os << fname << ":" << line;
                        return os.str();
                }

        public:
                typedef boost::shared_ptr<tlate> ptr;
                
                virtual ~tlate() {}

                static ptr parse(scanner);
                static ptr parse(boost::shared_ptr<std::istream> is,
                                 std::string fname);
                static ptr parse(std::string fname);
                static ptr parse_string(std::string);

                virtual value::const_ptr eval_(overriding_structured_value::ptr) = 0;
                value::const_ptr eval(structured_value::ptr env_) {
                        overriding_structured_value::ptr env
                                (new overriding_structured_value(env_));
                        return eval_(env);
                }
                virtual std::set<std::string> fvs() const = 0;
       };
};

#endif /* GUARD_TLATE_TLATE_HH */