Fix: sockets without events properly skipped

fmp88 · Apr 3, 2011 · 9ef39a7 · 9ef39a7
1 parent 1fe7679
commit 9ef39a7
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/poll.c b/src/poll.c
@@ -99,6 +99,7 @@ CAMLprim value caml_zmq_poll(value poll, value timeout) {
             Store_field(curr_elem, 0, caml_zmq_copy_socket(items[j].socket));
             Store_field(curr_elem, 1, CAML_ZMQ_Val_mask(items[j].revents));
             Store_field(poll_itemarray, i, curr_elem);
+            j++;
         }
     }