PageRenderTime 37ms CodeModel.GetById 12ms RepoModel.GetById 0ms app.codeStats 0ms

/tags/rel-1-3-25/SWIG/Examples/ocaml/scoped_enum/example_prog.ml

#
OCaml | 4 lines | 3 code | 1 blank | 0 comment | 0 complexity | d7e624fe24fdfb5b22f2970ffee21515 MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
  1. open Swig
  2. open Example
  3. let _ = _f (match Sys.argv.(1) with "Tag1" -> ``Tag1 | _ -> ``Tag2)