home
/
code
/
dups.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
6b873e5
)
Fix accidental reporting of singletons
author
Siraaj Khandkar
<siraaj@khandkar.net>
Fri, 30 Nov 2018 19:23:44 +0000
(14:23 -0500)
committer
Siraaj Khandkar
<siraaj@khandkar.net>
Fri, 30 Nov 2018 19:23:44 +0000
(14:23 -0500)
dups.ml
patch
|
blob
|
blame
|
history
diff --git
a/dups.ml
b/dups.ml
index
a35894d
..
2521b97
100644
(file)
--- a/
dups.ml
+++ b/
dups.ml
@@
-619,9
+619,10
@@
let main {input; output; ignore; sample = sample_len; njobs; delim_null} =
eprintf "[debug] reporting\n%!";
Stream.iter groups ~f:(fun (d, n, files) ->
M.digest metrics;
- if n > 1 then
+ if n > 1 then
begin
M.redundant_data metrics ~size:(n * (List.hd files).File.size);
output d n files
+ end
);
let pt1_all = time_proc () in
This page took
0.025099 seconds
and
4
git commands to generate.