anchor.diff:  	 v = writeDataMimo.first();
   	 writeDataMimo.deq(unpack(truncate(writeDwCount)));
   	 writeDwCount <= 0;
  -	 doneTag.enq(writeTag);
  +	 doneTag.enq(writeTag.first());
  +	 writeTag.deq();
   	 $display("writeDwCount=%d will be zero", writeDwCount);
   	 tlp.eof = True;
   	 if (writeDwCount == 4)
  
positive.code:     MIMO#(busWidthWords,4,8,Bit#(32)) writeDataMimo <- mkMIMO(mimoCfg);
      Reg#(Bit#(9)) writeBurstCount <- mkReg(0);
      Reg#(TLPLength)  writeDwCount <- mkReg(0);
      Reg#(TLPTag) writeTag <- mkReg(0);
      FIFOF#(TLPTag) doneTag <- mkFIFOF();
  
      function Integer tlpWordCount(TLPData#(16) tlp);
         if (tlp.be == 16'h0000)
  
negative.code: 	 tlpOutFifo.enq(tlp);
  	 $display("writeHeaderTlp dwCount=%d", dwCount);
  	 writeDwCount <= dwCount;
  	 if (dwCount == 0) begin
  	    doneTag.enq(writeTag.first());
  	    writeTag.deq();
  	 end
        end
     endrule
  
  