blob: 699fc9dacba074c1fb79b07c30fb5ebd36a6f209 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
--source ../include/fast_update_gen_header.inc
--let GENERATED=$MYSQL_TMP_DIR/generated_fast_update_int.inc
--perl
my $mysql_current_test_dir = $ENV{MYSQL_CURRENT_TEST_DIR};
open(FILE, '>', "$ENV{GENERATED}") or die;
foreach my $t ('tinyint', 'smallint', 'mediumint', 'int', 'bigint') {
foreach my $u ('', 'unsigned') {
foreach my $n ('null', 'not null') {
print FILE "--echo ### Test int for: $t, $u, $n\n";
test_int($t, $u, $n);
}
}
}
close FILE;
sub test_int {
my $t = shift;
my $u = shift;
my $n = shift;
print FILE "create table t (\n";
print FILE " id $t $u primary key,\n";
print FILE " x $t $u $n\n";
print FILE ") engine = tokudb;\n";
print FILE "--source $ENV{MYSQL_CURRENT_TEST_DIR}/../include/".
"fast_update_int.inc\n\n";
}
EOF
--source ../include/fast_update_gen_footer.inc
|