Sign in
fuchsia
/
third_party
/
swig
/
47297f34531d8773042ecff23d625da4c9dc2178
/
.
/
Examples
/
ocaml
/
contract
/
example_prog.ml
blob: 748109c2b88109c6c3e25fbcb2d00266814ab843 [
file
] [
log
] [
blame
]
open
Swig
open
Example
let
_
=
print_endline
"This won't throw."
let
_
=
Printf
.
printf
"Cos 1.0 is %f\n"
(
_cos
'
(
1.0
)
as
float
)
let
_
=
print_endline
"This will throw."
let
_
=
Printf
.
printf
"Cos 5.0 is %f\n"
(
_cos
'
(
5.0
)
as
float
)