use strict;
use lib '../../../..', '../../../../inc';
use inc::Module::Install (
    -d '../../../../misc/pX' ? (prefix => '../../../../inc') : ()
);
use Cwd qw< abs_path cwd >;

my $cwd = cwd();
my $pm  = abs_path('lib/Pugs/Grammar/MiniPerl6.pm');
my $grammar = abs_path('lib/Pugs/Grammar/MiniPerl6.grammar');

my $pm_is_uptodate = (-s $pm and (-M $pm <= -M $grammar));

if (!$pm_is_uptodate) {
    print "Compiling grammar for miniperl6, this can take a while...\n";
    system("$^X -I../Pugs-Compiler-Rule/lib ../Pugs-Compiler-Rule/compile_p6grammar.pl $grammar > $pm");
}

my $mtime = time;
utime $mtime, $mtime, $pm;

name('Pugs-Grammar-MiniPerl6');
all_from('lib/Pugs/Grammar/MiniPerl6.pm');
clean_files('lib/Pugs/Grammar/MiniPerl6.pm ');

&WriteAll;