gentoo-mirror/gentoo
1
0
Fork 0
mirror of https://github.com/gentoo-mirror/gentoo.git synced 2026-11-08 18:27:07 -08:00
Code Issues Projects Releases Wiki Activity

dev-ml/dose3: remove unused patch(es)

Browse Source 
Package-Manager: Portage-3.0.17, Repoman-3.0.2
Signed-off-by: Michael Mair-Keimberger <mmk@levelnine.at>
Signed-off-by: Conrad Kostecki <conikost@gentoo.org>
This commit is contained in:
Michael Mair-Keimberger
2021-03-14 19:57:30 +01:00
committed by Conrad Kostecki
parent 6a12c6ba70
commit 61ba3da749
2 changed files with 0 additions and 52 deletions
Download Patch File Download Diff File Expand all files Collapse all files
dev-ml/dose3/files/ocaml406.patch
-39
View File
@@ -1,39 +0,0 @@
Index: dose3-5.0.1/common/criteria_lexer.mll
===================================================================
--- dose3-5.0.1.orig/common/criteria_lexer.mll
+++ dose3-5.0.1/common/criteria_lexer.mll
@@ -18,7 +18,7 @@
let c = Lexing.lexeme_char lexbuf 2 in (* the delimiter can be any character *)
(* find the terminating delimiter *)
let endpos =
- try String.index_from lexbuf.lex_buffer (lexbuf.lex_start_pos + 3) c with
+ try Bytes.index_from lexbuf.lex_buffer (lexbuf.lex_start_pos + 3) c with
|Invalid_argument _ ->
raise (Format822.Syntax_error (
Format822.error lexbuf "String too short"))
@@ -27,9 +27,9 @@
Format822.error lexbuf (Printf.sprintf "cannot find: %c" c)))
in
let len = endpos - (lexbuf.lex_start_pos + 3) in
- let s = String.sub lexbuf.lex_buffer (lexbuf.lex_start_pos + 3) len in
- lexbuf.Lexing.lex_curr_pos <- lexbuf.Lexing.lex_start_pos + ((String.length s)+4);
- s
+ let s = Bytes.sub lexbuf.lex_buffer (lexbuf.lex_start_pos + 3) len in
+ lexbuf.Lexing.lex_curr_pos <- lexbuf.Lexing.lex_start_pos + ((Bytes.length s)+4);
+ Bytes.to_string s
}
Index: dose3-5.0.1/common/input.ml
===================================================================
--- dose3-5.0.1.orig/common/input.ml
+++ dose3-5.0.1/common/input.ml
@@ -47,7 +47,7 @@ let bzip_open_file file =
in
IO.create_in
~read:(fun () -> input_char ch)
- ~input:(read ch)
+ ~input:(fun x -> read ch (Bytes.to_string x))
~close:(fun () -> Bz2.close_in ch)
#else
fatal "bzip not supported. re-configure with --with-bz2"
dev-ml/dose3/files/unix.patch
-13
View File
@@ -1,13 +0,0 @@
Index: dose3-5.0.1/META.in
===================================================================
--- dose3-5.0.1.orig/META.in
+++ dose3-5.0.1/META.in
@@ -8,7 +8,7 @@ package "common" (
version = "@PACKAGE_VERSION@"
archive(byte) = "common.cma"
archive(native) = "common.cmxa"
-requires = "extlib, re.pcre, cudf, @ZIP@, @BZ2@"
+requires = "extlib, re.pcre, cudf, unix, @ZIP@, @BZ2@"
)
package "algo" (