anchor.diff:          // way (child list)
           if (WayBits <> -1) then
           begin
  -          ChildList := Pointer(NativeUInt(@CHILD_ARRAYS) + CHILD_ARRAYS_OFFSETS[WayBits]);
  +          ChildList := @CHILD_ARRAYS[WayBits];
             CellInfo := CellInfo + Format(', way: %d%d%d',
               [(ChildList[0] shr 4) and 7, (ChildList[1] shr 4) and 7, (ChildList[2] shr 4) and 7]);
           end;
  
positive.code:     end;
    end;
  
    Offset := @Buffer[0];
    for Parent := 0 to 7 do
    begin
      N := (WayChild shr 1) * 3;
  
      if (WayChild and 1 <> 0) then
      begin
        Inc(N);
  
        if (Parent = ((WayChild - 1 + 4) and 7)) or
          (Parent = ((WayChild - 2 + 4) and 7)) or
          (Parent = ((WayChild - 3 + 4) and 7)) then
          Inc(N);
      end;
  
      Offset^ := N * SizeOf(TChildList);
      Inc(Offset);
    end;
  
    S := Format('  $%0.2x, $%0.2x, $%0.2x, $%0.2x, $%0.2x, $%0.2x, $%0.2x, $%0.2x',
      [Buffer[0], Buffer[1], Buffer[2], Buffer[3],
       Buffer[4], Buffer[5], Buffer[6], Buffer[7]]);
  
    if (not Finalize) then S := S + ',';
    LookupLine(S);
  
negative.code: 
      // CHILD_ARRAYS
      LookupLine;
      LookupLine('CHILD_ARRAYS: array[0..7{way}] of TChildList = (');
      for Way := 0 to 7 do
      begin
        WayX := (Way + 1) mod 3;
        WayY := (Way + 1) div 3;
  
        AddChildArray(WayX, WayY, Way = 7);
      end;
      LookupLine(');');
  
  