98 lines
2.9 KiB
C++
98 lines
2.9 KiB
C++
|
/* Copyright 2020-2022, Michele Santullo
|
||
|
|
* This file is part of wrenpp.
|
||
|
|
*
|
||
|
|
* Wrenpp 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.
|
||
|
|
*
|
||
|
|
* Wrenpp 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 wrenpp. If not, see <http://www.gnu.org/licenses/>.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "wrenpp/def_configuration.hpp"
|
||
|
|
#include "wrenpp/vm_fun.hpp"
|
||
|
|
#include "wrenpp/callback_manager.hpp"
|
||
|
|
#include "wrenpp/class_manager.hpp"
|
||
|
|
#include <string_view>
|
||
|
|
#include <algorithm>
|
||
|
|
#include <ctime>
|
||
|
|
#include <memory>
|
||
|
|
#include <vector>
|
||
|
|
#include <cstring>
|
||
|
|
#include <iostream>
|
||
|
|
|
||
|
|
namespace {
|
||
|
|
constexpr std::string_view g_math_vector_src{
|
||
|
|
"foreign class MathVector {" R"script(
|
||
|
|
construct new(value) {}
|
||
|
|
construct new(x, y, z) {}
|
||
|
|
|
||
|
|
foreign x
|
||
|
|
foreign y
|
||
|
|
foreign z
|
||
|
|
}
|
||
|
|
)script"};
|
||
|
|
|
||
|
|
constexpr const char g_test_script[] =
|
||
|
|
R"script(import "math_vector" for MathVector
|
||
|
|
var vec1 = MathVector.new(1.0)
|
||
|
|
var vec2 = MathVector.new(10.0, 20.0, 30.0)
|
||
|
|
System.print("vec1: <%(vec1.x), %(vec1.y), %(vec1.z)>")
|
||
|
|
System.print("vec2: <%(vec2.x), %(vec2.y), %(vec2.z)>")
|
||
|
|
)script";
|
||
|
|
|
||
|
|
class MathVector {
|
||
|
|
public:
|
||
|
|
MathVector() = default;
|
||
|
|
explicit MathVector (double value) :
|
||
|
|
m_x(value), m_y(value), m_z(value)
|
||
|
|
{}
|
||
|
|
MathVector (double x, double y, double z) :
|
||
|
|
m_x(x), m_y(y), m_z(z)
|
||
|
|
{}
|
||
|
|
~MathVector() noexcept = default;
|
||
|
|
|
||
|
|
double x() const { return m_x; }
|
||
|
|
double y() const { return m_y; }
|
||
|
|
double z() const { return m_z; }
|
||
|
|
|
||
|
|
private:
|
||
|
|
double m_x, m_y, m_z;
|
||
|
|
};
|
||
|
|
|
||
|
|
class MyConf : public wren::DefConfiguration {
|
||
|
|
public:
|
||
|
|
char* load_module_fn(wren::VM* vm, std::string_view module_name) {
|
||
|
|
if (module_name == "math_vector") {
|
||
|
|
constexpr const std::size_t buff_sz = g_math_vector_src.size();
|
||
|
|
char* const buff = static_cast<char*>(MyConf::reallocate_fn(nullptr, buff_sz));
|
||
|
|
std::copy(g_math_vector_src.cbegin(), g_math_vector_src.cend(), buff);
|
||
|
|
return buff;
|
||
|
|
}
|
||
|
|
return nullptr;
|
||
|
|
}
|
||
|
|
};
|
||
|
|
} //unnamed namespace
|
||
|
|
|
||
|
|
int main() {
|
||
|
|
using wren::make_method_bindable;
|
||
|
|
|
||
|
|
MyConf conf;
|
||
|
|
wren::VM vm(&conf, nullptr);
|
||
|
|
vm.callback_manager()
|
||
|
|
.add_callback(false, "math_vector", "MathVector", "x", make_method_bindable<&MathVector::x>())
|
||
|
|
.add_callback(false, "math_vector", "MathVector", "y", make_method_bindable<&MathVector::y>())
|
||
|
|
.add_callback(false, "math_vector", "MathVector", "z", make_method_bindable<&MathVector::z>());
|
||
|
|
vm.class_manager().add_class_maker("math_vector", "MathVector", &wren::make_overloaded_foreign_class<MathVector, double, std::tuple<double, double, double>>);
|
||
|
|
|
||
|
|
vm.interpret("main", g_test_script);
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|