File Coverage

/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/Export/XS.x/i/xs/export.h

Criterion	Covered	Total	%
statement	2	2	100.0
branch			n/a
condition			n/a
subroutine			n/a
pod			n/a
total	2	2	100.0

line	stmt	code
1		#pragma once
2		#include
3		#include
4		#include
5		#include
6
7		namespace xs { namespace exp {
8
9	130	struct Constant {
10		using string_view = panda::string_view;
11		string_view name;
12		Sv value;
13
14		Constant (string_view name, const Sv& val) : name(name), value(val) {}
15		Constant (string_view name, string_view val) : name(name), value(Simple(val)) {}
16	130	Constant (string_view name, int64_t val) : name(name), value(Simple(val)) {}
17		};
18
19		void create_constant (Stash stash, const Constant& c);
20
21		inline void create_constant (Stash stash, panda::string_view name, const Sv& value) { create_constant(stash, Constant(name, value)); }
22		inline void create_constant (Stash stash, panda::string_view name, panda::string_view value) { create_constant(stash, Constant(name, value)); }
23		inline void create_constant (Stash stash, panda::string_view name, int64_t value) { create_constant(stash, Constant(name, value)); }
24
25		void create_constants (Stash stash, const std::initializer_list& l);
26		void create_constants (Stash stash, const Hash& h);
27		void create_constants (Stash stash, SVconst list, size_t items);
28
29		void register_export (const Stash& stash, panda::string_view name);
30
31		void export_sub (const Stash& from, Stash to, panda::string_view name);
32		void export_constants (const Stash& from, Stash to);
33
34		Array constants_list (const Stash& stash);
35
36		void autoexport (Stash stash);
37
38		}}