allow run with any mode

libs/uv/uv_stubs.c

@@ -788,9 +788,7 @@ static void handle_udp_cb_recv(uv_udp_t *handle, long int nread, const uv_buf_t
 		Store_field(message, 1, message_addr);
 		Store_field(res, 0, message);
 	}
-	printf("here?\n"); fflush(stdout);
 	caml_callback(cb, res);
-	printf("after?\n"); fflush(stdout);
 	CAMLreturn0;
 }
 

src/macro/eval/evalStdLib.ml

@@ -3758,9 +3758,9 @@ module StdUv = struct
 		vnull
 	)
 
-	let run = vfun1 (fun singleTick ->
-		let singleTick = decode_bool singleTick in
-		let res = (wrap_sync (Uv.run (loop ()) (if singleTick then 1 else 0))) in
+	let run = vfun1 (fun mode ->
+		let mode = decode_int mode in
+		let res = (wrap_sync (Uv.run (loop ()) mode)) in
 		vbool res
 	)