Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package ocaml-base64 for openSUSE:Factory checked in at 2023-03-14 18:16:18 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/ocaml-base64 (Old) and /work/SRC/openSUSE:Factory/.ocaml-base64.new.31432 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ocaml-base64" Tue Mar 14 18:16:18 2023 rev:2 rq:1071155 version:3.5.1 Changes: -------- --- /work/SRC/openSUSE:Factory/ocaml-base64/ocaml-base64.changes 2021-04-29 01:38:05.190551743 +0200 +++ /work/SRC/openSUSE:Factory/.ocaml-base64.new.31432/ocaml-base64.changes 2023-03-14 18:16:22.611645908 +0100 @@ -1,0 +2,6 @@ +Fri Mar 3 03:03:03 UTC 2023 - [email protected] + +- Update to version 3.5.1 + See included CHANGES.md for details + +------------------------------------------------------------------- Old: ---- ocaml-base64-3.5.0.tar.xz New: ---- ocaml-base64-3.5.1.tar.xz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ ocaml-base64.spec ++++++ --- /var/tmp/diff_new_pack.6NUDfj/_old 2023-03-14 18:16:23.279649478 +0100 +++ /var/tmp/diff_new_pack.6NUDfj/_new 2023-03-14 18:16:23.283649500 +0100 @@ -1,7 +1,7 @@ # # spec file for package ocaml-base64 # -# Copyright (c) 2021 SUSE LLC +# Copyright (c) 2023 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,36 +17,37 @@ %bcond_with ocaml_base64_testsuite -%define build_flavor @BUILD_FLAVOR@%{nil} -%if "%{build_flavor}" == "testsuite" +%define build_flavor @BUILD_FLAVOR@%nil +%if "%build_flavor" == "testsuite" %if %{without ocaml_base64_testsuite} ExclusiveArch: do-not-build %endif %define nsuffix -testsuite %else -%define nsuffix %{nil} +%define nsuffix %nil %endif %define pkg ocaml-base64 -Name: %{pkg}%{nsuffix} -Version: 3.5.0 +Name: %pkg%nsuffix +Version: 3.5.1 Release: 0 %{?ocaml_preserve_bytecode} Summary: Base64 encoding and decoding in OCaml License: ISC Group: Development/Languages/OCaml URL: https://opam.ocaml.org/packages/base64 -Source0: %{pkg}-%{version}.tar.xz +Source0: %pkg-%version.tar.xz BuildRequires: ocaml -BuildRequires: ocaml-dune >= 2.0 -BuildRequires: ocaml-rpm-macros >= 20210409 +BuildRequires: ocaml-dune >= 2.3 +BuildRequires: ocaml-rpm-macros >= 20230101 %if 1 %endif -%if "%{build_flavor}" == "testsuite" +%if "%build_flavor" == "testsuite" BuildRequires: ocamlfind(alcotest) BuildRequires: ocamlfind(base64) BuildRequires: ocamlfind(bos) +BuildRequires: ocamlfind(fmt) BuildRequires: ocamlfind(rresult) %endif @@ -56,39 +57,39 @@ radix-64 representation. It is specified in RFC 4648. %package devel -Summary: Development files for %{name} +Summary: Development files for %name Group: Development/Languages/OCaml -Requires: %{name} = %{version} +Requires: %name = %version %description devel -The %{name}-devel package contains libraries and signature files for -developing applications that use %{name}. +The %name-devel package contains libraries and signature files for +developing applications that use %name. %prep -%autosetup -p1 -n %{pkg}-%{version} +%autosetup -p1 -n %pkg-%version %build dune_release_pkgs='base64' %ocaml_dune_setup -%if "%{build_flavor}" == "" +%if "%build_flavor" == "" %ocaml_dune_build %endif %install -%if "%{build_flavor}" == "" +%if "%build_flavor" == "" %ocaml_dune_install %ocaml_create_file_list %endif -%if "%{build_flavor}" == "testsuite" +%if "%build_flavor" == "testsuite" %check %ocaml_dune_test %endif -%if "%{build_flavor}" == "" -%files -f %{name}.files +%if "%build_flavor" == "" +%files -f %name.files -%files devel -f %{name}.files.devel +%files devel -f %name.files.devel %endif ++++++ _service ++++++ --- /var/tmp/diff_new_pack.6NUDfj/_old 2023-03-14 18:16:23.327649735 +0100 +++ /var/tmp/diff_new_pack.6NUDfj/_new 2023-03-14 18:16:23.331649756 +0100 @@ -1,7 +1,7 @@ <services> <service name="tar_scm" mode="disabled"> <param name="filename">ocaml-base64</param> - <param name="revision">3a5e259895acef979a0fab8bb59d396e1bccead0</param> + <param name="revision">084346f14ed1e6706d733402dd6ff65b0dc4f718</param> <param name="scm">git</param> <param name="submodules">disable</param> <param name="url">https://github.com/mirage/ocaml-base64.git</param> ++++++ ocaml-base64-3.5.0.tar.xz -> ocaml-base64-3.5.1.tar.xz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/.gitignore new/ocaml-base64-3.5.1/.gitignore --- old/ocaml-base64-3.5.0/.gitignore 1970-01-01 01:00:00.000000000 +0100 +++ new/ocaml-base64-3.5.1/.gitignore 2023-01-24 18:12:32.000000000 +0100 @@ -0,0 +1,10 @@ +_build +_tests +tmp +*~ +\.\#* +\#*# +*.install +*.native +*.byte +.merlin \ No newline at end of file diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/CHANGES.md new/ocaml-base64-3.5.1/CHANGES.md --- old/ocaml-base64-3.5.0/CHANGES.md 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/CHANGES.md 2023-01-24 18:12:32.000000000 +0100 @@ -1,3 +1,8 @@ +### v3.5.1 (2023-01-24) + +- Few fixes about benchmarks and tests (#51, @tbrk, @dinosaure) +- Add missing dependency about `fmt` and fix the compilation for OCaml 5.0 (#52, @kit-ty-kate) + ### v3.5.0 (2021-02-08) - Fix support for `x-compilation` (@samoht, #44) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/base64.opam new/ocaml-base64-3.5.1/base64.opam --- old/ocaml-base64-3.5.0/base64.opam 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/base64.opam 2023-01-24 18:12:32.000000000 +0100 @@ -5,7 +5,7 @@ "Peter Zotov" ] license: "ISC" homepage: "https://github.com/mirage/ocaml-base64" -doc: "http://mirage.github.io/ocaml-base64/" +doc: "https://mirage.github.io/ocaml-base64/" bug-reports: "https://github.com/mirage/ocaml-base64/issues" dev-repo: "git+https://github.com/mirage/ocaml-base64.git" synopsis: "Base64 encoding for OCaml" @@ -17,6 +17,7 @@ depends: [ "ocaml" {>= "4.03.0"} "dune" {>= "2.0"} + "fmt" {with-test & >= "0.8.7"} "bos" {with-test} "rresult" {with-test} "alcotest" {with-test} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/bench/benchmarks.ml new/ocaml-base64-3.5.1/bench/benchmarks.ml --- old/ocaml-base64-3.5.0/bench/benchmarks.ml 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/bench/benchmarks.ml 2023-01-24 18:12:32.000000000 +0100 @@ -101,9 +101,10 @@ let args = [ 0; 10; 50; 100; 500; 1000; 2500; 5000 ] -let test_b64 = Test.create_indexed ~name:"Base64" ~args b64_encode_and_decode +let test_b64 = + Bench.Test.create_indexed ~name:"Base64" ~args b64_encode_and_decode -let test_old = Test.create_indexed ~name:"Old" ~args old_encode_and_decode +let test_old = Bench.Test.create_indexed ~name:"Old" ~args old_encode_and_decode let command = Bench.make_command [ test_b64; test_old ] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/bench/dune new/ocaml-base64-3.5.1/bench/dune --- old/ocaml-base64-3.5.0/bench/dune 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/bench/dune 2023-01-24 18:12:32.000000000 +0100 @@ -1,3 +1,5 @@ (executable (name benchmarks) + (enabled_if + (= %{profile} benchmark)) (libraries base64 core_bench)) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/dune-project new/ocaml-base64-3.5.1/dune-project --- old/ocaml-base64-3.5.0/dune-project 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/dune-project 2023-01-24 18:12:32.000000000 +0100 @@ -1,2 +1,2 @@ -(lang dune 2.0) +(lang dune 2.3) (name base64) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/fuzz/dune new/ocaml-base64-3.5.1/fuzz/dune --- old/ocaml-base64-3.5.0/fuzz/dune 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/fuzz/dune 2023-01-24 18:12:32.000000000 +0100 @@ -1,9 +1,13 @@ (executable (name fuzz_rfc2045) + (enabled_if + (= %{profile} fuzz)) (modules fuzz_rfc2045) (libraries astring crowbar fmt base64.rfc2045)) (executable (name fuzz_rfc4648) + (enabled_if + (= %{profile} fuzz)) (modules fuzz_rfc4648) (libraries astring crowbar fmt base64)) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/fuzz/fuzz_rfc2045.ml new/ocaml-base64-3.5.1/fuzz/fuzz_rfc2045.ml --- old/ocaml-base64-3.5.0/fuzz/fuzz_rfc2045.ml 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/fuzz/fuzz_rfc2045.ml 2023-01-24 18:12:32.000000000 +0100 @@ -8,8 +8,8 @@ let register_printer () = Printexc.register_printer (function - | Encode_error err -> Some (Fmt.strf "(Encoding error: %s)" err) - | Decode_error err -> Some (Fmt.strf "(Decoding error: %s)" err) + | Encode_error err -> Some (Fmt.str "(Encoding error: %s)" err) + | Decode_error err -> Some (Fmt.str "(Decoding error: %s)" err) | _ -> None) let pp_chr = diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/fuzz/fuzz_rfc4648.ml new/ocaml-base64-3.5.1/fuzz/fuzz_rfc4648.ml --- old/ocaml-base64-3.5.0/fuzz/fuzz_rfc4648.ml 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/fuzz/fuzz_rfc4648.ml 2023-01-24 18:12:32.000000000 +0100 @@ -35,8 +35,7 @@ let ( <.> ) f g x = f (g x) let char_from_alphabet alphabet : string gen = - map [ range 64 ] - (String.make 1 <.> Char.chr <.> Array.unsafe_get (Base64.alphabet alphabet)) + map [ range 64 ] (String.make 1 <.> String.get (Base64.alphabet alphabet)) let random_string_from_alphabet alphabet len : string gen = let rec add_char_from_alphabet acc = function @@ -83,7 +82,7 @@ let canonic alphabet = let dmap = Array.make 256 (-1) in - Array.iteri (fun i x -> dmap.(x) <- i) (Base64.alphabet alphabet) ; + String.iteri (fun i x -> dmap.(Char.code x) <- i) (Base64.alphabet alphabet) ; fun (input, off, len) -> let real_len = String.length input in let input_len = len in @@ -108,8 +107,8 @@ match remainder_len with 1 -> 0x3c | 2 -> 0x30 | _ -> assert false in let decoded = dmap.(Char.code last) in let canonic = decoded land mask in - let encoded = (Base64.alphabet alphabet).(canonic) in - Bytes.set output (off + input_len - 1) (Char.chr encoded) ; + let encoded = (Base64.alphabet alphabet).[canonic] in + Bytes.set output (off + input_len - 1) encoded ; (Bytes.unsafe_to_string output, off, normalized_len) let isomorphism0 (input, off, len) = @@ -145,7 +144,7 @@ dynamic_bind (range (max / 2)) @@ fun off -> map [ range (max - off) ] (fun len -> (off, len)) -let failf fmt = Fmt.kstrf fail fmt +let failf fmt = Fmt.kstr fail fmt let no_exception pad off len input = try diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/src/dune new/ocaml-base64-3.5.1/src/dune --- old/ocaml-base64-3.5.0/src/dune 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/src/dune 2023-01-24 18:12:32.000000000 +0100 @@ -1,8 +1,7 @@ (library (name base64) (modules unsafe base64) - (public_name base64) - (libraries bytes)) + (public_name base64)) (rule (copy %{read:../config/which-unsafe-file} unsafe.ml)) @@ -10,5 +9,4 @@ (library (name base64_rfc2045) (modules base64_rfc2045) - (public_name base64.rfc2045) - (libraries bytes)) + (public_name base64.rfc2045)) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/ocaml-base64-3.5.0/test/test.ml new/ocaml-base64-3.5.1/test/test.ml --- old/ocaml-base64-3.5.0/test/test.ml 2021-02-08 11:46:48.000000000 +0100 +++ new/ocaml-base64-3.5.1/test/test.ml 2023-01-24 18:12:32.000000000 +0100 @@ -269,8 +269,7 @@ let test_strict_with_malformed_input_rfc2045 = List.mapi (fun i (has, _) -> - Alcotest.test_case (Fmt.strf "strict rfc2045 - %02d" i) `Quick - @@ fun () -> + Alcotest.test_case (Fmt.str "strict rfc2045 - %02d" i) `Quick @@ fun () -> try let _ = strict_base64_rfc2045_of_string has in Alcotest.failf "Strict parser valids malformed input: %S" has @@ -280,8 +279,7 @@ let test_strict_rfc2045 = List.mapi (fun i (has, expect) -> - Alcotest.test_case (Fmt.strf "strict rfc2045 - %02d" i) `Quick - @@ fun () -> + Alcotest.test_case (Fmt.str "strict rfc2045 - %02d" i) `Quick @@ fun () -> try let res0 = strict_base64_rfc2045_of_string has in let res1 = strict_base64_rfc2045_to_string res0 in @@ -293,7 +291,7 @@ let test_relaxed_rfc2045 = List.mapi (fun i (has, expect) -> - Alcotest.test_case (Fmt.strf "relaxed rfc2045 - %02d" i) `Quick + Alcotest.test_case (Fmt.str "relaxed rfc2045 - %02d" i) `Quick @@ fun () -> let res0 = relaxed_base64_rfc2045_of_string has in Alcotest.(check string) "decode(x)" res0 expect)
