Browse Source

* integer -> sw_integer for FPC needed

pierre 26 years ago
parent
commit
367c384eec
1 changed files with 2 additions and 2 deletions
  1. 2 2
      ide/text/whtmlhlp.pas

+ 2 - 2
ide/text/whtmlhlp.pas

@@ -154,13 +154,13 @@ begin
   AtInsert(Count,Item);
 end;
 
-function TTopicLinkCollection.At(Index: Integer): PString;
+function TTopicLinkCollection.At(Index: sw_Integer): PString;
 begin
   At:=inherited At(Index);
 end;
 
 function TTopicLinkCollection.AddItem(Item: string): integer;
-var Idx: integer;
+var Idx: sw_integer;
 begin
   if Item='' then Idx:=-1 else
   if Search(@Item,Idx)=false then