[gentoo-commits] repo/gentoo:master commit in: dev-ml/gapi-ocaml/files/

[gentoo-commits] repo/gentoo:master commit in: dev-ml/gapi-ocaml/files/

[Maciej Barć]

commit:     a83373f2d7e2f0b642071ede84ebe79e8df9e7e6
Author:     Maciej Barć <xgqt <AT> gentoo <DOT> org>
AuthorDate: Thu Nov  2 21:35:32 2023 +0000
Commit:     Maciej Barć <xgqt <AT> gentoo <DOT> org>
CommitDate: Thu Nov  2 22:11:21 2023 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=a83373f2

dev-ml/gapi-ocaml: patch cleanup

Signed-off-by: Maciej Barć <xgqt <AT> gentoo.org>

 .../gapi-ocaml/files/gapi-ocaml-0.4.2-ounit2.patch | 58 ----------------------
 1 file changed, 58 deletions(-)

diff --git a/dev-ml/gapi-ocaml/files/gapi-ocaml-0.4.2-ounit2.patch b/dev-ml/gapi-ocaml/files/gapi-ocaml-0.4.2-ounit2.patch
deleted file mode 100644
index 36098d82ed67..000000000000
--- a/dev-ml/gapi-ocaml/files/gapi-ocaml-0.4.2-ounit2.patch
+++ /dev/null
@@ -1,58 +0,0 @@
-diff --git a/gapi-ocaml.opam b/gapi-ocaml.opam
-index cb9b0fb5..923675d8 100644
---- a/gapi-ocaml.opam
-+++ b/gapi-ocaml.opam
-@@ -15,7 +15,7 @@ depends: [
-   "dune"
-   "ocamlnet" {>= "4.1.4"}
-   "ocurl"
--  "ounit" {with-test}
-+  "ounit2" {with-test}
-   "yojson"
- ]
- synopsis: "A simple OCaml client for Google Services"
-diff --git a/src/test/dune b/src/test/dune
-index 5d955f42..ef45f0ce 100644
---- a/src/test/dune
-+++ b/src/test/dune
-@@ -1,7 +1,7 @@
- (executable
-  (name testSuite)
-  (flags (:standard -w -3-6-23-27-32-33-50))
-- (libraries threads oUnit gapi-ocaml))
-+ (libraries threads ounit2 gapi-ocaml))
- 
- (alias
-  (name runtest)
-diff --git a/src/test/testSuite.ml b/src/test/testSuite.ml
-index 7851661e..150781f7 100644
---- a/src/test/testSuite.ml
-+++ b/src/test/testSuite.ml
-@@ -76,11 +76,11 @@ let build_suite_from_list test_list =
- 
- let _ =
-   let test_list = ref (core_tests @ model_tests) in
--  let ounit_specs =
-+  let ounit2_specs =
-     [
--      ("-verbose", Arg.Unit (fun _ -> ()), "See oUnit doc");
--      ("-only-test", Arg.String (fun _ -> ()), "See oUnit doc");
--      ("-list-test", Arg.String (fun _ -> ()), "See oUnit doc");
-+      ("-verbose", Arg.Unit (fun _ -> ()), "See ounit2 doc");
-+      ("-only-test", Arg.String (fun _ -> ()), "See ounit2 doc");
-+      ("-list-test", Arg.String (fun _ -> ()), "See ounit2 doc");
-     ]
-   in
-   let arg_specs =
-@@ -100,9 +100,9 @@ let _ =
-       ]
-   in
-   let _ =
--    Arg.parse (arg_specs @ ounit_specs)
-+    Arg.parse (arg_specs @ ounit2_specs)
-       (fun _ -> ())
--      ("Usage: " ^ Sys.argv.(0) ^ " [-service svc] [-all] [oUnit arguments]")
-+      ("Usage: " ^ Sys.argv.(0) ^ " [-service svc] [-all] [ounit2 arguments]")
-   in
-   let _ =
-     (* Reset argument counter, to let OUnit reparse arguments *)