bail_out()

立即终止整个测试套件的执行。

用法

bail_out(msg) 发出 TAP 协议的 Bail out! 信号,立即终止所有测试。通常在 add_block_preprocessor 中检测到致命问题时使用。

perl
1use Test::Nginx::Socket::Lua;
2
3add_block_preprocessor(sub {
4 my $block = shift;
5 if (!-f "/usr/local/openresty/nginx/sbin/nginx") {
6 bail_out("OpenResty not installed!");
7 }
8});
9
10run_tests();

bail_out 会终止 prove 的整个运行,不仅仅是当前文件。只在绝对必要时使用。