hcq/MaxScale
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Make run_session_hang.sh shorter

Browse Source 
The test was unnecessarily long.
This commit is contained in:
Markus Mäkelä
2017-09-19 10:11:42 +03:00
parent 364789abde
commit a26f6f6087
1 changed files with 1 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
maxscale-system-test/session_hang/simpletest.pl
View File

@ -15,13 +15,9 @@ my $sth = $dbh->prepare("SELECT id, \@\@server_id from test.t1 where id=(?)");
$sth->bind_param(1, "%"); # placeholders are numbered from 1 $sth->bind_param(1, "%"); # placeholders are numbered from 1
for (my $i=0; $i<100000; $i++) { for (my $i=0; $i<1000; $i++) {
if ($i % 5000 == 0) {
print "$i\n";
}
if (defined($sth)) { if (defined($sth)) {
$sth->execute($i) or warn "Did not execute successfully: ".$dbh->errstr; $sth->execute($i) or warn "Did not execute successfully: ".$dbh->errstr;
#DBI::dump_results($sth);
} }
} }