// This test case ensures that a single-instruction loop works
// properly.  The two instructions after the tail will get "clogged"
// in the switch fabric until the hatch opens, but that's okay.

#ship debug : Debug
#ship fifo : Fifo

#expect 5
#expect 4

debug.in:
  set word=5;
  deliver;
  set olc=4;
  head;
  set olc--;
  [d] abort;
  [d] set word=4;
  [d] deliver;
  tail;