* Changed the second argument of FileWrite from "var buffer" to

  "const buffer", like in Delphi.

rtl/go32v1/filutil.inc

@@ -36,7 +36,7 @@ begin
 end;
 
 
-Function FileWrite (Handle : Longint; Var Buffer; Count : Longint) : Longint;
+Function FileWrite (Handle : Longint; const Buffer; Count : Longint) : Longint;
 
 begin
   //!! Needs implementing
@@ -167,7 +167,11 @@ end;
 
 {
   $Log$
-  Revision 1.3  2000-01-07 16:41:30  daniel
+  Revision 1.4  2000-02-17 22:16:05  sg
+  * Changed the second argument of FileWrite from "var buffer" to
+    "const buffer", like in Delphi.
+
+  Revision 1.3  2000/01/07 16:41:30  daniel
     * copyright 2000
 
   Revision 1.2  1999/04/08 12:22:54  peter

rtl/go32v2/filutil.inc

@@ -90,7 +90,7 @@ result := Do_Read(Handle, longint(@Buffer), Count);
 end;
 
 
-Function FileWrite (Handle : Longint; Var Buffer; Count : Longint) : Longint;
+Function FileWrite (Handle : Longint; const Buffer; Count : Longint) : Longint;
 begin
 result := Do_Write(Handle, longint(@Buffer), Count);
 end;
@@ -456,7 +456,11 @@ end;
 
 {
   $Log$
-  Revision 1.12  2000-02-09 16:59:28  peter
+  Revision 1.13  2000-02-17 22:16:05  sg
+  * Changed the second argument of FileWrite from "var buffer" to
+    "const buffer", like in Delphi.
+
+  Revision 1.12  2000/02/09 16:59:28  peter
     * truncated log
 
   Revision 1.11  2000/01/16 22:25:38  peter

rtl/linux/filutil.inc

@@ -45,7 +45,7 @@ begin
 end;
 
 
-Function FileWrite (Handle : Longint; Var Buffer; Count : Longint) : Longint;
+Function FileWrite (Handle : Longint; const Buffer; Count : Longint) : Longint;
 
 begin
   FileWrite:=fdWrite (Handle,Buffer,Count);
@@ -285,7 +285,11 @@ end;
 
 {
   $Log$
-  Revision 1.14  2000-02-09 16:59:31  peter
+  Revision 1.15  2000-02-17 22:16:05  sg
+  * Changed the second argument of FileWrite from "var buffer" to
+    "const buffer", like in Delphi.
+
+  Revision 1.14  2000/02/09 16:59:31  peter
     * truncated log
 
   Revision 1.13  2000/01/16 22:25:38  peter

rtl/objpas/filutilh.inc

@@ -51,7 +51,7 @@ Const
 Function FileOpen (Const FileName : string; Mode : Integer) : Longint;
 Function FileCreate (Const FileName : String) : Longint;
 Function FileRead (Handle : Longint; Var Buffer; Count : longint) : Longint;
-Function FileWrite (Handle : Longint; Var Buffer; Count : Longint) : Longint;
+Function FileWrite (Handle : Longint; const Buffer; Count : Longint) : Longint;
 Function FileSeek (Handle,Offset,Origin : Longint) : Longint;
 Procedure FileClose (Handle : Longint);
 Function FileTruncate (Handle,Size: Longint) : boolean;
@@ -71,7 +71,11 @@ Function FileSearch (Const Name, DirList : String) : String;
 
 {
   $Log$
-  Revision 1.7  2000-02-09 16:59:32  peter
+  Revision 1.8  2000-02-17 22:16:05  sg
+  * Changed the second argument of FileWrite from "var buffer" to
+    "const buffer", like in Delphi.
+
+  Revision 1.7  2000/02/09 16:59:32  peter
     * truncated log
 
   Revision 1.6  2000/01/07 16:41:43  daniel

rtl/os2/filutil.inc

@@ -36,7 +36,7 @@ begin
 end;
 
 
-Function FileWrite (Handle : Longint; Var Buffer; Count : Longint) : Longint;
+Function FileWrite (Handle : Longint; const Buffer; Count : Longint) : Longint;
 
 begin
   //!! Needs implementing
@@ -167,7 +167,11 @@ end;
 
 {
   $Log$
-  Revision 1.5  2000-02-09 16:59:33  peter
+  Revision 1.6  2000-02-17 22:16:05  sg
+  * Changed the second argument of FileWrite from "var buffer" to
+    "const buffer", like in Delphi.
+
+  Revision 1.5  2000/02/09 16:59:33  peter
     * truncated log
 
   Revision 1.4  2000/01/07 16:41:47  daniel

rtl/win32/filutil.inc

@@ -60,7 +60,7 @@ begin
 end;
 
 
-Function FileWrite (Handle : Longint; Var Buffer; Count : Longint) : Longint;
+Function FileWrite (Handle : Longint; const Buffer; Count : Longint) : Longint;
 
 Var Res : longint;
 
@@ -429,7 +429,11 @@ end;
 
 {
   $Log$
-  Revision 1.14  2000-02-09 16:59:34  peter
+  Revision 1.15  2000-02-17 22:16:05  sg
+  * Changed the second argument of FileWrite from "var buffer" to
+    "const buffer", like in Delphi.
+
+  Revision 1.14  2000/02/09 16:59:34  peter
     * truncated log
 
   Revision 1.13  2000/01/16 22:25:38  peter