gistfile1.txt

unsigned long C_Initialize_wrapped(struct CK_C_INITIALIZE_ARGS* x1)
{
   enum { nargs = 1 };
   CAMLparam0();
   CAMLlocalN(locals, nargs);
   locals[0] = CTYPES_FROM_PTR(x1);
   value x2 = functions[fn_C_Initialize];
   value x3 = caml_callbackN(x2, nargs, locals);
   unsigned long x4 = ctypes_ulong_val(x3);
   CAMLreturnT(unsigned long, x4);
}
unsigned long C_Initialize(struct CK_C_INITIALIZE_ARGS* x11)
{
   caml_c_thread_register();
   caml_acquire_runtime_system();
   value x16 = C_Initialize_wrapped(x11);
   caml_release_runtime_system();
   caml_c_thread_unregister();
   return(x16);
}