Skip to content

Commit

Permalink
add t/fudgeandrun from niecza++
Browse files Browse the repository at this point in the history
simplifies testing of individual roast files.
  • Loading branch information
coke committed Aug 15, 2012
1 parent dc19a70 commit 30134cf
Showing 1 changed file with 22 additions and 0 deletions.
22 changes: 22 additions & 0 deletions t/fudgeandrun
@@ -0,0 +1,22 @@
#! /usr/bin/env perl
use strict;
use warnings;

my @OPTS = ('--keep-exit-code', 'rakudo');

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`;
# uninstalled rakudo doesn't know how to find Test.pm
# ... or any other modules
my $pwd = `pwd`; chomp $pwd;
$ENV{PERL6LIB}="$pwd/lib:.";
system("./perl6", split ' ', $nt);

0 comments on commit 30134cf

Please sign in to comment.