JSオブジェクト（レコード）を受け取るOCaml関数をラップする

Question

OCamlに非常に単純な関数を書き込んで、JS関数jsGetをでラップして、jsGetがJSオブジェクト（またはレコード）入力として。

Iは、次のコードを試みた：wrap.mlで

\\ in Home.js 
function testJsGet() { 
    var input = {field_1: 5, field_2: 6}; 
    var output = jsGet(input); 
    document.getElementById("result").value += output; 
} 

を：

type t = 
    < field_1: int Js.prop; 
    field_2: int Js.prop 
    > Js.t 

let() = 
    Js.Unsafe.global##.jsGet := Js.wrap_callback 
     (fun (r:t) -> r##.field_1); 

wrap.mlしかしながら、出力としてHome.js戻りundefinedを実行して、十分にコンパイル。

誰でもこれを修正する方法を知っていますか？

Answer 1

アンダースコアを削除します。方法名とアンダースコアはhttp://ocsigen.org/js_of_ocaml/2.8/manual/bindings