This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix and test execution of non-empty .bs files
[perl5.git] / ext / XS-APItest / t / bootstrap.t
1 #!perl -w
2 #
3 # check that .bs files are loaded and executed.
4 # During build of  XS::APItest, the presence of APItest_BS should
5 # cause a non-empty APItest.bs file to auto-generated. When loading
6 # APItest.so, the .bs should be automatically executed, which should
7 # set $::bs_file_got_executed.
8
9 use strict;
10
11 use Test::More;
12 use XS::APItest;
13
14 is $::bs_file_got_executed, 1, "BS file was executed";
15
16 done_testing();
17