Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CAMLprim value mlzmq_version(value unit)
- {
- CAMLparam1(unit);
- int major, minor, patch;
- zmq_version(&major, &minor, &patch);
- CAMLlocal1( result );
- result = caml_alloc(3, 0);
- Store_field( result, 0, Val_int major );
- Store_field( result, 1, Val_int minor );
- Store_field( result, 2, Val_int patch );
- CAMLreturn( result );
- }
Add Comment
Please, Sign In to add comment