js_of_ocaml-compiler
val f : Code.program -> Code.program * int array