net-p2p/mldonkey: remove unused patches

Package-Manager: Portage-3.0.9, Repoman-3.0.2
Signed-off-by: Michael Mair-Keimberger <m.mairkeimberger@gmail.com>
Closes: https://github.com/gentoo/gentoo/pull/18302
Signed-off-by: Joonas Niilola <juippis@gentoo.org>

2 files changed, 0 insertions, 157 deletions

diff --git a/net-p2p/mldonkey/files/ocaml-4.03.patch b/net-p2p/mldonkey/files/ocaml-4.03.patch
deleted file mode 100644
index fce94c851e2d..000000000000
--- a/net-p2p/mldonkey/files/ocaml-4.03.patch
+++ /dev/null
@@ -1,145 +0,0 @@
-Index: mldonkey-3.1.5/src/config/unix/os_stubs_c.c
-===================================================================
---- mldonkey-3.1.5.orig/src/config/unix/os_stubs_c.c
-+++ mldonkey-3.1.5/src/config/unix/os_stubs_c.c
-@@ -66,7 +66,7 @@ ssize_t os_read(OS_FD fd, char *buf, siz
- 
- void os_ftruncate(OS_FD fd, OFF_T len, /* bool */ int sparse)
- {
--  int64 cursize;
-+  int64_t cursize;
-   if(!fd) failwith("ftruncate32: file is closed");
-   
-   cursize = os_getfdsize(fd);
-@@ -109,7 +109,7 @@ int os_getdtablesize()
- 
- *******************************************************************/
- 
--int64 os_getfdsize(OS_FD fd)
-+int64_t os_getfdsize(OS_FD fd)
- {
-   struct stat buf;
- 
-@@ -127,7 +127,7 @@ int64 os_getfdsize(OS_FD fd)
- 
- *******************************************************************/
- 
--int64 os_getfilesize(char *path)
-+int64_t os_getfilesize(char *path)
- {
-   struct stat buf;
- 
-Index: mldonkey-3.1.5/src/networks/donkey/donkeyGlobals.ml
-===================================================================
---- mldonkey-3.1.5.orig/src/networks/donkey/donkeyGlobals.ml
-+++ mldonkey-3.1.5/src/networks/donkey/donkeyGlobals.ml
-@@ -781,7 +781,6 @@ let set_client_name c name md4 =
-       c.client_md4 <- md4;
-     end
- 
--exception ClientFound of client
- let find_client_by_name name =
-   try
-     H.iter (fun c ->
-Index: mldonkey-3.1.5/src/utils/cdk/zip.ml
-===================================================================
---- mldonkey-3.1.5.orig/src/utils/cdk/zip.ml
-+++ mldonkey-3.1.5/src/utils/cdk/zip.ml
-@@ -72,8 +72,6 @@ type out_file =
-     mutable of_entries: entry list;
-     of_comment: string }
- 
--exception Error of string * string * string
--
- (* Return the position of the last occurrence of s1 in s2, or -1 if not
-    found. *)
- 
-Index: mldonkey-3.1.5/src/utils/cdk/zlibstubs.c
-===================================================================
---- mldonkey-3.1.5.orig/src/utils/cdk/zlibstubs.c
-+++ mldonkey-3.1.5/src/utils/cdk/zlibstubs.c
-@@ -191,7 +191,7 @@ value camlzip_inflateEnd(value vzs)
- 
- value camlzip_update_crc32(value crc, value buf, value pos, value len)
- {
--  return copy_int32(crc32((uint32) Int32_val(crc), 
-+  return copy_int32(crc32((uint32_t) Int32_val(crc), 
-                           &Byte_u(buf, Long_val(pos)),
-                           Long_val(len)));
- }
-Index: mldonkey-3.1.5/src/utils/lib/fst_hash.c
-===================================================================
---- mldonkey-3.1.5.orig/src/utils/lib/fst_hash.c
-+++ mldonkey-3.1.5/src/utils/lib/fst_hash.c
-@@ -197,7 +197,7 @@ unsigned short fst_hash_checksum (unsign
- /*****************************************************************************/
- 
- // hash file
--int fst_hash_file (unsigned char *fth, char *file, int64 filesize)
-+int fst_hash_file (unsigned char *fth, char *file, int64_t filesize)
- {
-   FILE *fp;
-   unsigned char *buf;
-@@ -271,7 +271,7 @@ int fst_hash_file (unsigned char *fth, c
- }
- 
- 
--void fst_hash_string (unsigned char *fth, unsigned char *file, int64 filesize)
-+void fst_hash_string (unsigned char *fth, unsigned char *file, int64_t filesize)
- {
-   unsigned char * buf = file;
-   size_t len = filesize;
-Index: mldonkey-3.1.5/src/utils/lib/options.ml4
-===================================================================
---- mldonkey-3.1.5.orig/src/utils/lib/options.ml4
-+++ mldonkey-3.1.5/src/utils/lib/options.ml4
-@@ -332,7 +332,6 @@ let exit_exn = Exit
- 
- 
- let unsafe_get = String.unsafe_get
--external is_printable : char -> bool = "caml_is_printable"
- let unsafe_set = String.unsafe_set
-   
- let escaped s =
-@@ -343,7 +342,7 @@ let escaped s =
-         (match unsafe_get s i with
-            '"' | '\\' -> 2
-          | '\n' | '\t' -> 1
--         | c -> if is_printable c then 1 else 4)
-+         | c -> 1)
-   done;
-   if !n = String.length s then s
-   else
-@@ -354,16 +353,7 @@ let escaped s =
-         '"' | '\\' as c -> unsafe_set s' !n '\\'; incr n; unsafe_set s' !n c
-       | '\n' | '\t' as c -> unsafe_set s' !n c
-       | c ->
--          if is_printable c then unsafe_set s' !n c
--          else
--            let a = int_of_char c in
--            unsafe_set s' !n '\\';
--            incr n;
--            unsafe_set s' !n (char_of_int (48 + a / 100));
--            incr n;
--            unsafe_set s' !n (char_of_int (48 + a / 10 mod 10));
--            incr n;
--            unsafe_set s' !n (char_of_int (48 + a mod 10))
-+          unsafe_set s' !n c
-       end;
-       incr n
-     done;
-Index: mldonkey-3.1.5/src/utils/lib/os_stubs.h
-===================================================================
---- mldonkey-3.1.5.orig/src/utils/lib/os_stubs.h
-+++ mldonkey-3.1.5/src/utils/lib/os_stubs.h
-@@ -155,8 +155,8 @@ extern OFF_T os_lseek(OS_FD fd, OFF_T po
- extern void os_ftruncate(OS_FD fd, OFF_T len, int sparse);

- extern ssize_t os_read(OS_FD fd, char *buf, size_t len);

- extern int os_getdtablesize();

--extern int64 os_getfdsize(OS_FD fd);

--extern int64 os_getfilesize(char *path);

-+extern int64_t os_getfdsize(OS_FD fd);

-+extern int64_t os_getfilesize(char *path);

- extern void os_set_nonblock(OS_SOCKET fd);

- extern void os_uname(char buf[]);

- extern int os_os_supported();

diff --git a/net-p2p/mldonkey/files/ocaml4.patch b/net-p2p/mldonkey/files/ocaml4.patch
deleted file mode 100644
index 32882417b62c..000000000000
--- a/net-p2p/mldonkey/files/ocaml4.patch
+++ /dev/null
@@ -1,12 +0,0 @@
-Index: mldonkey-3.1.5/src/utils/net/terminal.ml
-===================================================================
---- mldonkey-3.1.5.orig/src/utils/net/terminal.ml
-+++ mldonkey-3.1.5/src/utils/net/terminal.ml
-@@ -185,7 +185,6 @@ module Output = struct
-   let canal = List.assoc chan !chanmap in
-   etat.chan <- Some (chan, canal);
-   info (sprintf "connecte au canal '%s'" chan);
--  (* {| canal ALL } *)
-        with Not_found -> (* pas encore de recepteur pour ce canal *)
-   try (* on en cree un *)
-     let serveur = nsrecord.get_loc chan in