Makefile.PL

   1 # for developpers:
   2 BEGIN{
   3     if(grep{ $_ eq '--author' } @ARGV){
   4         print "$^X -S cpanm < author/requires.cpanm\n";
   5         system "$^X -S cpanm < author/requires.cpanm";
   6     }
   7 }
   8
   9 use strict;
  10 use warnings;
  11 use inc::Module::Install 0.99;
  12
  13 # for co-developpers
  14 use Module::Install::XSUtil 0.24;
  15 use Module::Install::AuthorTests;
  16
  17 system($^X, 'tool/generate-mouse-tiny.pl', 'lib/Mouse/Tiny.pm') == 0
  18     or warn "Cannot generate Mouse::Tiny: $!";
  19
  20 name     'Mouse';
  21 all_from 'lib/Mouse.pm';
  22
  23 # Scalar::Util < 1.14 has a bug.
  24 # > Fixed looks_like_number(undef) to return false for perl >= 5.009002
  25 requires 'Scalar::Util' => 1.14;
  26
  27 test_requires 'Test::More'      => 0.88;
  28 test_requires 'Test::Exception' => 0.29;
  29 if ( $ENV{RELEASE_TESTING} || (grep { $_ eq '--author' } @ARGV) ) {
  30     test_requires 'Test::Requires'  => 0.03;
  31 }
  32 # test_requires 'Test::Output'    => 0.16; # too many dependencies!
  33
  34 if($] < 5.010) {
  35     recommends 'Class::C3';
  36 }
  37
  38 my %suggests = (
  39     'Data::Util'                     => 0.55,
  40     'MouseX::AttributeHelpers'       => 0.06,
  41 );
  42
  43 while(my($mod, $least) = each %suggests){
  44     if(can_use($mod)){
  45         if(!eval { $mod->VERSION($least) }){
  46             my $ver = $mod->VERSION;
  47             warn("\n",
  48                 "WARNING: $mod is installed, but its version ($ver) is too old (< $least).\n",
  49                 "         Please update $mod after installation of Mouse.\n",
  50                 "\n"
  51             );
  52         }
  53     }
  54 }
  55
  56 require 'lib/Mouse/Spec.pm'; # for the version
  57
  58 #if(Mouse::Spec->MouseVersion =~ /_/){ # DEVEL RELEASE
  59 #    require Carp::Always; Carp::Always->import();
  60 #    include_deps 'Carp::Always';
  61 #}
  62
  63 # cc_want deals with the '--pp' and '--xs' options
  64 my $use_xs = ($] >= 5.008_001 && want_xs());
  65
  66 if($use_xs){
  67     print "Mouse configured with XS.\n",
  68           "NOTE: You can try --pp option to configure Mouse with Pure Perl.\n";
  69
  70     cc_warnings();
  71     use_ppport(3.19);
  72     cc_src_paths('xs-src');
  73 }
  74 else{
  75     print "Mouse configured with Pure Perl.\n";
  76 }
  77
  78
  79 tests 't/*.t t/*/*.t';
  80 author_tests 'xt';
  81
  82
  83 repository 'git://git.moose.perl.org/Mouse.git';
  84
  85 clean_files 'lib/Mouse/Tiny.pm $(O_FILES) test-mydeps-*.log';
  86
  87
  88 if (author_context()) {
  89     my $require_version = Mouse::Spec->MooseVersion;
  90
  91     if (eval { require Moose; Moose->VERSION($require_version) }) {
  92         print "You have Moose ", Moose->VERSION, ".\n";
  93         if (eval { require Module::Install::AuthorTests }) {
  94             do 'tool/create-moose-compatibility-tests.pl';
  95             # repeat testing
  96             # see also ExtUtils::MM_Any::test_via_harness()
  97             my $t_moose =  q{$(FULLPERLRUN) -MExtUtils::Command::MM -e}
  98                           .q{ "test_harness($(TEST_VERBOSE), '$(INST_LIB)', '$(INST_ARCHLIB)')"}
  99                           .q{ xt/compatibility/t/*/*.t } . "\n";
 100
 101             postamble qq{test_dynamic :: test_moose\n\n}
 102                     . qq{test_moose :: pure_all\n}
 103                     . qq{\t} . $t_moose;
 104         } else {
 105             print "You don't have a M::I::AuthorTests.\n";
 106         }
 107     } else {
 108         print "You don't have Moose $require_version. skipping moose compatibility test\n";
 109     }
 110
 111     if($use_xs){
 112         # repeat testing
 113         # see also ExtUtils::MM_Any::test_via_harness()
 114         my $t_pp =  q{$(FULLPERLRUN) -MExtUtils::Command::MM -e}
 115                    .q{ "do 'tool/force-pp.pl'; test_harness($(TEST_VERBOSE), '$(INST_LIB)', '$(INST_ARCHLIB)')"}
 116                    .q{ $(TEST_FILES)} . "\n";
 117
 118         postamble qq{test_dynamic :: test_pp\n\n}
 119                 . qq{test_pp :: pure_all\n}
 120                 . qq{\t} . $t_pp;
 121     }
 122 }
 123
 124
 125 WriteAll check_nmake => 0;