paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 00:52:41 +02:00
Code Issues Packages Projects Releases Wiki Activity

* power functions added

Browse Source 
git-svn-id: trunk@19900 -
This commit is contained in:
marco 2011-12-28 18:11:45 +00:00
parent a710a7cf7f
commit 881caba4c3
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/system.fpd
View File

@ -57,6 +57,8 @@ Procedure SetLength(Var S : AStringType; Len : Integer);
Procedure SetLength(Var A : DynArrayType; Len : Integer); Procedure SetLength(Var A : DynArrayType; Len : Integer);
Function Length(S : AStringType) : Integer; Function Length(S : AStringType) : Integer;
Function Length(A : DynArrayType) : Integer; Function Length(A : DynArrayType) : Integer;
Function Power(Base:double;expon:double):double;
Function Power(Base:Longint;expon:Longint):Longint;
Procedure WriteStr(Out S : String; Args : Arguments); Procedure WriteStr(Out S : String; Args : Arguments);
Procedure ReadStr(Const S : String; Args : Arguments); Procedure ReadStr(Const S : String; Args : Arguments);
Procedure Pack(Const A : UnpackedArrayType; StartIndex : TIndexType; Out Z : PackedArrayType); Procedure Pack(Const A : UnpackedArrayType; StartIndex : TIndexType; Out Z : PackedArrayType);