[t/harness] fix testing if not checked out as languages/rakudo

rakudo · Feb 8, 2009 · fb66ff6 · fb66ff6
1 parent 6aaec33
commit fb66ff6
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/t/harness b/t/harness
@@ -20,6 +20,12 @@ our %harness_args = (
     verbosity => 0,
 );
 
+if (-d 'parrot') {
+    $harness_args{exec}     = ['parrot/parrot', 'perl6.pbc'];
+} else {
+    $harness_args{compiler} = 'perl6.pbc';
+}
+
 GetOptions(
         'tests-from-file=s' => \my $list_file,
         'fudge'             => \my $do_fudge,