File Coverage

/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/XS/Framework.x/i/xs/typemap/auto.h

Criterion	Covered	Total	%
statement	3	3	100.0
branch	1	2	50.0
condition			n/a
subroutine			n/a
pod			n/a
total	4	5	80.0

#pragma once
#include "base.h"
#include

namespace xs {

// automatic default typemap for  if typemap for  defined
template  struct Typemap : Typemap {};

// automatic default reference resolving
template *>::value> struct TypemapResolveReference {};
template  struct TypemapResolveReference : Typemap {
    using Super = Typemap;
    static TYPE& in (SV* arg) {
        auto ret = Super::in(arg);
        if (!ret) throw "invalid value: undef not allowed";
        return *ret;
    }
    static Sv out (TYPE& var, const Sv& = {}) = delete;
};
template  struct TypemapResolveReference : Typemap> {};
template  struct Typemap : TypemapResolveReference {};

// automatic default typemap for > if typemap for  defined
template  struct Typemap, panda::iptr> : Typemap {
    using Super = Typemap;
    static panda::iptr in (SV* arg) { return Super::in(arg); }

    static Sv out (const panda::iptr& var, const Sv& proto = {}) {
        return Super::out(var.get(), proto);
    }
};

}