anchor.diff:     begin
         // Compound shapes.
         more := 1;
  -      comp2 := PByteArray(PtrUInt(_data) + PtrUInt(g) + 10);
  +      comp2 := g + 10;
         Result.Count := 0;
         Result.List := Nil;
   
  
positive.code:    Begin
        first := Cardinal(ttUSHORT( index_map + 6));
        count := Cardinal(ttUSHORT( index_map + 8));
        if (Cardinal(unicode_codepoint) >= first) and (PtrUInt(unicode_codepoint) < first+count) then
        begin
           Result := Integer(ttUSHORT( PtrUInt(index_map) + 10 + (PtrUInt(unicode_codepoint) - first)*2));
           Exit;
        end;
        Result := 0;
  
negative.code:    ins,i,j,m,n,next_move,was_off,off: Integer;
     x,y,cx,cy,sx,sy,dx,dy: Smallint;
     more: Integer;
     comp2:Cardinal;
     points: PByteArray;
  
     gidx: Word;
  