Mirror/zeek
1
0
Fork 0
mirror of https://github.com/zeek/zeek.git synced 2025-10-17 14:08:20 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 3

Add test of record() constructor to table initializer unit test.

Browse source
This commit is contained in:
Jon Siwek 2012-11-28 14:53:36 -06:00
parent a0590b2140
commit 00f7bbda96
2 changed files with 29 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
testing/btest/Baseline/language.table-init-container-ctors/output
View file

@ -28,6 +28,14 @@ table of table
} }
} }
table of record
{
[13] = [a=1, b=foo],
[5] = [a=2, b=bar]
}
T
T
T T
T T
T T

21
testing/btest/language/table-init-container-ctors.bro
View file

@ -7,10 +7,15 @@
type set_yield: set[string, count]; type set_yield: set[string, count];
type vector_yield: vector of count; type vector_yield: vector of count;
type table_yield: table[string, count] of count; type table_yield: table[string, count] of count;
type record_yield: record {
a: count;
b: string;
};
global lone_set_ctor: set_yield = set(["foo", 1], ["bar", 2]); global lone_set_ctor: set_yield = set(["foo", 1], ["bar", 2]);
global lone_vector_ctor: vector_yield = vector(1, 2); global lone_vector_ctor: vector_yield = vector(1, 2);
global lone_table_ctor: table_yield = table(["foo", 1] = 1, ["bar", 2] = 2); global lone_table_ctor: table_yield = table(["foo", 1] = 1, ["bar", 2] = 2);
global lone_record_ctor: record_yield = record($a=1, $b="foo");
global table_of_set: table[count] of set_yield = { global table_of_set: table[count] of set_yield = {
[13] = lone_set_ctor, [13] = lone_set_ctor,
@ -27,11 +32,17 @@ global table_of_table: table[count] of table_yield = {
[5] = table(["bah", 3] = 3, ["baz", 4] = 4), [5] = table(["bah", 3] = 3, ["baz", 4] = 4),
}; };
global table_of_record: table[count] of record_yield = {
[13] = lone_record_ctor,
[5] = record($a=2, $b="bar"),
};
# Just copying the inline ctors used in the table initializer lists here # Just copying the inline ctors used in the table initializer lists here
# for later comparisons. # for later comparisons.
global inline_set_ctor: set_yield = set(["bah", 3], ["baz", 4]); global inline_set_ctor: set_yield = set(["bah", 3], ["baz", 4]);
global inline_vector_ctor: vector_yield = vector(3, 4); global inline_vector_ctor: vector_yield = vector(3, 4);
global inline_table_ctor: table_yield = table(["bah", 3] = 3, ["baz", 4] = 4); global inline_table_ctor: table_yield = table(["bah", 3] = 3, ["baz", 4] = 4);
global inline_record_ctor: record_yield = record($a=2, $b="bar");
function compare_set_yield(a: set_yield, b: set_yield) function compare_set_yield(a: set_yield, b: set_yield)
{ {
@ -56,6 +67,11 @@ function compare_table_yield(a: table_yield, b: table_yield)
print [s, c] in b && a[s, c] == b[s, c]; print [s, c] in b && a[s, c] == b[s, c];
} }
function compare_record_yield(a: record_yield, b: record_yield)
{
print a$a == b$a && a$b == b$b;
}
print "table of set"; print "table of set";
print table_of_set; print table_of_set;
print ""; print "";
@ -65,6 +81,9 @@ print "";
print "table of table"; print "table of table";
print table_of_table; print table_of_table;
print ""; print "";
print "table of record";
print table_of_record;
print "";
compare_set_yield(table_of_set[13], lone_set_ctor); compare_set_yield(table_of_set[13], lone_set_ctor);
compare_set_yield(table_of_set[5], inline_set_ctor); compare_set_yield(table_of_set[5], inline_set_ctor);
@ -72,3 +91,5 @@ compare_vector_yield(table_of_vector[13], lone_vector_ctor);
compare_vector_yield(table_of_vector[5], inline_vector_ctor); compare_vector_yield(table_of_vector[5], inline_vector_ctor);
compare_table_yield(table_of_table[13], lone_table_ctor); compare_table_yield(table_of_table[13], lone_table_ctor);
compare_table_yield(table_of_table[5], inline_table_ctor); compare_table_yield(table_of_table[5], inline_table_ctor);
compare_record_yield(table_of_record[13], lone_record_ctor);
compare_record_yield(table_of_record[5], inline_record_ctor);