BEGIN { unshift @INC, $Bin };
- use test qw( DATA_DIR
- evcheck runcheck );
+ use test qw( evcheck runcheck );
BEGIN {
plan tests => 3,
=over 4
-=item BIN_DIR
-
-=item DATA_DIR
-
-=item REF_DIR
-
=item LIB_DIR
-=item PERL
-
=item check_req
=item compare
=cut
-@EXPORT_OK = qw( BIN_DIR DATA_DIR REF_DIR LIB_DIR PERL
+@EXPORT_OK = qw( LIB_DIR
check_req compare evcheck find_exec only_files read_file
save_output restore_output tempdir tmpnam );
# PACKAGE CONSTANTS
# -------------------------------------
-use constant BIN_DIR => catdir $Bin, updir, 'bin';
-use constant DATA_DIR => catdir $Bin, updir, 'data';
-use constant REF_DIR => catdir $Bin, updir, 'testref';
use constant LIB_DIR => catdir $Bin, updir, 'lib';
use constant BUILD_SCRIPT_DIR => => catdir $Bin, updir, qw( blib script );
return;
}
-use constant PERL => (basename($^X) eq $^X ?
- find_exec($^X) :
- rel2abs($^X));
-
# -------------------------------------
# PACKAGE ACTIONS
# -------------------------------------
use Test qw( ok plan );
use lib $Bin;
-use test qw( DATA_DIR
- evcheck restore_output save_output );
+use test qw( evcheck restore_output save_output );
use constant MESSAGE1 => 'Walking on the Milky Way';
use Test 1.122 qw( ok plan );
use lib $Bin;
-use test qw( DATA_DIR
- evcheck restore_output save_output );
+use test qw( evcheck restore_output save_output );
use constant MESSAGE1 => 'Walking on the Milky Way';
use Test qw( ok plan );
use lib $Bin;
-use test qw( DATA_DIR
- evcheck restore_output save_output );
+use test qw( evcheck restore_output save_output );
BEGIN {
# 1 for compilation test,
use Test qw( ok plan );
use lib $Bin;
-use test qw( DATA_DIR
- evcheck restore_output save_output );
+use test qw( evcheck restore_output save_output );
BEGIN {
# 1 for compilation test,
use Test qw( ok plan );
use lib $Bin;
-use test qw( DATA_DIR
- evcheck restore_output save_output );
+use test qw( evcheck restore_output save_output );
BEGIN {
# 1 for compilation test,