get rid of ChainControls
[fleet.git] / tests / requeue / requeueing-literal.fleet
1 #expect 5
2 #expect 9
3 #expect 5
4 #expect 9
5 #expect 5
6 #expect 9
7
8 #ship fifo : Fifo
9 #ship debug : Debug
10
11 fifo.in:
12   set word= 9;
13   set ilc=6;
14   deliver;
15
16 debug.in:
17   set ilc=*;  recv, deliver;
18
19 fifo.out:
20   set olc=3;
21   head;
22   set word= 5;
23   send to debug.in;
24   collect;
25   send to debug.in;
26   [d] abort;
27   tail;
28
29
30