← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to lib/GenTest/App/GenTest.pm

  • Committer: Bernt M. Johnsen
  • Date: 2010-04-16 11:31:18 UTC
  • mto: (0.67.396 lp-randgen)
  • mto: This revision was merged to the branch mainline in revision 2435.
  • Revision ID: bernt.johnsen@sun.com-20100416113118-lae0b426u1kw0sb9
Sqltrace option for re-runs

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/GenTest/App/GenTest.pm
111
111
            if ($self->config->gendata eq '') {
112
112
                $datagen = GenTest::App::GendataSimple->new(dsn => $dsn,
113
113
                                                            views => $self->config->views,
114
 
                                                            engine => $self->config->engine);
 
114
                                                            engine => $self->config->engine,
 
115
                                                            sqltrace=> $self->config->sqltrace);
115
116
            } else {
116
117
                $datagen = GenTest::App::Gendata->new(spec_file => $self->config->gendata,
117
118
                                                      dsn => $dsn,
120
121
                                                      debug => $self->config->debug,
121
122
                                                      rows => $self->config->rows,
122
123
                                                      views => $self->config->views,
123
 
                                                      varchar_length => $self->config->property('varchar-length'));
 
124
                                                      varchar_length => $self->config->property('varchar-length'),
 
125
                                                      sqltrace => $self->config->sqltrace);
124
126
            }
125
127
            $gendata_result = $datagen->run();
126
128
            
152
154
        next if $self->config->dsn->[$i] eq '';
153
155
        push @executors, GenTest::Executor->newFromDSN($self->config->dsn->[$i],
154
156
                                                       osWindows()?undef:$channel);
 
157
        $executors[$i]->sqltrace($self->config->sqltrace);
155
158
    }
156
159
    
157
160
    my $drizzle_only = $executors[0]->type == DB_DRIZZLE;