593ce462f7
The latest VisualStudio 2013 CTP2 sworks with this now. Be sure to install it to build chaiscript
130 lines
3.5 KiB
C++
130 lines
3.5 KiB
C++
// This file is distributed under the BSD License.
|
|
// See "license.txt" for details.
|
|
// Copyright 2009-2012, Jonathan Turner (jonathan@emptycrate.com)
|
|
// Copyright 2009-2014, Jason Turner (jason@emptycrate.com)
|
|
// http://www.chaiscript.com
|
|
|
|
|
|
#include <chaiscript/chaiscript.hpp>
|
|
#include <chaiscript/dispatchkit/bootstrap.hpp>
|
|
#include <chaiscript/dispatchkit/bootstrap_stl.hpp>
|
|
#include <chaiscript/utility/utility.hpp>
|
|
#include <string>
|
|
|
|
|
|
// MSVC doesn't like that we are using C++ return types from our C declared module
|
|
// but this is the best way to do it for cross platform compatibility
|
|
#ifdef CHAISCRIPT_MSVC
|
|
#pragma warning(push)
|
|
#pragma warning(disable : 4190)
|
|
#endif
|
|
|
|
|
|
bool has_parse_tree(const chaiscript::Const_Proxy_Function &t_pf)
|
|
{
|
|
std::shared_ptr<const chaiscript::dispatch::Dynamic_Proxy_Function> pf
|
|
= std::dynamic_pointer_cast<const chaiscript::dispatch::Dynamic_Proxy_Function>(t_pf);
|
|
if (pf)
|
|
{
|
|
if (pf->get_parse_tree())
|
|
{
|
|
return true;
|
|
} else {
|
|
return false;
|
|
}
|
|
} else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
chaiscript::AST_NodePtr get_parse_tree(const chaiscript::Const_Proxy_Function &t_pf)
|
|
{
|
|
std::shared_ptr<const chaiscript::dispatch::Dynamic_Proxy_Function> pf
|
|
= std::dynamic_pointer_cast<const chaiscript::dispatch::Dynamic_Proxy_Function>(t_pf);
|
|
if (pf)
|
|
{
|
|
if (pf->get_parse_tree())
|
|
{
|
|
return pf->get_parse_tree();
|
|
} else {
|
|
throw std::runtime_error("Function does not have a parse tree");
|
|
}
|
|
} else {
|
|
throw std::runtime_error("Function does not have a parse tree");
|
|
}
|
|
}
|
|
|
|
|
|
#ifdef __llvm__
|
|
#pragma clang diagnostic push
|
|
#pragma clang diagnostic ignored "-Wreturn-type-c-linkage"
|
|
#endif
|
|
|
|
|
|
CHAISCRIPT_MODULE_EXPORT chaiscript::ModulePtr create_chaiscript_module_reflection()
|
|
{
|
|
chaiscript::ModulePtr m(new chaiscript::Module());
|
|
|
|
m->add(chaiscript::fun(&has_parse_tree), "has_parse_tree");
|
|
m->add(chaiscript::fun(&get_parse_tree), "get_parse_tree");
|
|
|
|
m->add(chaiscript::base_class<std::exception, chaiscript::exception::eval_error>());
|
|
|
|
chaiscript::bootstrap::standard_library::vector_type<std::vector<std::shared_ptr<chaiscript::AST_Node> > >("AST_NodeVector", m);
|
|
|
|
using namespace chaiscript;
|
|
|
|
chaiscript::utility::add_class<chaiscript::exception::eval_error>(*m,
|
|
"eval_error",
|
|
{ },
|
|
{ {fun(&chaiscript::exception::eval_error::reason), "reason"},
|
|
{fun(&chaiscript::exception::eval_error::call_stack), "call_stack"} }
|
|
);
|
|
|
|
|
|
chaiscript::utility::add_class<chaiscript::File_Position>(*m,
|
|
"File_Position",
|
|
{ constructor<File_Position()>(),
|
|
constructor<File_Position(int, int)>() },
|
|
{ {fun(&File_Position::line), "line"},
|
|
{fun(&File_Position::column), "column"} }
|
|
);
|
|
|
|
|
|
chaiscript::utility::add_class<AST_Node>(*m,
|
|
"AST_Node",
|
|
{ },
|
|
{ {fun(&AST_Node::text), "text"},
|
|
{fun(&AST_Node::identifier), "identifier"},
|
|
{fun(&AST_Node::filename), "filename"},
|
|
{fun(&AST_Node::start), "start"},
|
|
{fun(&AST_Node::end), "end"},
|
|
{fun(&AST_Node::internal_to_string), "internal_to_string"},
|
|
{fun(&AST_Node::children), "children"},
|
|
{fun(&AST_Node::replace_child), "replace_child"}
|
|
}
|
|
);
|
|
|
|
|
|
chaiscript::utility::add_class<parser::ChaiScript_Parser>(*m,
|
|
"ChaiScript_Parser",
|
|
{ constructor<parser::ChaiScript_Parser ()>() },
|
|
{ {fun(&parser::ChaiScript_Parser::parse), "parse"},
|
|
{fun(&parser::ChaiScript_Parser::ast), "ast"} }
|
|
);
|
|
|
|
|
|
|
|
return m;
|
|
}
|
|
|
|
#ifdef __llvm__
|
|
#pragma clang diagnostic pop
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef CHAISCRIPT_MSVC
|
|
#pragma warning(pop)
|
|
#endif
|