#skip
#expect 5
#expect 7
#expect 5
#expect 7
#expect 5
#expect 7
#expect 9

#ship memory       : Memory
#ship debug        : Debug
#ship fifo         : Fifo
#ship fifo2        : Fifo

debug.in: set ilc=*;  recv, deliver;

fifo.out: set ilc=*;  collect, send to debug.in;

fifo.in:
  set olc=2;
  [Rq] nop;
  [Rq] set word= 5;
  [Rq] deliver;
  [Rq] send token to memory.inCBD;
  [Rq] recv, deliver;
  [Rq] set olc--;
  tail;

fifo2.out:
  set word= 7;
  set ilc=4;
  send to fifo.in;

memory.inCBD: set word= {
    fifo.in:
       set word= 9;
       deliver;
  };
  recv nothing;
  recv nothing;
  recv nothing;
  deliver;