gentoo-overlay/sci-misc/flashdot/files/flashdot-1.1.4-gsl-ocaml.patch

Fix errors caused by wrong parameter type:
* File "mathexpr.ml", line 423, characters 55-56:
* Error: This expression has type int but an expression was expected of type
*          float

--- flashdot-1.1.4/mathexpr/mathexpr.ml
+++ flashdot-1.1.4/mathexpr/mathexpr.ml
@@ -419,7 +419,6 @@
 		| "NegativeBinomial" ->
 			let p = float'_of_string (aod cont_type "P" "1.0") in
 			let n = float'_of_string (aod cont_type "N" "1.0") in
-			(*uncomment this for ocamlgsl > 0.5 ::::let n = int_of_float n in::::*)
 			fun () -> foi  (Gsl_randist.negative_binomial rng p n)
 		| "Pascal" ->
 			let p = float'_of_string (aod cont_type "P" "1.0") in
@@ -4094,7 +4093,6 @@
 				| "NegativeBinomialPDF" ->
 					let p = float'_of_string (aod cont_type "P" "1.0") in
 					let n = float'_of_string (aod cont_type "N" "1.0") in
-					(*uncomment this for ocamlgsl > 0.5 ::::let n = int_of_float n in::::*)
 					fun x -> Gsl_randist.negative_binomial_pdf (int_of_float x) p n
 				| "PascalPDF" ->
 					let p = float'_of_string (aod cont_type "P" "1.0") in