mirror of
https://github.com/zeek/zeek.git
synced 2025-10-02 06:38:20 +00:00
789cb376fd
This also installs symlinks from "zeek" and "bro-config" to a wrapper script that prints a deprecation warning. The btests pass, but this is still WIP. broctl renaming is still missing. #239
57 lines
743 B
Text
57 lines
743 B
Text
# @TEST-EXEC: zeek -b %INPUT >out
|
|
# @TEST-EXEC: btest-diff out
|
|
|
|
function test_case(msg: string, expect: bool)
|
|
{
|
|
print fmt("%s (%s)", msg, expect ? "PASS" : "FAIL");
|
|
}
|
|
|
|
function foo(c: count): bool
|
|
{ return c == 42 ? T : F; }
|
|
|
|
global TRUE_CONDITION = T;
|
|
|
|
event zeek_init()
|
|
{
|
|
local xyz = 0;
|
|
|
|
# Test "if" without "else"
|
|
|
|
@if ( F )
|
|
xyz += 1;
|
|
@endif
|
|
|
|
@if ( foo(0) )
|
|
xyz += 1;
|
|
@endif
|
|
|
|
@if ( T && foo(42) )
|
|
xyz += 2;
|
|
@endif
|
|
|
|
test_case( "@if", xyz == 2 );
|
|
|
|
# Test "if" with an "else"
|
|
|
|
xyz = 0;
|
|
|
|
@if ( F )
|
|
xyz += 1;
|
|
@else
|
|
xyz += 2;
|
|
@endif
|
|
|
|
test_case( "@if...@else", xyz == 2 );
|
|
|
|
xyz = 0;
|
|
|
|
@if ( T && TRUE_CONDITION )
|
|
xyz += 1;
|
|
@else
|
|
xyz += 2;
|
|
@endif
|
|
|
|
test_case( "@if...@else", xyz == 1 );
|
|
|
|
}
|
|
|