--- Merging r36923 into '.':

U    rtl/inc/system.fpd
--- Recording mergeinfo for merge of r36923 into '.':
 U   .

# revisions: 36923


git-svn-id: https://svn.freepascal.org/svn/fpc/branches/fixes_3_0@37124 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 12 insertions, 4 deletions

diff --git a/rtl/inc/system.fpd b/rtl/inc/system.fpd
index b865c28c67..9f0de7c413 100644
--- a/rtl/inc/system.fpd
+++ b/rtl/inc/system.fpd
@@ -61,10 +61,18 @@ Function SizeOf (X : TAnyType) : Longint;
 Procedure Str (Var X : TNumericType; Var S : String);
 Function Succ (X : TOrdinal) : TOrdinal;
 Procedure Val (const S : string;Var V;var Code : word);
-Procedure Write (Args : Arguments);
-Procedure Writeln (Args : Arguments);
-Procedure Write (Var F : Text; Args : Arguments);
-Procedure WriteLn (Var F : Text; Args : Arguments);
+Procedure Write (V1);
+Procedure Write (V1,V2);
+Procedure Write (V1,V2,v3);
+Procedure WriteLn (V1);
+Procedure WriteLn (V1,V2);
+Procedure WriteLn (V1,V2,v3);
+Procedure Write (var F : Text; V1);
+Procedure Write (var F : Text; V1,V2);
+Procedure Write (var F : Text; V1,V2,v3);
+Procedure WriteLn (var F : Text; V1);
+Procedure WriteLn (var F : Text; V1,V2);
+Procedure WriteLn (var F : Text; V1,V2,v3);
 Function Copy(S : AStringType; Index,Count : SizeInt) : String;
 Function Copy(A : DynArrayType; Index,Count : SizeInt) : DynArray;
 Procedure SetLength(Var S : AStringType; Len : SizeInt);