diff options
| author |   Alexis Ballier <aballier@gentoo.org> | 2017-07-03 19:40:06 +0200 |
|---|---|---|
| committer | Alexis Ballier <aballier@gentoo.org> | 2017-07-03 19:40:14 +0200 |
| commit | 94a16fb921f072d6f3d4cf776834ec316031ed51 (patch) | |
| tree | 0bf931abef243ee2637b4ccc6271190929cb80a7 /dev-ml | |
| parent | dev-python/oslo-concurrency: Add python3.6 to PYTHON_COMPAT (diff) | |
| download | gentoo-94a16fb921f072d6f3d4cf776834ec316031ed51.tar.gz gentoo-94a16fb921f072d6f3d4cf776834ec316031ed51.tar.bz2 gentoo-94a16fb921f072d6f3d4cf776834ec316031ed51.zip | |
dev-ml/ocaml-containers: backport upstream test build fix with latest qcheck, bug #623664
Package-Manager: Portage-2.3.6, Repoman-2.3.2
Diffstat (limited to 'dev-ml')
| -rw-r--r-- | dev-ml/ocaml-containers/files/qcheck.patch | 61 | ||||
| -rw-r--r-- | dev-ml/ocaml-containers/ocaml-containers-1.2.ebuild | 2 |
2 files changed, 63 insertions, 0 deletions
diff --git a/dev-ml/ocaml-containers/files/qcheck.patch b/dev-ml/ocaml-containers/files/qcheck.patch new file mode 100644 index 000000000000..c88ef31741af --- /dev/null +++ b/dev-ml/ocaml-containers/files/qcheck.patch @@ -0,0 +1,61 @@ +commit b2f8eb5b27a95f37509ab6345910ecd62b3c8a90 +Author: Simon Cruanes <simon.cruanes.2007@m4x.org> +Date: Tue May 30 09:16:37 2017 +0200 + + update to qcheck 0.6 + +diff --git a/src/core/CCList.ml b/src/core/CCList.ml +index ebdf7ce..ef4254e 100644 +--- a/src/core/CCList.ml ++++ b/src/core/CCList.ml +@@ -688,9 +688,9 @@ let take_while p l = + *) + + (*$Q +- Q.(pair (fun1 small_int bool) (list small_int)) (fun (f,l) -> \ +- let l1 = take_while f l in \ +- List.for_all f l1) ++ Q.(pair (fun1 Observable.int bool) (list small_int)) (fun (f,l) -> \ ++ let l1 = take_while (Q.Fn.apply f) l in \ ++ List.for_all (Q.Fn.apply f) l1) + *) + + let rec drop_while p l = match l with +@@ -698,8 +698,8 @@ let rec drop_while p l = match l with + | x :: l' -> if p x then drop_while p l' else l + + (*$Q +- Q.(pair (fun1 small_int bool) (list small_int)) (fun (f,l) -> \ +- take_while f l @ drop_while f l = l) ++ Q.(pair (fun1 Observable.int bool) (list small_int)) (fun (f,l) -> \ ++ take_while (Q.Fn.apply f) l @ drop_while (Q.Fn.apply f) l = l) + *) + + let take_drop_while p l = +@@ -720,9 +720,9 @@ let take_drop_while p l = + direct direct_depth_default_ p l + + (*$Q +- Q.(pair (fun1 small_int bool) (list small_int)) (fun (f,l) -> \ +- let l1,l2 = take_drop_while f l in \ +- (l1 = take_while f l) && (l2 = drop_while f l)) ++ Q.(pair (fun1 Observable.int bool) (list small_int)) (fun (f,l) -> \ ++ let l1,l2 = take_drop_while (Q.Fn.apply f) l in \ ++ (l1 = take_while (Q.Fn.apply f) l) && (l2 = drop_while (Q.Fn.apply f) l)) + *) + + let last n l = +diff --git a/src/data/CCRAL.ml b/src/data/CCRAL.ml +index 0c00c3a..5d9aa24 100644 +--- a/src/data/CCRAL.ml ++++ b/src/data/CCRAL.ml +@@ -151,7 +151,8 @@ let mapi ~f l = + *) + + (*$Q +- Q.(pair (list small_int)(fun2 int int bool)) (fun (l,f) -> \ ++ Q.(pair (list small_int)(fun2 Observable.int Observable.int bool)) (fun (l,f) -> \ ++ let f = Q.Fn.apply f in \ + mapi ~f (of_list l) |> to_list = List.mapi f l ) + *) + diff --git a/dev-ml/ocaml-containers/ocaml-containers-1.2.ebuild b/dev-ml/ocaml-containers/ocaml-containers-1.2.ebuild index 33e8871a4f73..30745be4f65a 100644 --- a/dev-ml/ocaml-containers/ocaml-containers-1.2.ebuild +++ b/dev-ml/ocaml-containers/ocaml-containers-1.2.ebuild @@ -24,6 +24,8 @@ RDEPEND=" DEPEND="${RDEPEND} dev-ml/cppo test? ( dev-ml/iTeML dev-ml/ounit dev-ml/gen )" +PATCHES=( "${FILESDIR}/qcheck.patch" ) + src_configure() { oasis_configure_opts=" --enable-unix |