anchor.diff:      {$endif}
       case Boolean of
         True: (AttainableNode: PCPFNode; Distance: Double);
  -      False: (Length: NativeUInt; DistanceAsInt64: Int64);
  +      False:(
  +        Length: NativeUInt;
  +        case Boolean of
  +          True: (DistanceAsInt64: Int64);
  +         False: (DistanceLowDword: Cardinal; DistanceHighDword: Integer);
  +      );
     end;
     PCPFStart = ^TCPFStart;
   
  
positive.code:   begin
      if (Cardinal(S.X) >= MapWidth) or (Cardinal(S.Y) >= MapHeight) then
      begin
        with S^ do
        RaiseCoordinates(X, Y, 'start');
        Exit;
      end;
  
  
negative.code:   TCPFNodeBuffers = array[0..31] of NativeUInt;
    PCPFNodeBuffers = ^TCPFNodeBuffers;
  
    TCPFStart = packed record
      X: Integer;
      Y: Integer;
      Node: PCPFNode;
  