anchor.diff:  
       FIFOF#(TLPData#(16)) tlpOutFifo <- mkFIFOF;
       FIFOF#(TLPData#(16)) tlpInFifo <- mkFIFOF;
  -    FIFOF#(TLPData#(16)) tlpWriteHeaderFifo <- mkFIFOF;
  +    FIFO#(TLPData#(16)) tlpWriteHeaderFifo <- mkFIFO;
  +    FIFO#(TLPLength)      writeDwCountFifo <- mkFIFO;
  +    FIFO#(Bool)             writeIs3dwFifo <- mkFIFO;
   
       Reg#(Bit#(7)) hitReg <- mkReg(0);
       Reg#(Bool) use4dwReg <- mkReg(True);
  
positive.code: 		 tlp.data = pack(hdr_3dw);
  	      end
  	      tlpWriteHeaderFifo.enq(tlp);
  	      writeBurstCount <= zeroExtend(burstLen);
  	      writeTag.enq(extend(awid));
             endmethod
  
negative.code: 	 dwCount = dwCount - 1;
  	 tlp.data = pack(hdr_3dw);
        end
        else begin
  	 tlp.be = 16'hffff;
        end
  
        tlpOutFifo.enq(tlp);
        $display("writeHeaderTlp dwCount=%d", dwCount);
        writeDwCount <= dwCount;
  