--- a/Bindings/OCaml/brlapi_stubs.c	
+++ a/Bindings/OCaml/brlapi_stubs.c	
@@ -144,6 +144,7 @@ CAMLprim value brlapiml_errorCode_of_error(value camlError)
 /* Raises the Brlapi_error exception */
 static void raise_brlapi_error(void)
 {
+  CAMLparam0();
   static value *exception = NULL;
   CAMLlocal1(res);
   if (exception==NULL) exception = caml_named_value("Brlapi_error");
@@ -157,6 +158,7 @@ static void raise_brlapi_error(void)
 /* Raises Brlapi_exception */
 static void BRLAPI_STDCALL raise_brlapi_exception(int err, brlapi_packetType_t type, const void *packet, size_t size)
 {
+  CAMLparam0();
   static value *exception = NULL;
   int i;
   CAMLlocal2(str, res);