function.h

Go to the documentation of this file.

 
#ifndef NNGN_LUA_FUNCTION_H
#define NNGN_LUA_FUNCTION_H
 
#include <optional>
#include <tuple>
#include <utility>
 
#include <lua.hpp>
 
#include "utils/log.h"
 
#include "lua.h"
#include "push.h"
#include "state.h"
#include "utils.h"
#include "value.h"
 
namespace nngn::lua {
 
namespace detail {
 
template<typename CRTP>
struct function_base {
    void operator()(auto &&...args) const;
};
 
}
 
struct function_view : value_view, detail::function_base<function_view> {
    using value_view::value_view;
};
 
struct function_value : value, detail::function_base<function_value> {
    NNGN_MOVE_ONLY(function_value)
    using value::value;
    ~function_value(void) = default;
};
 
namespace detail {
 
template<typename CRTP>
void function_base<CRTP>::operator()(auto &&...args) const {
    NNGN_LOG_CONTEXT_CF(function_base);
    const auto &crtp = static_cast<const CRTP&>(*this);
    crtp.state().call(crtp, FWD(args)...);
}
 
}
 
template<typename R, typename ...Args>
R call(lua_State *L, R(*f)(Args...), int i) {
    return std::apply(f, stack_get<std::tuple<Args...>>::get(L, i));
}
 
template<typename R, typename T, typename ...Args>
R call(lua_State *L, R(T::*f)(Args...), int i) {
    return std::apply(f, stack_get<std::tuple<T&, Args...>>::get(L, i));
}
 
template<typename R, typename T, typename ...Args>
R call(lua_State *L, R(T::*f)(Args...) const, int i) {
    return std::apply(f, stack_get<std::tuple<const T&, Args...>>::get(L, i));
}
 
template<stateless_lambda T>
decltype(auto) call(lua_State *L, T, int i) {
    return call(L, +T{}, i);
}
 
static_assert(detail::stack_type<function_view>);
static_assert(detail::stack_type<function_value>);
 
}
 
#endif