ext/XS-APItest/XSUB-undef-XS_VERSION.xs | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 1 | 1 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | n/a | ||
total | 1 | 1 | 100.0 |
line | stmt | bran | cond | sub | time | code |
---|---|---|---|---|---|---|
1 | #include "EXTERN.h" | |||||
2 | #include "perl.h" | |||||
3 | ||||||
4 | /* We have to be in a different .xs so that we can do this: */ | |||||
5 | ||||||
6 | #undef XS_VERSION | |||||
7 | #include "XSUB.h" | |||||
8 | ||||||
9 | /* This can't be "MODULE = XS::APItest" as then we get duplicate bootstraps. */ | |||||
10 | MODULE = XS::APItest::XSUB PACKAGE = XS::APItest::XSUB | |||||
11 | ||||||
12 | PROTOTYPES: DISABLE | |||||
13 | ||||||
14 | EXPORT_XSUB_SYMBOLS: ENABLE | |||||
15 | ||||||
16 | void | |||||
17 | XS_VERSION_undef(...) | |||||
18 | PPCODE: | |||||
19 | XS_VERSION_BOOTCHECK; | |||||
20 | 258 | XSRETURN_EMPTY; |