CAMLprim value initialize_nat(value unit) { bng_init(); register_custom_operations(&nat_operations); return Val_unit; }
value sankoff_CAML_register_eltarr (value u) { CAMLparam1(u); register_custom_operations (&sankoff_custom_operations_eltarr); CAMLreturn (Val_unit); }
value bv_CAML_register (value u) { CAMLparam1(u); register_custom_operations(&bv_custom_ops); CAMLreturn (Val_unit); }