swig/Examples/test-suite/ocaml/varargs_overload_runme.ml
William S Fulton 83ea2280e2 Fix Python compile errors with overloading and varargs
Fixes wrapping overloaded functions/constructors where a vararg
function is declared after a non-vararg function.
This is a long standing bug in the Python layer exposed since fastunpack
was turned on by default.
2019-02-25 19:27:23 +00:00

29 lines
1.1 KiB
OCaml

open Swig
open Varargs_overload
let _ =
assert (_vararg_over1 '("Hello") as string = "Hello");
assert (_vararg_over1 '(2) as string = "2");
assert (_vararg_over2 '("Hello") as string = "Hello");
assert (_vararg_over2 '(2, 2.2) as string = "2 2.2");
assert (_vararg_over3 '("Hello") as string = "Hello");
assert (_vararg_over3 '(2, 2.2, "hey") as string = "2 2.2 hey");
assert (_vararg_over4 '("Hello") as string = "Hello");
assert (_vararg_over4 '(123) as string = "123");
assert (_vararg_over4 '("Hello", 123) as string = "Hello");
(* Same as above but non-vararg function declared first *)
assert (_vararg_over6 '("Hello") as string = "Hello");
assert (_vararg_over6 '(2) as string = "2");
assert (_vararg_over7 '("Hello") as string = "Hello");
assert (_vararg_over7 '(2, 2.2) as string = "2 2.2");
assert (_vararg_over8 '("Hello") as string = "Hello");
assert (_vararg_over8 '(2, 2.2, "hey") as string = "2 2.2 hey");
assert (_vararg_over9 '("Hello") as string = "Hello");
assert (_vararg_over9 '(123) as string = "123");
assert (_vararg_over9 '("Hello", 123) as string = "Hello");
;;