# $Id: harness 26962 2008-04-13 19:25:06Z fperrad $

=head1 NAME

languages/eclectus/t/harness - A harness for Eclectus

=head1 SYNOPSIS

  cd languages/eclectus && perl t/harness

  cd languages && perl -I../lib eclectus/t/harness --files

=head1 DESCRIPTION

If I'm called with a single
argument of "--files", I just return a list of files to process.
This list is one per line, and is relative to the languages dir.

If I'm called with no args, I run the complete suite.

Otherwise I run the tests that were passed on the command line.

=cut

# pragmata
use strict;
use warnings;
use 5.008;
use lib qw( ../lib ../../lib ../../lib );

use Parrot::Test::Harness
    language => 'eclectus',
    exec     => ($^O eq 'MSWin32')
              ? [ 'petite', '--script' ]
              : [ 'gosh', '-fcase-fold', '-I', '.',  '-l', 'gauche/prelude.scm' ],
    #exec     => [ 'guile', '--debug', '-l', 'guile/prelude.scm', '-s' ],
    files    => [ 't/*.pl' ];

=head1 SEE ALSO

  F<languages/perl6/t/harness>
  F<languages/t/harness>
  F<lib/Parrot/Test/Harness>

=cut
