← Back to branch summary

~patrick-crews/randgen/bug961630

« back to all changes in this revision

Viewing changes to unit/TestMySQLServer.pm

  • Committer: Bernt M. Johnsen
  • Date: 2010-04-08 11:05:05 UTC
  • Revision ID: bernt.johnsen@sun.com-20100408110505-66z8d8139thjta80
Adjustments after merge

Show diffs side-by-side

added added

removed removed

Lines of Context:
unit/TestMySQLServer.pm
40
40
my @pids;
41
41
 
42
42
sub tear_down {
43
 
    if (windows) {
 
43
    if (osWindows) {
44
44
        ## Need to ,kill leftover processes if there are some
45
45
        foreach my $p (@pids) {
46
46
            Win32::Process::KillProcess($p,-1);
89
89
    
90
90
    say(join(',',map{$_->[0]} @{$result->data}));
91
91
    
92
 
    $self->assert(-f $vardir."/mysql.pid") if not windows();
 
92
    $self->assert(-f $vardir."/mysql.pid") if not osWindows();
93
93
    $self->assert(-f $vardir."/mysql.err");
94
94
 
95
95
    $server->stopServer;
111
111
}
112
112
 
113
113
sub test_crash_and_core {
114
 
    if (not windows()) { ## crash is not yet implemented for windows
 
114
    if (not osWindows()) { ## crash is not yet implemented for windows
115
115
        my $self = shift;
116
116
 
117
117
        my $vardir= cwd()."/unit/tmp";
143
143
        
144
144
        say(join(',',map{$_->[0]} @{$result->data}));
145
145
        
146
 
        $self->assert(-f $vardir."/mysql.pid") if not windows();
 
146
        $self->assert(-f $vardir."/mysql.pid") if not osWindows();
147
147
        $self->assert(-f $vardir."/mysql.err");
148
148
        
149
149
        my $backtrace = GenTest::Reporter::Backtrace->new(dsn => $server->dsn);