anchor.diff:    ClassInstances := nil;
   end;
   
  -class procedure TSpineClass.Report(const FileName: String);
  +class procedure TSpineClass.Report(const FileName: AnsiString);
     var f: TextFile;
  -  var s: String;
  +  var s: AnsiString;
     var n: Integer;
     var c: TSpineClass;
   begin
  
positive.code:   Result := -1;
  end;
  
  function TSpineSkeleton.FindIKConstraint(const IKConstraintName: String): TSpineIKConstraint;
    var i: Integer;
  begin
    for i := 0 to _IKConstraints.Count - 1 do
  
negative.code:   Result := -1;
  end;
  
  function TSpineSkeletonData.FindEvent(const EventName: AnsiString): TSpineEventData;
    var i: Integer;
  begin
    i := FindEventIndex(EventName);
    if i > -1 then Result := _Events[i] else Result := nil;
  end;
  
  function TSpineSkeletonData.FindEventIndex(const EventName: AnsiString): Integer;
    var i: Integer;
  begin
    for i := 0 to _Events.Count - 1 do
  