Sign in
fuchsia
/
third_party
/
swig
/
3f3073547804f2e112085429ddfb691beba5a2ba
/
.
/
Examples
/
test-suite
/
ocaml
/
multivalue_runme.ml
blob: d7e19e7d814e6f45c0fe991324d88e4be3e8200c [
file
] [
log
] [
blame
]
open
Swig
open
Multivalue
let
_
=
assert
(
_divide_l
'
(
37
,
5
)
=
C_list
[
'
7
;
'
2
]);
assert
(
_divide_v
'
(
41
,
7
)
=
C_list
[
'
5
;
'
6
]);
assert
(
_divide_mv
'
(
91
,
13
)
=
C_list
[
'
7
;
'
0
]);
;;