File: fix_ocaml_build_error_List.min.patch

package info (click to toggle)
pplacer 1.1~alpha19-8
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 17,324 kB
  • sloc: ml: 20,927; ansic: 9,002; python: 1,641; makefile: 171; sh: 77; xml: 50
file content (17 lines) | stat: -rw-r--r-- 661 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Description: Fix ocaml build issue
Bug-Debian: https://bugs.debian.org/1002230
Origin: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=1002230#19
Author: Stéphane Glondu <glondu@debian.org>
Last-Update: Wed, 22 Dec 2021 09:39:59 +0100

--- a/pplacer_src/voronoi.ml
+++ b/pplacer_src/voronoi.ml
@@ -544,7 +544,7 @@ let collapse_marks gt mass markm =
       |> snd |> List.tl |> List.rev)
     markm
 
-let map_min f l = List.map f l |> List.min
+let map_min f l = List.map f l |> (fun x -> List.min x)
 let map_reduce f_map f_reduce l = List.map f_map l |> List.reduce f_reduce
 
 (* combine across the solutions below an internal node, given a solution list