diff options
author | Marko Mäkelä <marko.makela@mariadb.com> | 2017-03-24 19:17:23 +0200 |
---|---|---|
committer | Marko Mäkelä <marko.makela@mariadb.com> | 2017-03-24 19:17:23 +0200 |
commit | 23d72bf3aa9b16c0b1250ed1a04bdf18eea9754a (patch) | |
tree | d3149a83b06cafbdbdb333e0b93000b42f871adb /mysql-test/suite/innodb/t | |
parent | cd2fe26116930220666281949fb7af81f3cc2b28 (diff) | |
download | mariadb-git-23d72bf3aa9b16c0b1250ed1a04bdf18eea9754a.tar.gz |
Close a file handle in a Perl snippet.
This could fix a race condition between mysqld and perl on Windows.
Diffstat (limited to 'mysql-test/suite/innodb/t')
-rw-r--r-- | mysql-test/suite/innodb/t/log_corruption.test | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/mysql-test/suite/innodb/t/log_corruption.test b/mysql-test/suite/innodb/t/log_corruption.test index 2e628065199..7cfbda181e0 100644 --- a/mysql-test/suite/innodb/t/log_corruption.test +++ b/mysql-test/suite/innodb/t/log_corruption.test @@ -231,6 +231,7 @@ print OUT pack("H*x[212]Nx[1024]", "590DBAACFE922582", 0xc72d49c4); # redo log data print OUT pack("H*x[5]", "C0DEBA5E0022000c0000000138"); print OUT pack("H*x[475]H*", "12860cb7809781e80006626f677573", "089C0ADA"); +close OUT or die; EOF --copy_file $bugdir/ib_logfile0 $bugdir/ib_logfile # Anything below innodb_force_recovery=6 must find an invalid redo log. |