Fix shadowing of variable name, harmless sofar

Luckly this had no effect until now.

Author: haesbaert

lib/iomux_stubs.c

@@ -100,7 +100,7 @@ caml_iomux_ppoll(value v_fds, value v_nfds, value v_timo, value v_sigmask)
 #undef S_IN_NS
 
 #define pollfd_of_index(vfds, vindex)					\
-	((struct pollfd *)Caml_ba_data_val(vfds) + (Int_val (v_index)))
+	((struct pollfd *)Caml_ba_data_val(vfds) + (Int_val (vindex)))
 
 value /* noalloc */
 caml_iomux_poll_set_index(value v_fds, value v_index, value v_fd, value v_events)

lib/poll.ml

@@ -1,3 +1,19 @@
+(*
+ * Copyright (c) 2023 Christiano Haesbaert <[email protected]>
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *)
+
 open Util
 
 type buffer = (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t