6 lines
152 B
OCaml
6 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)
|