diff options
| author | unknown <tim@threads.polyesthetic.msg> | 2001-02-05 22:21:36 -0500 |
|---|---|---|
| committer | unknown <tim@threads.polyesthetic.msg> | 2001-02-05 22:21:36 -0500 |
| commit | 6dcdc303c0321634ebfb232efaae3cd372551736 (patch) | |
| tree | 6c32b646a0294df942b0f8c445b0b09cf649d0c2 /sql-bench | |
| parent | c8908b8fd1d23b9b5fd5681b018c1bebe1957a32 (diff) | |
| download | mariadb-git-6dcdc303c0321634ebfb232efaae3cd372551736.tar.gz | |
Perl cleanups in sql-bench.
Thanks to Chris Richmond MD6-FDC <crichmon@pcocd2.intel.com> for the
patch.
sql-bench/crash-me.sh:
fix bug with $limits{create_index} handling.
fix typo (result_type -> $result_type).
sql-bench/server-cfg.sh:
fix uninitialized variable warning.
Diffstat (limited to 'sql-bench')
| -rw-r--r-- | sql-bench/crash-me.sh | 7 | ||||
| -rw-r--r-- | sql-bench/server-cfg.sh | 2 |
2 files changed, 4 insertions, 5 deletions
diff --git a/sql-bench/crash-me.sh b/sql-bench/crash-me.sh index 27b908be5aa..74226e1ff48 100644 --- a/sql-bench/crash-me.sh +++ b/sql-bench/crash-me.sh @@ -1,4 +1,4 @@ -#!@PERL@ +#!@PERL@ -w # Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB # # This library is free software; you can redistribute it and/or @@ -1333,8 +1333,7 @@ report("index in create table",'index_in_create', # The following must be executed as we need the value of end_drop_keyword # later -if (! defined($limits{'create_index'}) && - ! defined($limits{'drop_index'}) ) +if (defined($limits{'create_index'}) && defined($limits{'drop_index'})) { if ($res=safe_query("create index crash_q on crash_me (a)")) { @@ -2659,7 +2658,7 @@ sub safe_query_result $sth->finish; return ($result_type == 8) ? 0 : 1; } - if(result_type == 8) { + if($result_type == 8) { $sth->finish; return 1; } diff --git a/sql-bench/server-cfg.sh b/sql-bench/server-cfg.sh index 6e27e84a08d..8ede6022cfc 100644 --- a/sql-bench/server-cfg.sh +++ b/sql-bench/server-cfg.sh @@ -124,7 +124,7 @@ sub new $limits{'max_conditions'} = 9999; # (Actually not a limit) $limits{'max_columns'} = 2000; # Max number of columns in table # Windows can't handle that many files in one directory - $limits{'max_tables'} = ($machine =~ "^win") ? 5000 : 65000; + $limits{'max_tables'} = (($machine || '') =~ "^win") ? 5000 : 65000; $limits{'max_text_size'} = 65000; # Max size with default buffers. $limits{'query_size'} = 1000000; # Max size with default buffers. $limits{'max_index'} = 16; # Max number of keys |