Sign in
fuchsia
/
third_party
/
swig
/
6b3e7ee850fe66132b3a6a5a1aebaa6b59480661
/
.
/
Examples
/
test-suite
/
ocaml
/
typedef_classforward_same_name_runme.ml
blob: 304f74b7acb01b6a45b7f2fb6d7d09d9ee70d451 [
file
] [
log
] [
blame
]
open
Swig
open
Typedef_classforward_same_name
let
_
=
let
foo
=
new_Foo
'
()
in
ignore
(
foo
->
"[x]"
(
5
));
assert
(
_extractFoo
'
(
foo
)
as
int
=
5
);
let
boo
=
new_Boo
'
()
in
ignore
(
boo
->
"[x]"
(
5
));
assert
(
_extractBoo
'
(
boo
)
as
int
=
5
)
;;