C++ (Cpp) Val_not示例

示例#1

文件： mlgsl_combi.c 项目： Chris00/gsl-ocaml

CAMLprim value ml_gsl_combination_valid(value vc)
{
    int r;
    gsl_combination c;
    combi_of_val(&c, vc);
    r = gsl_combination_valid(&c);
    return Val_not(Val_bool(r));
}

示例#2

文件： str.c 项目： avsm/ocaml-community

CAMLprim value caml_string_notequal(value s1, value s2)
{
  return Val_not(caml_string_equal(s1, s2));
}