| Current Path : /home/usr.opt/mysql57/mysql-test/suite/x/include/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
| Current File : //home/usr.opt/mysql57/mysql-test/suite/x/include/mysqlxtest_macro_dir.inc |
## Script mysqlxtest_macro_dir.inc
#
--perl
use File::Basename;
use File::Spec::Functions;
my $mysql_test_file = $ENV{MYSQLTEST_FILE} or die "Need MYSQLTEST_FILE";
my $basedir = dirname($mysql_test_file);
my $tmpdir = $ENV{MYSQL_TMP_DIR} or die "Need $MYSQL_TMP_DIR";
my $macro_file = catdir($basedir, 'macros');
open(FILE, ">", "$tmpdir/mysqlxtest_macro_dir.tmp.inc") or die;
print FILE "--let \$MYSQLXTEST_MACRO_DIR= $macro_file\n";
close(FILE);
EOF
--source $MYSQL_TMP_DIR/mysqlxtest_macro_dir.tmp.inc