mirror of
https://github.com/CatalaLang/catala.git
synced 2024-09-19 00:15:39 +03:00
17 lines
454 B
OCaml
17 lines
454 B
OCaml
open Driver
|
|
open Js_of_ocaml
|
|
|
|
let _ =
|
|
Js.export_all
|
|
(object%js
|
|
method interpret (contents : Js.js_string Js.t) (scope : Js.js_string Js.t)
|
|
(language : Js.js_string Js.t) (trace : bool) =
|
|
driver
|
|
(Contents (Js.to_string contents))
|
|
false false false "Interpret"
|
|
(Some (Js.to_string language))
|
|
None trace false false
|
|
(Some (Js.to_string scope))
|
|
None
|
|
end)
|