Re: lib, ext, cpan and dist [PATCH] (take 2)
[perl.git] / ext / ExtUtils-MakeMaker / t / xs.t
1 #!/usr/bin/perl -w
2
3 BEGIN {
4     unshift @INC, 't/lib/';
5 }
6 chdir 't';
7
8 use strict;
9
10 use Test::More;
11 use MakeMaker::Test::Utils;
12 use MakeMaker::Test::Setup::XS;
13 use File::Find;
14 use File::Spec;
15 use File::Path;
16
17 my $Skipped = 0;
18 if( have_compiler() ) {
19     plan tests => 5;
20 }
21 else {
22     $Skipped = 1;
23     plan skip_all => "ExtUtils::CBuilder not installed or couldn't find a compiler";
24 }
25
26 my $Is_VMS = $^O eq 'VMS';
27 my $perl = which_perl();
28
29 chdir 't';
30
31 perl_lib;
32
33 $| = 1;
34
35 ok( setup_xs(), 'setup' );
36 END {
37     unless( $Skipped ) {
38         chdir File::Spec->updir or die;
39         teardown_xs(), 'teardown' or die;
40     }
41 }
42
43 ok( chdir('XS-Test'), "chdir'd to XS-Test" ) ||
44   diag("chdir failed: $!");
45
46 my @mpl_out = run(qq{$perl Makefile.PL});
47
48 cmp_ok( $?, '==', 0, 'Makefile.PL exited with zero' ) ||
49   diag(@mpl_out);
50
51 my $make = make_run();
52 my $make_out = run("$make");
53 is( $?, 0,                                 '  make exited normally' ) || 
54     diag $make_out;
55
56 my $test_out = run("$make");
57 is( $?, 0,                                 '  make test exited normally' ) || 
58     diag $test_out;