Bläddra i källkod

* correct last commit error

pierre 25 år sedan
förälder
incheckning
1d1b4bcb53
1 ändrade filer med 6 tillägg och 3 borttagningar
  1. 6 3
      rtl/inc/systemh.inc

+ 6 - 3
rtl/inc/systemh.inc

@@ -165,7 +165,7 @@ var
                         Processor specific routines
 ****************************************************************************}
 
-Procedure Move(const source,dest;count:Longint);
+Procedure Move(const source;var dest;count:Longint);
 Procedure FillChar(Var x;count:Longint;Value:Boolean);
 Procedure FillChar(Var x;count:Longint;Value:Char);
 Procedure FillChar(Var x;count:Longint;Value:Byte);
@@ -445,7 +445,10 @@ const
 
 {
   $Log$
-  Revision 1.86  2000-07-07 18:23:41  marco
+  Revision 1.87  2000-07-07 19:22:27  pierre
+   * correct last commit error
+
+  Revision 1.86  2000/07/07 18:23:41  marco
    * Changed move (var source;var dest) to move (const source;var dest)
 
   Revision 1.85  2000/06/22 18:41:25  peter
@@ -533,4 +536,4 @@ const
   Revision 1.62  1999/08/19 11:16:13  peter
     * settextbuf size is now longint
 
-}
+}