mirror of
				https://github.com/MariaDB/server.git
				synced 2025-11-03 20:36:16 +01:00 
			
		
		
		
	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 { };
 | 
						|
 |