index
:
external/swig.git
llvm-r383902b
llvm-r399163b
llvm-r416183
llvm-r450784
llvm-r487747
main
master
upstream-master
about
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
Examples
/
ocaml
/
scoped_enum
/
example_prog.ml
blob: e19bb3454fcde2c3900b57eeeaaec69e14593ae2 (
plain
)
1
2
3
4
open Swig open Example let _ = _f (match Sys.argv.(1) with "Tag1" -> ``Tag1 | _ -> ``Tag2)