OCaml's constantWrapper() was adding unneeded quotes when wrapping static const member chars. Add runtime tests for char_constant, chartest, and static_const_member.
9 lines
188 B
OCaml
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');
|
|
;;
|