fix out of bounds array access

fmp88 · May 15, 2011 · 0fe7417 · 0fe7417
1 parent 523c35f
commit 0fe7417
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/poll.c b/src/poll.c
@@ -32,7 +32,7 @@ CAMLprim value caml_zmq_poll_of_pollitem_array(value pollitem_array) {
     caml_zmq_raise_if(items == NULL);
     int i;
     for(i = 0; i < n; i++) {
-        current_elem = Field(pollitem_array, n);
+        current_elem = Field(pollitem_array, i);
         items[i].socket = CAML_ZMQ_Socket_val(Field(current_elem, 0));
         items[i].events = CAML_ZMQ_Mask_val(Field(current_elem, 1));
     }