File Coverage

src/xs/lib/XSCallbackDispatcher.h

Criterion	Covered	Total	%
statement	14	14	100.0
branch	3	6	50.0
condition			n/a
subroutine			n/a
pod			n/a
total	17	20	85.0

#pragma once

#include
#include
#include

namespace xs {
namespace lib {

using XSCallbackDispatcher = panda::CallbackDispatcher;

using xs::my_perl;

struct CallbackCVWrapperBase {
    CallbackCVWrapperBase(CV* cv) : cv(cv) {};

    SvIntrPtr cv;

    bool operator ==(CV* oth) const{
        return cv.get() == oth;
    }

    bool operator ==(const CallbackCVWrapperBase& oth) const {
        return cv.get() == oth.cv.get();
    }
};

struct CallbackCVWrapperSimple : CallbackCVWrapperBase {
    using CallbackCVWrapperBase::CallbackCVWrapperBase;

    SV* operator()(SV** args, size_t items) {
        return xs::call_sub_scalar(aTHX_ cv.get(), args, items);
    }
};

struct CallbackCVWrapperExt : CallbackCVWrapperBase{
    template
    CallbackCVWrapperExt(T&& lambda, CV* cv)
        : CallbackCVWrapperBase(cv)
        , lambda(std::forward(lambda))
    {}

    panda::optional operator()(XSCallbackDispatcher::Event& e, SV** args, size_t items) {
        return lambda(e, args, items);
    }

    XSCallbackDispatcher::Callback lambda;
};

}//lib
}//xs