Perl中浮点等价的单元测试
发布时间:2020-12-15 23:26:53 所属栏目:大数据 来源:网络整理
导读:我正在使用 Test::More在Perl中编写单元测试.我已经习惯了 cxxunit的一些结构,特别是我缺少 TS_ASSERT_DELTA.对于那些没有看过 TS_ASSERT_DELTA的人来说,它看起来像这样: TS_ASSERT_DELTA( 1.0,1.1,0.5 ); // this test will passTS_ASSERT_DELTA( 1.0,1e-1
我正在使用
Test::More在Perl中编写单元测试.我已经习惯了
cxxunit的一些结构,特别是我缺少
TS_ASSERT_DELTA.对于那些没有看过
TS_ASSERT_DELTA的人来说,它看起来像这样:
TS_ASSERT_DELTA( 1.0,1.1,0.5 ); // this test will pass TS_ASSERT_DELTA( 1.0,1e-10 ); // this test will fail 是否有Perl等效的浮点比较?或者每个人都为此写了一个明显的功能?我正在使用这个: sub compare_float_delta { my $n1 = shift; my $n2 = shift; my $delta = shift; return( abs($n1-$n2) < $delta ); } 对我来说,这似乎是测试框架应该提供的东西.这个想法是正确的,还是我应该调用float_compare_delta继续我的生活? 解决方法
您可以使用CPAN:
Test::Number::Delta中的特定模块
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |