account for BaseIO changes

hargoniX · hargoniX · commit 1642c0bd2ef6 · 2025-10-28T21:40:08.000+01:00
diff --git a/src/runtime/io.cpp b/src/runtime/io.cpp
@@ -1554,11 +1554,11 @@ extern "C" LEAN_EXPORT obj_res lean_io_wait(obj_arg t) {
     return lean_task_get_own(t);
 }
 
-extern "C" LEAN_EXPORT obj_res lean_io_wait_any(b_obj_arg task_list, obj_arg) {
+extern "C" LEAN_EXPORT obj_res lean_io_wait_any(b_obj_arg task_list) {
     object * t = lean_io_wait_any_core(task_list);
     object * v = lean_task_get(t);
     lean_inc(v);
-    return io_result_mk_ok(v);
+    return v;
 }
 
 extern "C" LEAN_EXPORT obj_res lean_io_exit(uint8_t code) {

Original file line number	Diff line number	Diff line change
`@@ -1554,11 +1554,11 @@ extern "C" LEAN_EXPORT obj_res lean_io_wait(obj_arg t) {`
`1554`	`1554`	`return lean_task_get_own(t);`
`1555`	`1555`	`}`
`1556`	`1556`
`1557`		`-extern "C" LEAN_EXPORT obj_res lean_io_wait_any(b_obj_arg task_list, obj_arg) {`
	`1557`	`+extern "C" LEAN_EXPORT obj_res lean_io_wait_any(b_obj_arg task_list) {`
`1558`	`1558`	`object * t = lean_io_wait_any_core(task_list);`
`1559`	`1559`	`object * v = lean_task_get(t);`
`1560`	`1560`	`lean_inc(v);`
`1561`		`- return io_result_mk_ok(v);`
	`1561`	`+ return v;`
`1562`	`1562`	`}`
`1563`	`1563`
`1564`	`1564`	`extern "C" LEAN_EXPORT obj_res lean_io_exit(uint8_t code) {`