Exemple #1
0
CAMLprim value initialize_nat(value unit)
{
  bng_init();
  register_custom_operations(&nat_operations);
  return Val_unit;
}
Exemple #2
0
value sankoff_CAML_register_eltarr (value u) {
    CAMLparam1(u);
    register_custom_operations (&sankoff_custom_operations_eltarr);
    CAMLreturn (Val_unit);
}
Exemple #3
0
value bv_CAML_register (value u)
{
    CAMLparam1(u);
    register_custom_operations(&bv_custom_ops);
    CAMLreturn (Val_unit);
}