Examples/test-suite/ocaml/static_const_member_runme.ml


1
2
3
4
5
6
7
8
9

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');
;;