This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
APItest: Add comprehensive UTF-8 validity tests
[perl5.git] / ext / XS-APItest / XSUB-undef-XS_VERSION.xs
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         XSRETURN_EMPTY;