8 lines
136 B
Text
8 lines
136 B
Text
let caml_query () =
|
|
let s = "Here am I" in
|
|
(s, String.length s)
|
|
;;
|
|
|
|
let () =
|
|
Callback.register "Query function cb" caml_query;
|
|
;;
|