gistfile1.none

#! perl

# invoke as "perl check-version.pl path/to/nqp.exe"

use lib 'tools/lib';
use NQP::Configure qw(slurp cmp_rev read_config);

my %nqp_config = read_config($ARGV[0]);
my $nqp_have = $nqp_config{'nqp::version'} || '';
my ($nqp_want) = split(' ', slurp('tools/build/NQP_REVISION'));

if (!$nqp_have || cmp_rev($nqp_have, $nqp_want) < 0) {
    die "NQP $nqp_have isn't new enough ($nqp_want required)\n";
}