anchor.diff:      end;
       if (lock.typ <> btLock) then
       begin
  -      result.Insert(0, JCBarrier(barBlockWrongType, lock, lock.id));
  +      result.Insert(0, JCBarrier(barBlockWrongType, lock));
         Exit();
       end;
       var lockRef: TBlk;
  
positive.code:     end;
      if ((lockRef.typ <> btTrack) and (lockRef.typ <> btRT)) then
      begin
        result.Insert(0, JCBarrier(barBlockWrongType, lockRef, lockRef.id));
        Exit();
      end;
    end;
  
negative.code:     var railway: TBlk;
      if (Self.lastTrack.typ <> btRT) then
      begin
        result.Add(JCBarrier(barBlockWrongType, Self.lastTrack));
        Exit();
      end;
      if (Blocks.GetBlkByID(Self.m_data.railwayId, railway) <> 0) then
  