Explorar o código

rtl: fixed wrong proc modifier

mattias %!s(int64=5) %!d(string=hai) anos
pai
achega
fefe109071
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      packages/rtl/system.pas

+ 1 - 1
packages/rtl/system.pas

@@ -321,7 +321,7 @@ const
 function Int(const A: Double): double;
 function Int(const A: Double): double;
 function Copy(const S: string; Index, Size: Integer): String; assembler; overload;
 function Copy(const S: string; Index, Size: Integer): String; assembler; overload;
 function Copy(const S: string; Index: Integer): String; assembler; overload;
 function Copy(const S: string; Index: Integer): String; assembler; overload;
-procedure Delete(var S: String; Index, Size: Integer); assembler; overload;
+procedure Delete(var S: String; Index, Size: Integer); overload;
 function Pos(const Search, InString: String): Integer; assembler; overload;
 function Pos(const Search, InString: String): Integer; assembler; overload;
 function Pos(const Search, InString: String; StartAt : Integer): Integer; assembler; overload;
 function Pos(const Search, InString: String; StartAt : Integer): Integer; assembler; overload;
 procedure Insert(const Insertion: String; var Target: String; Index: Integer); overload;
 procedure Insert(const Insertion: String; var Target: String; Index: Integer); overload;