anchor.diff:  
      Reg#(TLPTag) lastTag <- mkReg(0);
      FIFOF#(TLPData#(16)) tlpDecodeFifo <- mkFIFOF();
  -   FIFOF#(LUInt#(4))    tlpWordCountFifo <- mkFIFOF();
  +   Reg#(TLPLength) wordCountReg <- mkReg(0);
      rule tlpInRule;
         let tlp <- toGet(tlpInFifo).get();
  -      tlpWordCountFifo.enq(tlpWordCount(tlp));
         tlpDecodeFifo.enq(tlp);
      endrule
   
      rule handleTlpRule;
         let tlp = tlpDecodeFifo.first;
  -      let count = tlpWordCountFifo.first;
         Bool handled = False;
         TLPMemoryIO3DWHeader h = unpack(tlp.data);
         hitReg <= tlp.hit;
  
positive.code: 	 if (completionMimo.enqReady()
  	    && completionTagMimo.enqReady())
  	    begin
  	       completionMimo.enq(count, vec);
  	       Vector#(4, TLPTag) tagvec = replicate(lastTag);
  	       completionTagMimo.enq(count, tagvec);
  
negative.code:     Reg#(Bool)    writeInProgress <- mkReg(False);
      FIFOF#(TLPTag) writeTag <- mkSizedFIFOF(16);
      FIFOF#(TLPTag) doneTag <- mkSizedFIFOF(16);
  
     Wire#(Bool) writeHeaderTlpWire <- mkDWire(False);
     Probe#(Bool) writeHeaderAvailableProbe <- mkProbe;
  