mirror of
https://github.com/zeek/zeek.git
synced 2025-10-02 14:48:21 +00:00
29 lines
1,014 B
Text
29 lines
1,014 B
Text
# Don't run the test for optimized scripts, as they'll stop early due to
|
|
# error propagation.
|
|
# @TEST-REQUIRES: test "${ZEEK_ZAM}" != "1"
|
|
# @TEST-REQUIRES: test "${ZEEK_CPP}" != "1"
|
|
#
|
|
# @TEST-EXEC: zeek -b %INPUT >out
|
|
# @TEST-EXEC: btest-diff out
|
|
# @TEST-EXEC: btest-diff .stderr
|
|
|
|
event zeek_init()
|
|
{
|
|
print "Justification (input string 'abc')";
|
|
print "----------------------------------";
|
|
local s1 : string = "abc";
|
|
print fmt("ljust: '%s'", ljust(s1, 2, "--")); # This should return an error
|
|
print fmt("rjust: '%s'", rjust(s1, 2, "--")); # This should return an error
|
|
print "";
|
|
|
|
local s3: string = "abcdefghi";
|
|
print fmt("find_str/rfind_str (input string '%s')", s3);
|
|
print "-----------------------------------------------------";
|
|
print fmt("find_str: %d", find_str(s3, "efg", 6, 2));
|
|
print fmt("find_str: %d", rfind_str(s3, "efg", 6, 2));
|
|
print "";
|
|
|
|
print fmt("string_cat");
|
|
print "-----------------------------------------------------";
|
|
print fmt("string_cat: %s", string_cat("a", 1, "c"));
|
|
}
|