File Coverage

/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/next/XS.x/i/xs/next.h
Criterion Covered Total %
statement 0 2 0.0
branch n/a
condition n/a
subroutine n/a
pod n/a
total 0 2 0.0


line stmt bran cond sub pod time code
1             #pragma once
2             #include
3              
4             namespace xs {
5              
6             namespace next {
7             CV* method (HV* target_class);
8             CV* method_strict (HV* target_class);
9             CV* method (HV* target_class, GV* current_sub);
10             CV* method_strict (HV* target_class, GV* current_sub);
11              
12 0           inline CV* method (HV* target_class, CV* current_sub) { dTHX; return method (target_class, CvGV(current_sub)); }
13 0           inline CV* method_strict (HV* target_class, CV* current_sub) { dTHX; return method_strict(target_class, CvGV(current_sub)); }
14             }
15              
16             namespace super {
17             CV* method (HV* target_class, GV* current_sub);
18             CV* method_strict (HV* target_class, GV* current_sub);
19              
20             inline CV* method (HV* target_class, CV* current_sub) { dTHX; return method (target_class, CvGV(current_sub)); }
21             inline CV* method_strict (HV* target_class, CV* current_sub) { dTHX; return method_strict(target_class, CvGV(current_sub)); }
22             }
23              
24             }