anchor.diff:     e := EdgeList.Create();
      m := 0;
   
  -   for i:=0 to windings-1 do
  +   for i:=0 to Pred(Windings.Count) do
      begin
         ptOfs := M;
   
  -      Inc(m, wcount[i]);
  -      j := wcount[i]-1;
  +      Inc(m, Windings.List[i]);
  +      j := Windings.List[i]-1;
         k:=0;
  -      while k < wcount[i] do
  +      while k < Windings.List[i] do
         begin
   
            a := k;
  
positive.code:    for i:=0 to num_verts-1 do
        if vertices[i].vertexType = STBTT_vmove then Inc(n);
  
     num_contours := n;
     If n = 0 Then
       Exit;
  
     GetMem(contour_lengths, n*sizeof(Integer));
  
     // make two passes through the points so we don't need to realloc
     for pass:=0 to 1 do
  
negative.code:         Result.Count := NumPoints * 2 ;
          SetLength(Result.List, Result.Count);
        End;
  
        NumPoints := 0;
        n := -1;
  
  