[t:3861], add test

git-svn-id: file:///svn/mysql/tests/mysql-test@34517 c7de825b-a66e-492c-adef-691d508d4ae1

mysql-test/suite/tokudb.hotindex/t/hotindex-insert-bigchar.test

+# test that deletes work when hot indexing is on
+
+set storage_engine='tokudb';
+
+--echo # Establish connection conn1 (user = root)
+connect (conn1,localhost,root,,);
+
+connection default;
+
+# create table s
+--disable_warnings
+drop table if exists s;
+--enable_warnings
+create table s (a int, b varchar(2000));
+
+
+--disable_query_log
+# populate table s
+let $a = 10000;
+while ($a) {
+    eval insert into s values ($a,repeat('a', 2000)),($a,repeat('b', 2000)),($a,repeat('c', 2000)),($a,repeat('d', 2000)),($a,repeat('e', 2000)),($a,repeat('f', 2000)),($a,repeat('g', 2000)),($a,repeat('h', 2000)),($a,repeat('i', 2000)),($a,repeat('j', 2000));
+    dec $a;
+}
+--enable_query_log
+
+set tokudb_create_index_online=1;
+send create clustering index i_a on s(b);
+
+connection conn1;
+set tokudb_write_lock_wait=1;
+set tokudb_read_lock_wait=1;
+let $b=10000;
+while ($b) {
+    eval insert into s values (1000000000,repeat('a', 2000));
+    dec $b;
+}
+
+connection default;
+reap;
+select count(*) from s use index();
+select count(*) from s use index(i_a);
+disconnect conn1;
+
+#cleanup
+drop table s;