1be9f5fec3
Update some of the OCaml examples so that they run successfully with `make check-ocaml-examples` (important for the CI). Some of the examples were written to depend on passed arguments. Temporarily disable the broken std_string example.
5 lines
152 B
OCaml
5 lines
152 B
OCaml
open Swig
|
|
open Example
|
|
|
|
let arg = if Array.length Sys.argv > 1 then Sys.argv.(1) else "Tag1"
|
|
let _ = _f (match arg with "Tag1" -> ``Tag1 | _ -> ``Tag2)
|