[OCaml] Fix a bug in the ctors of director classes
If a class was given the director feature, it was not possible to use ctors with multiple parameters. Add director_default_runme.ml (it is based on director_default_runme.java).
This commit is contained in:
parent
df86ec5af6
commit
828ce477c8
5 changed files with 45 additions and 6 deletions
|
|
@ -44,6 +44,13 @@ let _ = Callback.register "swig_runmethod" invoke
|
|||
let fnhelper arg =
|
||||
match arg with C_list l -> l | C_void -> [] | _ -> [ arg ]
|
||||
|
||||
let director_core_helper fnargs =
|
||||
try
|
||||
match List.hd fnargs with
|
||||
| C_director_core (o,r) -> fnargs
|
||||
| _ -> C_void :: fnargs
|
||||
with Failure _ -> C_void :: fnargs
|
||||
|
||||
let rec get_int x =
|
||||
match x with
|
||||
C_bool b -> if b then 1 else 0
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue