Sign in
fuchsia
/
third_party
/
swig
/
3f78ea64c041d0f55966b896745b9fc6c3704b71
/
.
/
Examples
/
test-suite
/
ocaml
/
overload_subtype_runme.ml
blob: 6f0aeab56d188808a971173daa82cf35611c17d5 [
file
] [
log
] [
blame
]
open
Swig
open
Overload_subtype
let
_
=
let
f
=
new_Foo
'
()
and
b
=
new_Bar
'
()
in
assert
(
_spam
(
f
)
as
int
=
1
);
assert
(
_spam
(
b
)
as
int
=
2
)
;;