1#!/usr/bin/perl -w 2 3# Test that we can build modules as miniperl. 4# This mostly means no XS modules. 5 6use strict; 7use lib 't/lib'; 8 9use Test::More; 10 11# In a BEGIN block so the END tests aren't registered. 12BEGIN { 13 plan skip_all => "miniperl test only necessary for the perl core" 14 if !$ENV{PERL_CORE}; 15 16 plan "no_plan"; 17} 18 19BEGIN { 20 ok !$INC{"ExtUtils/MakeMaker.pm"}, "MakeMaker is not yet loaded"; 21} 22 23# Disable all XS from here on 24use MakeMaker::Test::NoXS; 25 26use ExtUtils::MakeMaker; 27 28use MakeMaker::Test::Utils; 29use MakeMaker::Test::Setup::BFD; 30 31 32my $perl = which_perl(); 33my $makefile = makefile_name(); 34my $make = make_run(); 35 36 37# Setup our test environment 38{ 39 chdir 't'; 40 41 perl_lib; 42 43 ok( setup_recurs(), 'setup' ); 44 END { 45 ok( chdir File::Spec->updir ); 46 ok( teardown_recurs(), 'teardown' ); 47 } 48 49 ok( chdir('Big-Dummy'), "chdir'd to Big-Dummy" ) || 50 diag("chdir failed: $!"); 51} 52 53 54# Run make once 55{ 56 run_ok(qq{$perl Makefile.PL}); 57 run_ok($make); 58} 59