Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
executable file 19 lines (15 sloc) 349 Bytes
#! /usr/bin/env perl
use strict;
use warnings;
my @OPTS = ('--keep-exit-code', 'niecza');
if (@ARGV) {
my $file = $ARGV[0];
if (! -e $file) {
my $spec = "t/spec/$file";
if (-e $spec) {
$ARGV[0] = $spec;
}
}
}
my $nt = `t/spec/fudge @OPTS @ARGV`;
system("mono", "./run/Niecza.exe", split ' ', $nt);
Something went wrong with that request. Please try again.