Sophie

Sophie

distrib > Fedora > 18 > x86_64 > by-pkgid > e45a26a087d8eb1aa7d8558d140fd8e2 > files > 56

ocaml-camlidl-devel-1.05-17.fc18.i686.rpm

/* Typedefs */

typedef int t0;

typedef [abstract] int t1;

typedef [abstract,finalize(t2_final),compare(t2_compare)] int t2;

typedef [abstract,ml2c(t3_ml2c),c2ml(t3_c2ml)] int t3;

quote(C, "void t3_ml2c(value v, t3 * c) { *c = Int_val(v); }")

quote(C, "value t3_c2ml(t3 * c) { return Val_int(*c); }")