#!/usr/bin/env perl use TAP::Harness; my $harness = TAP::Harness->new({ exec => sub { my ($harness, $test_file) = @_; return ['node', 'nqp-js-on-js/nqp-bootstrapped.js', $test_file] if $test_file =~ /\.t$/; return ['node', $test_file] if $test_file =~ /\.js$/; } }); # temporarily turned of test 60 # skip test 055 which doesn't work when immediately evaling code rather than saving it to disk my @nqp_tests = grep {$_ !~ /055|060/} glob "t/nqp/*.t t/serialization/*.t t/qast/*.t"; $harness->runtests(@nqp_tests);