mirror of
https://github.com/c-cube/moonpool.git
synced 2025-12-06 03:05:30 -05:00
update test outputs
This commit is contained in:
parent
80e8f84703
commit
8e240357b5
2 changed files with 14 additions and 12 deletions
|
|
@ -27,7 +27,8 @@ start
|
||||||
============
|
============
|
||||||
start
|
start
|
||||||
1: start fibers
|
1: start fibers
|
||||||
1.7.1: I'm fiber 7 and I'm about to…
|
1.7.1: I'm fiber 7 and I'm about to fail…
|
||||||
|
1.8.1: sub-fiber 8 was cancelled
|
||||||
1.9.1: sub-fiber 9 was cancelled
|
1.9.1: sub-fiber 9 was cancelled
|
||||||
2.0: fiber 0 resolved as ok
|
2.0: fiber 0 resolved as ok
|
||||||
2.1: fiber 1 resolved as ok
|
2.1: fiber 1 resolved as ok
|
||||||
|
|
@ -37,7 +38,7 @@ start
|
||||||
2.5: fiber 5 resolved as ok
|
2.5: fiber 5 resolved as ok
|
||||||
2.6: fiber 6 resolved as ok
|
2.6: fiber 6 resolved as ok
|
||||||
2.7: fiber 7 resolved as error
|
2.7: fiber 7 resolved as error
|
||||||
2.8: fiber 8 resolved as ok
|
2.8: fiber 8 resolved as error
|
||||||
2.9: fiber 9 resolved as error
|
2.9: fiber 9 resolved as error
|
||||||
3: wait for subs
|
3: wait for subs
|
||||||
4: await fiber 0
|
4: await fiber 0
|
||||||
|
|
@ -51,11 +52,12 @@ start
|
||||||
12: await fiber 4
|
12: await fiber 4
|
||||||
13: res 4 = 4
|
13: res 4 = 4
|
||||||
14: await fiber 5
|
14: await fiber 5
|
||||||
15: res 5 = 5
|
15: other fib done
|
||||||
16: await fiber 6
|
16: res 5 = 5
|
||||||
17: res 6 = 6
|
17: await fiber 6
|
||||||
18: await fiber 7
|
18: res 6 = 6
|
||||||
19: main fiber cancelled with Failure("oh no!")
|
19: await fiber 7
|
||||||
20: main fiber result: error Failure("oh no!")
|
20: main fiber cancelled with Failure("oh no!")
|
||||||
21: main fib failed with "oh no!"
|
21: main fiber result: error Failure("oh no!")
|
||||||
22: main fiber exited
|
22: main fib failed with "oh no!"
|
||||||
|
23: main fiber exited
|
||||||
|
|
|
||||||
|
|
@ -107,10 +107,10 @@ let () =
|
||||||
F.with_on_self_cancel (fun _ ->
|
F.with_on_self_cancel (fun _ ->
|
||||||
logf (TS.tick_get clock) "sub-fiber %d was cancelled" i)
|
logf (TS.tick_get clock) "sub-fiber %d was cancelled" i)
|
||||||
in
|
in
|
||||||
Thread.delay (float i *. 0.001);
|
Thread.delay (float i *. 0.05);
|
||||||
F.yield ();
|
F.yield ();
|
||||||
if i = 7 then (
|
if i = 7 then (
|
||||||
logf (TS.tick_get clock) "I'm fiber %d and I'm about to…" i;
|
logf (TS.tick_get clock) "I'm fiber %d and I'm about to fail…" i;
|
||||||
failwith "oh no!"
|
failwith "oh no!"
|
||||||
);
|
);
|
||||||
i)
|
i)
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue