Bladeren bron

* Insert and Delete are compiler internals now, need fake definitions

git-svn-id: trunk@40932 -
michael 6 jaren geleden
bovenliggende
commit
f3cb1b12ce
1 gewijzigde bestanden met toevoegingen van 4 en 0 verwijderingen
  1. 4 0
      rtl/inc/system.fpd

+ 4 - 0
rtl/inc/system.fpd

@@ -42,6 +42,10 @@ Procedure Dispose (P : TypedPointer; Des : TProcedure);
 Procedure Exclude (Var S : TSetType; E : TSetElement);
 Procedure Exclude (Var S : TSetType; E : TSetElement);
 Procedure Exit(Const X : TAnyType);
 Procedure Exit(Const X : TAnyType);
 Procedure Exit;
 Procedure Exit;
+Procedure Delete(var S : String; Const Index, Count : Integer);
+Procedure Delete(var A : DynArrayType; Const Index, Count : Integer);
+Procedure Insert(Const source: string; var S : String; Const Index : Integer);
+Procedure Insert(Const source: DynaArrayType; var S : DynArrayType; Const Index : Integer);
 Function High (Arg: TypeOrVariable) : TOrdinal;
 Function High (Arg: TypeOrVariable) : TOrdinal;
 Procedure Inc (Var X : TOrdinal);
 Procedure Inc (Var X : TOrdinal);
 Procedure Inc (Var X : TOrdinal; Increment : TOrdinal);
 Procedure Inc (Var X : TOrdinal; Increment : TOrdinal);