← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to lib/GenTest/Reporter/MySQLClient.pm

initial import from internal tree

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/GenTest/Reporter/MySQLClient.pm
 
1
package GenTest::Reporter::MySQLClient;
 
2
 
 
3
require Exporter;
 
4
@ISA = qw(GenTest::Reporter);
 
5
 
 
6
use strict;
 
7
use File::Copy;
 
8
use GenTest;
 
9
use GenTest::Constants;
 
10
use GenTest::Reporter;
 
11
 
 
12
sub report {
 
13
        my $reporter = shift;
 
14
 
 
15
        system("mysql -uroot --protocol=tcp --port=19306 test");
 
16
        
 
17
        return STATUS_OK;
 
18
}
 
19
 
 
20
sub type {
 
21
        return REPORTER_TYPE_DATA ;
 
22
}
 
23
 
 
24
1;