swig/Examples/test-suite/ocaml/static_const_member_runme.ml
Zackery Spytz c61c221057 [OCaml] Fix the wrapping of static const member chars
OCaml's constantWrapper() was adding unneeded quotes when wrapping
static const member chars.

Add runtime tests for char_constant, chartest, and
static_const_member.
2019-01-15 16:37:26 -07:00

9 lines
188 B
OCaml

open Swig
open Static_const_member
let _ =
assert (_X_PN '() as int = 0);
assert (_X_CN '() as int = 1);
assert (_X_EN '() as int = 2);
assert (_X_CHARTEST '() as char = 'A');
;;