Bug#878462: Patch

2017-10-22 Thread Andreas Stührk
tags 878462 + patch fixed-upstream
thanks

This issue is fixed upstream since release 2.48.4
(commit 4473822b5aa6de3e849ca6c958b365a71edbca4f fixed it).

Attached is a patch that fixes the FTBFS.
Index: unison-2.48.3/system/system_generic.ml
===
--- unison-2.48.3.orig/system/system_generic.ml
+++ unison-2.48.3/system/system_generic.ml
@@ -57,7 +57,7 @@ let opendir f =
 let readdir = Unix.readdir
 let closedir = Unix.closedir
 let readlink = Unix.readlink
-let symlink = Unix.symlink
+let symlink s1 s2 = Unix.symlink s1 s2
 let chdir = Sys.chdir
 let getcwd = Sys.getcwd
 


Bug#878820:

2017-10-22 Thread Andreas Stührk
Changing the
PYTHONPATH=$(shell echo .pybuild/pythonX.Y_3.5*/build/)
to
PYTHONPATH=$(shell echo .pybuild/pythonX.Y_3.6*/build/)
does indeed fix the FTBFS.


Bug#878453: Patch

2017-10-22 Thread Andreas Stührk
tags 878453 + patch
thanks

Attached is a patch that fixes the FTBFS.
Index: altos-1.8.2/src/math/kf_rem_pio2.c
===
--- altos-1.8.2.orig/src/math/kf_rem_pio2.c
+++ altos-1.8.2/src/math/kf_rem_pio2.c
@@ -77,7 +77,8 @@ twon8  =  3.906250e-03; /* 0x3b8
 
 /* compute q[0],q[1],...q[jk] */
 	for (i=0;i<=jk;i++) {
-	for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j]; q[i] = fw;
+	for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j];
+	q[i] = fw;
 	}
 
 	jz = jk;
Index: altos-1.8.2/src/math/sf_cos.c
===
--- altos-1.8.2.orig/src/math/sf_cos.c
+++ altos-1.8.2/src/math/sf_cos.c
@@ -16,12 +16,6 @@
 #include "fdlibm.h"
 
 #ifdef __STDC__
-static const float one=1.0;
-#else
-static float one=1.0;
-#endif
-
-#ifdef __STDC__
 	float cosf(float x)
 #else
 	float cosf(x)


Bug#878896: Patch

2017-10-22 Thread Andreas Stührk
tags 878896 + patch fixed-upstream
thanks

This issue is already fixed upstream. Attached is a patch that fixes the
FTBFS (it's basically upstream
commit bf0640779b2e7095e01755d3660c7e3f0865171d).
Index: liquidsoap-1.1.1/src/decoder/decoder.ml
===
--- liquidsoap-1.1.1.orig/src/decoder/decoder.ml
+++ liquidsoap-1.1.1/src/decoder/decoder.ml
@@ -277,7 +277,7 @@ let get_image_file_decoder filename =
   with
   | Pervasives.Exit -> !ans
 
-exception Exit of stream_decoder
+exception Exit_decoder of stream_decoder
 
 let get_stream_decoder mime kind =
   try
@@ -287,13 +287,13 @@ let get_stream_decoder mime kind =
  match try decoder mime kind with _ -> None with
| Some f ->
log#f 3 "Method %S accepted %S." name mime ;
-   raise (Exit f)
+   raise (Exit_decoder f)
| None -> ()) (get_decoders conf_stream_decoders
stream_decoders);
 log#f 3 "Unable to decode stream of type %S!" mime ;
 None
   with
-| Exit f -> Some f
+| Exit_decoder f -> Some f
 
 (** {1 Helpers for defining decoders} *)
 


Bug#871089:

2017-10-21 Thread Andreas Stührk
If the patch "gcc-6" is not applied, the package at least compiles. It
still fails to build with the following error though:

   debian/rules override_dh_installdocs
make[1]: Entering directory '/build/speech-tools-2.4~release'
dh_installdocs -pspeech-tools -plibestools2.4 -plibestools-dev README
dh_installdocs -pspeech-tools-dbg -plibestools2.4-dbg -pspeech-tools-doc
dh_installdocs: Requested unknown package speech-tools-dbg via
-p/--package, expected one of: libestools2.4 libestools-dev speech-tools
speech-tools-doc
dh_installdocs: Requested unknown package libestools2.4-dbg via
-p/--package, expected one of: libestools2.4 libestools-dev speech-tools
speech-tools-doc
dh_installdocs: unknown option or error during option parsing; aborting
debian/rules:137: recipe for target 'override_dh_installdocs' failed
make[1]: *** [override_dh_installdocs] Error 25


Bug#878980: Patch

2017-10-21 Thread Andreas Stührk
tags 878980 + patch
thanks

Attached is a patch that fixes the FTBFS. It's based on upstream
commit 7c6071f6b15a162f04bfa367eff8e88a64afce89.
Index: belenios-1.4+dfsg/src/lib/election.ml
===
--- belenios-1.4+dfsg.orig/src/lib/election.ml
+++ belenios-1.4+dfsg/src/lib/election.ml
@@ -49,11 +49,6 @@ module MakeSimpleMonad (G : GROUP) = str
 fun () ->
   let r = random_string (Lazy.force prng) size in
   Z.(of_bits r mod q)
-
-  type elt = G.t ballot
-  let cast x () = ballots := x :: !ballots
-  let fold f x () = List.fold_left (fun accu b -> f () b accu ()) x !ballots
-  let cardinal () = List.length !ballots
 end
 
 (** Distributed key generation *)
Index: belenios-1.4+dfsg/src/lib/election.mli
===
--- belenios-1.4+dfsg.orig/src/lib/election.mli
+++ belenios-1.4+dfsg/src/lib/election.mli
@@ -39,15 +39,6 @@ module MakeSimpleMonad (G : GROUP) : sig
   (** [random q] returns a random number modulo [q]. It uses a secure
   random number generator lazily initialized by a 128-bit seed
   shared by all instances. *)
-
-  (** {2 Ballot box management} *)
-
-  include Signatures.MONADIC_MAP_RO
-  with type 'a m := 'a t
-  and type elt = G.t ballot
-  and type key := unit
-
-  val cast : elt -> unit t
 end
 (** Simple election monad that keeps all ballots in memory. *)
 
Index: belenios-1.4+dfsg/src/lib/signatures.mli
===
--- belenios-1.4+dfsg.orig/src/lib/signatures.mli
+++ belenios-1.4+dfsg/src/lib/signatures.mli
@@ -105,25 +105,6 @@ module type RANDOM = sig
   (** [random q] returns a random number modulo [q]. *)
 end
 
-(** Read operations of a monadic map. *)
-module type MONADIC_MAP_RO = sig
-  type 'a m
-  (** The type of monadic values. *)
-
-  type elt
-  (** The type of map values. *)
-
-  type key
-  (** The type of map keys. *)
-
-  val fold : (key -> elt -> 'a -> 'a m) -> 'a -> 'a m
-  (** [fold f a] computes [(f kN vN ... (f k2 v2 (f k1 v1 a))...)],
-  where [k1/v1 ... kN/vN] are all key/value pairs. *)
-
-  val cardinal : int m
-  (** Return the number of bindings. *)
-end
-
 (** Election data needed for cryptographic operations. *)
 type 'a election = {
   e_params : 'a params;
Index: belenios-1.4+dfsg/src/tool/tool_election.ml
===
--- belenios-1.4+dfsg.orig/src/tool/tool_election.ml
+++ belenios-1.4+dfsg/src/tool/tool_election.ml
@@ -125,7 +125,7 @@ module Make (P : PARSED_PARAMS) : S = st
 
   let cast (b, hash) =
 if Lazy.force check_signature_present b && E.check_ballot election b
-then M.cast b ()
+then ()
 else Printf.ksprintf failwith "ballot %s failed tests" hash
 
   let ballots_check = lazy (
@@ -133,12 +133,13 @@ module Make (P : PARSED_PARAMS) : S = st
   )
 
   let encrypted_tally = lazy (
-match Lazy.force ballots_check with
+match Lazy.force ballots with
   | None -> failwith "ballots.jsons is missing"
-  | Some () ->
-M.fold (fun () b t ->
-  M.return (E.combine_ciphertexts (E.extract_ciphertext b) t)
-) (E.neutral_ciphertext election) ()
+  | Some ballots ->
+List.fold_left (fun accu (b, _) ->
+E.combine_ciphertexts (E.extract_ciphertext b) accu
+  ) (E.neutral_ciphertext election) ballots,
+List.length ballots
   )
 
   let vote privcred ballot =
@@ -158,16 +159,16 @@ module Make (P : PARSED_PARAMS) : S = st
 if Array.forall (fun x -> not G.(x =~ pk)) pks then (
   print_msg "W: your key is not present in public_keys.jsons";
 );
-let tally = Lazy.force encrypted_tally in
+let tally, _ = Lazy.force encrypted_tally in
 let factor = E.compute_factor tally sk () in
 assert (E.check_factor tally pk factor);
 string_of_partial_decryption G.write factor
 
   let finalize factors =
 let factors = Array.map (partial_decryption_of_string G.read) factors in
-let tally = Lazy.force encrypted_tally in
+let tally, nballots = Lazy.force encrypted_tally in
 assert (Array.forall2 (E.check_factor tally) pks factors);
-let result = E.combine_factors (M.cardinal ()) tally factors in
+let result = E.combine_factors nballots tally factors in
 assert (E.check_result pks result);
 string_of_result G.write result
 
@@ -179,7 +180,7 @@ module Make (P : PARSED_PARAMS) : S = st
 (match get_result () with
 | Some result ->
   let result = result_of_string G.read result in
-  assert (Lazy.force encrypted_tally = result.encrypted_tally);
+  assert (fst (Lazy.force encrypted_tally) = result.encrypted_tally);
   assert (E.check_result pks result)
 | None -> print_msg "W: no result to check"
 );


Bug#879223: Patch

2017-10-21 Thread Andreas Stührk
tags 879223 + patch
thanks

Attached is a patch that fixes the FTBFS.
Index: websockify-0.8.0+dfsg1/tests/test_websocket.py
===
--- websockify-0.8.0+dfsg1.orig/tests/test_websocket.py
+++ websockify-0.8.0+dfsg1/tests/test_websocket.py
@@ -69,6 +69,9 @@ class FakeSocket(object):
 else:
 return StringIO(self._data.decode('latin_1'))
 
+def sendall(self, data, flags=None):
+return len(data)
+
 
 class WebSocketRequestHandlerTestCase(unittest.TestCase):
 def setUp(self):


Bug#878469:

2017-10-21 Thread Andreas Stührk
This specific error can be fixed for buster by adding ocamlbuild as build
dependency. The package will then still FTBFS for sid, as OCaml 4.05 is
only supported in the latest upstream version of js_of_ocaml (3.0).


Bug#876725: Fixed upstream

2017-10-20 Thread Andreas Stührk
tags 876725 + fixed-upstream
thanks

This was fixed upstream in 4.2 (
https://github.com/ocaml-ppx/ppx_deriving/commit/b6b02c2ba051bde67c2b454724ff0bf36bc11060
)


Bug#676077: Patch

2012-06-17 Thread Andreas Stührk
tags 676077 + patch
thanks

Attached is a patch that fixes the FTBFS.
Index: raspell-1.2/ext/raspell.c
===
--- raspell-1.2.orig/ext/raspell.c	2012-06-17 15:14:00.0 +0200
+++ raspell-1.2/ext/raspell.c	2012-06-17 15:37:30.049586056 +0200
@@ -73,7 +73,7 @@
  */
 static void check_for_error(AspellSpeller * speller) {
 if (aspell_speller_error(speller) != 0) {
-rb_raise(cAspellError, aspell_speller_error_message(speller));
+rb_raise(cAspellError, %s, aspell_speller_error_message(speller));
 }
 }
 
@@ -87,11 +87,11 @@
 static void set_option(AspellConfig *config, char *key, char *value) {
 //printf(set option: %s = %s\n, key, value);
 if (aspell_config_replace(config, key, value) == 0) {
-rb_raise(cAspellError, aspell_config_error_message(config));
+rb_raise(cAspellError, %s, aspell_config_error_message(config));
 }
 //check config:
 if (aspell_config_error(config) != 0) {
-rb_raise(cAspellError, aspell_config_error_message(config));
+rb_raise(cAspellError, %s, aspell_config_error_message(config));
 }
 }
 
@@ -132,7 +132,7 @@
 AspellDocumentChecker * checker;
 ret = new_aspell_document_checker(speller);
 if (aspell_error(ret) != 0)
-rb_raise(cAspellError, aspell_error_message(ret));
+rb_raise(cAspellError, %s, aspell_error_message(ret));
 checker = to_aspell_document_checker(ret);
 return checker;
 }
@@ -214,7 +214,7 @@
 if (aspell_error(ret) != 0) {
 tmp = strdup(aspell_error_message(ret));
 delete_aspell_can_have_error(ret);
-rb_raise(cAspellError, tmp);
+rb_raise(cAspellError, %s, tmp);
 }
 
 speller = to_aspell_speller(ret);
@@ -253,7 +253,7 @@
 if (aspell_error(ret) != 0) {
 const char *tmp = strdup(aspell_error_message(ret));
 delete_aspell_can_have_error(ret);
-rb_raise(cAspellError, tmp);
+rb_raise(cAspellError, %s, tmp);
 }
 
 speller = to_aspell_speller(ret);
@@ -409,7 +409,7 @@
 AspellConfig *config = aspell_speller_config(speller);
 VALUE result = rb_str_new2(aspell_config_retrieve(config, STR2CSTR(key)));
 if (aspell_config_error(config) != 0) {
-rb_raise(cAspellError, aspell_config_error_message(config));
+rb_raise(cAspellError, %s, aspell_config_error_message(config));
 }
 return result;
 }
@@ -433,7 +433,7 @@
 if (aspell_config_error(config) != 0) {
 char *tmp = strdup(aspell_config_error_message(config));
 delete_aspell_string_list(list);
-rb_raise( cAspellError, tmp);
+rb_raise( cAspellError, %s, tmp);
 }
 
 //iterate over list
@@ -480,7 +480,7 @@
 else if (code == 0)
 result = Qfalse;
 else
-rb_raise( cAspellError, aspell_speller_error_message(speller));
+rb_raise( cAspellError, %s, aspell_speller_error_message(speller));
 return result;
 }
 


Bug#676196: Patch

2012-06-16 Thread Andreas Stührk
tags 676196 + patch
thanks

Attached is a patch that fixes the FTBFS.


grib-ftbfs-fix.patch
Description: Binary data


Bug#676203: Patch

2012-06-16 Thread Andreas Stührk
tags 676203 + patch
thanks

Attached is a patch that fixes the FTBFS.


xmlparser-ftbfs-fix.patch
Description: Binary data


Bug#676194: Patch

2012-06-16 Thread Andreas Stührk
tags 676194 + patch
thanks

Attached is a patch that fixes the FTBFS.


xmlparser-ftbfs-fix.patch
Description: Binary data


Bug#676203: Sorry

2012-06-16 Thread Andreas Stührk
tags 676203 - patch
thanks

Sorry, I sent it to the wrong bug.



-- 
To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org
with a subject of unsubscribe. Trouble? Contact listmas...@lists.debian.org