← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to lib/GenTest/Simplifier/Test.pm

merge

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/GenTest/Simplifier/Test.pm
169
169
                        foreach my $ex (0..1) {
170
170
                                if (defined $executors->[$ex]) {
171
171
                                        $test .= "/* Query plan Server $ex:\n";
172
 
                                        my $plan =  $executors->[$ex]->dbh()->selectall_arrayref("EXPLAIN $query");
 
172
                                        my $plan = $executors->[$ex]->execute("EXPLAIN EXTENDED $query", 1);
173
173
                                        
174
 
                                        foreach my $row (@$plan) {
175
 
                                                $test .= "# |".join("|",@$row)."|\n";
 
174
                                        foreach my $row (@{$plan->data()}) {
 
175
                                                $test .= "# |".join("|", @$row)."|\n";
176
176
                                        }
 
177
 
 
178
                                        $test .= "# Extended: \n# ".join("# \n", map { $_->[2] } @{$plan->warnings()})."\n";
177
179
                                        $test .= "# */\n\n";
178
180
                                }
179
181
                        }