个人中心
文章发布
退出
作者热门文章
- html - 出于某种原因，IE8 对我的 Sass 文件中继承的 html5 CSS 不友好？
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景？
24
4
我编写了一个简单的程序来计算 Java 项目中某些特定包的平均测试覆盖率。一个巨大的html文件中的原始数据是这样的:
<body>
package pkg1 <line_coverage>11/111,<branch_coverage>44/444<end>
package pkg2 <line_coverage>22/222,<branch_coverage>55/555<end>
package pkg3 <line_coverage>33/333,<branch_coverage>66/666<end>
...
</body>
例如，给定指定的包“pkg1”和“pkg3”，平均行覆盖为:
(11+33)/(111+333)
平均分支覆盖率是:
(44+66)/(444+666)
我编写了以下程序来获得结果并且运行良好。但是如何以函数式的方式实现这个计算呢？类似于“(x,y) for x in ... for b in ... if ...”。我知道一点 Erlang、Haskell 和 Clojure，所以也很欣赏这些语言的解决方案。多谢!
from __future__ import division
import re
datafile = ('abc', 'd>11/23d>34/89d', 'e>25/65e>13/25e', 'f>36/92f>19/76')
core_pkgs = ('d', 'f')
covered_lines, total_lines, covered_branches, total_branches = 0, 0, 0, 0
for line in datafile:
for pkg in core_pkgs:
ptn = re.compile('.*'+pkg+'.*'+'>(\d+)/(\d+).*>(\d+)/(\d+).*')
match = ptn.match(line)
if match is not None:
cvln, tlln, cvbh, tlbh = match.groups()
covered_lines += int(cvln)
total_lines += int(tlln)
covered_branches += int(cvbh)
total_branches += int(tlbh)
print 'Line coverage:', '{:.2%}'.format(covered_lines / total_lines)
print 'Branch coverage:', '{:.2%}'.format(covered_branches/total_branches)
最佳答案
在下方您可以找到我的 Haskell 解决方案。我将尝试解释我在撰写本文时经历的要点。
首先您会发现我为覆盖率数据创建了一个数据结构。创建数据结构来表示您要处理的任何数据通常是个好主意。这部分是因为当你可以从你正在设计的任何东西的角度思考时，它会更容易设计你的代码——与函数式编程哲学密切相关，部分是因为它可以消除一些你认为你正在做某事但实际上没有做的错误。实际上在做其他事情。
与之前的观点相关:我做的第一件事是将字符串表示的数据转换为我自己的数据结构。当您进行函数式编程时，您通常是在“扫描”中做事。您没有一个函数可以将数据转换为您的格式、过滤掉不需要的数据并汇总结果。对于这些任务中的每一项，您都具有三个不同的函数，并且一次执行一个!
这是因为函数非常可组合，即如果您有三个不同的函数，您可以根据需要将它们组合在一起形成一个函数。如果你从一个开始，很难把它拆成三个不同的。
转换函数的实际工作实际上是非常无趣的，除非你专门在做 Haskell。它所做的只是尝试将每个字符串与正则表达式匹配，如果成功，它会将覆盖率数据添加到结果列表中。
再一次，疯狂的作文即将发生。我不会创建一个函数来遍历覆盖范围列表并将它们相加。我创建了一个函数来对两个覆盖范围求和，因为我知道我可以将它与专门的fold循环(有点像for 类固醇循环)来总结列表中的所有覆盖范围。我无需重新发明轮子并自己创建循环。
此外，我的 sumCoverages 函数与许多专门的循环一起工作，所以我不必编写大量函数，我只需将我的单个函数粘贴到大量预制库中函数!
在 main 函数中，您将明白我所说的编程“扫描”或“传递”数据的意思。首先我将它转换为内部格式，然后我过滤掉不需要的数据，然后我总结剩余的数据。这些是完全独立的计算。这就是函数式编程。
您还会注意到我在那里使用了两个专门的循环，filter 和 fold。这意味着我不必自己编写任何循环，我只需将一个函数添加到那些标准库循环中，然后让它们从那里获取它。
import Data.Maybe (catMaybes)
import Data.List (foldl')
import Text.Printf (printf)
import Text.Regex (matchRegex, mkRegex)
corePkgs = ["d", "f"]
stats = [
"d>11/23d>34/89d",
"e>25/65e>13/25e",
"f>36/92f>19/76"
]
format = mkRegex ".*(\\w+).*>([0-9]+)/([0-9]+).*>([0-9]+)/([0-9]+).*"
-- It might be a good idea to define a datatype for coverage data.
-- A bit of coverage data is defined as the name of the package it
-- came from, the lines covered, the total amount of lines, the
-- branches covered and the total amount of branches.
data Coverage = Coverage String Int Int Int Int
-- Then we need a way to convert the string data into a list of
-- coverage data. We do this by regex. We try to match on each
-- string in the list, and then we choose to keep only the successful
-- matches. Returned is a list of coverage data that was represented
-- by the strings.
convert :: [String] -> [Coverage]
convert = catMaybes . map match
where match line = do
[name, cl, tl, cb, tb] <- matchRegex format line
return $ Coverage name (read cl) (read tl) (read cb) (read tb)
-- We need a way to summarise two coverage data bits. This can of course also
-- be used to summarise entire lists of coverage data, by folding over it.
sumCoverage (Coverage nameA clA tlA cbA tbA) (Coverage nameB clB tlB cbB tbB) =
Coverage (nameA ++ nameB ++ ",") (clA + clB) (tlA + tlB) (cbA + cbB) (tbA + tbB)
main = do
-- First we need to convert the strings to coverage data
let coverageData = convert stats
-- Then we want to filter out only the relevant data
relevantData = filter (\(Coverage name _ _ _ _) -> name `elem` corePkgs) coverageData
-- Then we need to summarise it, but we are only interested in the numbers
Coverage _ cl tl cb tb = foldl' sumCoverage (Coverage "" 0 0 0 0) relevantData
-- So we can finally print them!
printf "Line coverage: %.2f\n" (fromIntegral cl / fromIntegral tl :: Double)
printf "Branch coverage: %.2f\n" (fromIntegral cb / fromIntegral tb :: Double)
关于python - 将命令式算法转换为函数式风格，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/19076297/
24
4
0
Textmate 语法(.tmLanguage 文件)有时以 XML 格式表示。 我想转换为更易读的格式(即 JSON 或 YAML)以集成到 VS Code 语法突出显示扩展中。 为了澄清我的意思，
如何通过 pandas 样式隐藏列标签？有一个 hide_index() 方法可以删除索引行，不幸的是 hide_column() 标签会删除整个列(标题和数据)。我只想隐藏标题。谢谢! 最佳答案 s
我正在考虑为一组服务使用 SOA 架构来支持我咨询的业务，以前我们使用数据库集成，其中每个应用程序从共享的 MS SQL 数据库中挑选出它需要的东西并使用它等等。我们有各种与怪物数据库(包括 java
所以我有以下代码，我想知道 Objective-C 中哪种“风格”被认为更好。 选项 1: id temp = [dictionary objectForKey: @"aBooleanValue"];
当创建一个没有类参数的对象时，我很难决定是否应该包含空括号。一个具体的例子:我正在与现有的 Java 代码交互，并创建一个实现名为 EventResponder 的接口(interface)的对象。我
我有一个抽象类Stack和一个扩展它的类:MyStack。我需要为 MyStack 创建一个复制构造函数。只传入 MyStack 对象更好，还是传入任何 Stack 对象更好？ public MySt
我正在考虑将那些在函数体中未修改的 Python 函数参数拼写为 ALL_UPPERCASE，向此类 API 的用户发出信号，表明传递的值不会被修改(如果一切都如广告所言，无论如何) )。我不知道这会
我的 build.gradle 文件、staging、stable 和 production 以及默认构建类型 debug 和 release。对于其中的每一个，我都有不同的 AAR 文件，例如，我有
假设我有以下文件: main.cpp 例程.cpp 例程.h 进一步假设 main.cpp 调用了在 routine.cpp 中定义的函数 routine()，但是 routine.cpp 还包含仅由
我对此进行了一些搜索，但实际上我还没有找到 MySQL 中用于创建外键的样式概念是什么 - 在创建表定义中或在 alter 语句中。谢谢。 最佳答案 何时创建外键: 如果在创建表时明确需要外键，则在创
您好，我正在尝试将 Android 应用风格(免费且完整)实现为动态壁纸。在 Eclipse 中，我曾经使用以下代码从我自己的 Android Activity 打开动态壁纸预览: I
我的 Android 应用程序有两种不同的风格，lite 和 pro。在应用程序中，我有一个名为 customFragment.java 的类，它包含在 main 中(不同风格之间没有区别)并且还包含
我有一个包含多个子目录的项目，如下所示: /opt/exampleProject/src ├── __init__.py ├── dir1 │ ├── __init__.py │ ├──
假设我们有类似的东西 int f(int n); .... do{ int a = b; int b = f(a); } 这样说有没有风险 do{ int b = f(b);
是否有风格指导或理由来选择其中一种模式而不是另一种？ 最小化上下文管理器下的代码量“感觉”更干净，但我无法指出具体原因。这可能只是偏好，并没有关于此事的官方指导。 1) 里面的所有代码都有上下文。 w
module Hints module Designer def self.message "Hello, World!" end
我正在开发一个具有多种风格的 android 项目。 这很好用，我可以自定义应用程序的元素，例如颜色和字符串资源。 我想让一些风格基于 AppCompat 浅色主题，一些基于 AppCompat 深色
因此，这不起作用，因为 seatsAvailable 是最终的。如何使用更多的 lambda 风格的从头开始的方式来完成我想要完成的事情？ final boolean seatsAvailable =
考虑以下代码: cpu_set_t cpuset; CPU_ZERO(&cpuset); CPU_SET(0, &cpuset); sched_setaffinity(0, sizeof(cpuset
从历史上看，我总是这样编写我的异常处理代码: Cursor cursor = null; try { cursor = db.openCursor(null, null
我是一名优秀的程序员,十分优秀！