miniperl.t   [plain text]

#!/usr/bin/perl -w

# Test that we can build modules as miniperl.
# This mostly means no XS modules.

use strict;
use lib 't/lib';

use Test::More 'no_plan';

    ok !$INC{"ExtUtils/"}, "MakeMaker is not yet loaded";

# Disable all XS from here on
use MakeMaker::Test::NoXS;

use ExtUtils::MakeMaker;

use MakeMaker::Test::Utils;
use MakeMaker::Test::Setup::BFD;

my $perl     = which_perl();
my $makefile = makefile_name();
my $make     = make_run();

# Setup our test environment
    chdir 't';


    ok( setup_recurs(), 'setup' );
    END {
        ok( chdir File::Spec->updir );
        ok( teardown_recurs(), 'teardown' );

    ok( chdir('Big-Dummy'), "chdir'd to Big-Dummy" ) ||
      diag("chdir failed: $!");

# Run make once
    run_ok(qq{$perl Makefile.PL});