update to 03-Jan-2009 am33: head, abort, and d-flag
[fleet.git] / tests / torpedo / epilogue-fifo.test
1 #expect 20
2 #expect 40
3 #ship debug : Debug
4 #ship fifo  : Fifo
5
6 fifo.out:
7   recv token;
8   send token to debug.in:i;
9
10 debug.in:
11   head;
12   [Rq] nop;
13   send token to fifo.out;
14   set ilc=*;
15   [T] recv token;
16   [*] set word= 20;
17   [*] deliver;
18   deliver;
19   tail;
20   [*] set word= 40;
21   [*] deliver;
22
23