mirror of
https://github.com/MariaDB/server.git
synced 2025-01-16 03:52:35 +01:00
c2839e2cf2
run tokudb suites by default. mark big and slow tests tokudb.change_column_all_1000_1 and tokudb.change_column_all_1000_10 test as --big
27 lines
520 B
Perl
27 lines
520 B
Perl
# A default suite class that is used for all suites without their owns suite.pm
|
|
# see README.suites for a description
|
|
|
|
package My::Suite;
|
|
|
|
sub is_default { 0 }
|
|
sub config_files { () }
|
|
sub servers { () }
|
|
sub skip_combinations { () }
|
|
|
|
sub new { bless { } }
|
|
|
|
sub list_cases {
|
|
my ($self, $testdir) = @_;
|
|
opendir(TESTDIR, $testdir) or return ();
|
|
my (@cases) = grep { s/\.test$// } readdir TESTDIR;
|
|
closedir TESTDIR;
|
|
@cases;
|
|
}
|
|
|
|
sub start_test {
|
|
my ($self, $tinfo)= @_;
|
|
&::start_mysqltest($tinfo);
|
|
}
|
|
|
|
bless { };
|
|
|