Commit f7195532 authored by Elena Stepanova's avatar Elena Stepanova

Windows-specific suppression and perl problems

parent a83d58a1
...@@ -81,7 +81,7 @@ EOF ...@@ -81,7 +81,7 @@ EOF
# Adding a warning suppression based on what InnoDB currently does # Adding a warning suppression based on what InnoDB currently does
# when it attempts to access a table without an *.ibd file # when it attempts to access a table without an *.ibd file
--disable_query_log --disable_query_log
eval CALL mtr.add_suppression('$storage_engine: Error:.*'); eval CALL mtr.add_suppression('$storage_engine: Error:');
--enable_query_log --enable_query_log
} }
......
...@@ -110,7 +110,7 @@ if ($have_default_index) ...@@ -110,7 +110,7 @@ if ($have_default_index)
while (!$my_errno) while (!$my_errno)
{ {
--error 0,1 --error 0,2
--perl --perl
use File::Copy; use File::Copy;
@files = glob "$ENV{my_datadir}/test/t1*"; @files = glob "$ENV{my_datadir}/test/t1*";
...@@ -122,7 +122,7 @@ if ($have_default_index) ...@@ -122,7 +122,7 @@ if ($have_default_index)
exit 0; exit 0;
} }
# No more files # No more files
exit 1; exit 2;
EOF EOF
let $my_errno = $errno; let $my_errno = $errno;
if (!$my_errno) if (!$my_errno)
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment