Files
ANSLibs/swig-4.3.0/Examples/test-suite/ocaml/cast_operator_runme.ml

6 lines
101 B
OCaml
Raw Normal View History

open Swig
open Cast_operator
let a = new_A '()
let _ = assert ((a -> "tochar" () as string) = "hi")