如何规划外部子运行的其他测试?

Dan*_*mer 8 testing perl test-plan

我们在Perl中为不同的科学数据格式编写了解析器.最近我添加了一个测试套件,其中parser_*.t包含每种格式和子格式的文件.

当然,解析器的API完全相同,只是从用于测试解析的示例文件中读取的数据不同.为了简化测试文件,我写了一个sub,它传递了解析器对象和表示预期数据的哈希结构.看起来像

my $parser = new MyApp::Parser($file);
test_nested_objects = ($parser, {
     property1 => "value",
     property2 => 123,
     subobject_accessor => {
         property3 => "foobar",
     }
}
Run Code Online (Sandbox Code Playgroud)

test_nested_objects遍历散列并运行散列中定义的所有属性的测试,例如,如果subobject_accessor可以调用,则返回一个对象并且可以调用该对象property3.

我检查了整个*.t文件运行了多少测试并添加tests => 123到所有*.t文件中.现在,我在泛型函数中添加了一些检查,所有计划都是错误的.

如何让我的计划了解子测试?我想实现以下目标:

  • 在运行它们之前给出的测试次数以查看progess
  • 总数自动增加→编辑子时无需手动更改数字
  • 在运行时可以看到sub中的单个测试(在sub中隐藏测试并且只返回0或1是不可接受的,因为我真的需要知道解析数据有什么问题)

我希望你能够明白.对不起,但我认为如果没有一些背景知识,人们可能会理解.

bri*_*foy 11

测试计划的最新趋势根本就是不这样做.在测试文件的末尾,您声明已到达结尾:

 done_testing();
Run Code Online (Sandbox Code Playgroud)

测试计划的许多用途仅用于确保测试脚本完成.如果它看到了正确数量的测试,那么脚本必须一直到最后.这不是真的,但它是一个方便和可行的小说.

如果您必须进行一些计算来确定测试的数量,例如测量数据结构的大小,那么请plan稍后调用:

 use Test::More;  # don't declare the plan yet

 my $test_count = ...;

 plan tests => $test_count; 
Run Code Online (Sandbox Code Playgroud)

但是,您可以将测试划分为子测试,而不是制定大计划.每个子测试只需知道它运行了多少测试,脚本只需要知道子测试的数量:

 subtest some_label => sub {
      plan tests => $n;
      ...
      };
Run Code Online (Sandbox Code Playgroud)

每个通话的测试功能,将是一个考验,功能会使用一个子测试做任何它想不暴露太多的调用者来完成.