EINVAL on bad EAI

ocaml-multicore · Dec 1, 2022 · a26ddac · a26ddac
1 parent 97f093d
commit a26ddac
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib_eio_linux/eio_stubs.c b/lib_eio_linux/eio_stubs.c
@@ -238,8 +238,10 @@ CAMLprim value caml_eio_getaddrinfo(value vnode, value vserv, value vopts)
     for (i = 0; i < (sizeof(gai_errors) / sizeof(int)); i++)
       if (gai_errors[i] == retcode)
         break;
-    if (i == (sizeof(gai_errors) / sizeof(int)))
+    if (i == (sizeof(gai_errors) / sizeof(int))) {
+      errno = EINVAL;
       uerror("invalid gai_error", Nothing);
+    }
     vret = caml_alloc_small(1, 1); /* 1 = Error */
     Field(vret, 0) = Val_int(i);
   }