diff --git a/compiler/i386/cgcpu.pas b/compiler/i386/cgcpu.pas
index 3b25943328..510d018ff0 100644
--- a/compiler/i386/cgcpu.pas
+++ b/compiler/i386/cgcpu.pas
@@ -242,7 +242,7 @@ unit cgcpu;
         case opsize of
           S_B : list.concat(Taicpu.Op_none(A_MOVSB,S_NO));
           S_W : list.concat(Taicpu.Op_none(A_MOVSW,S_NO));
-          S_L : list.concat(Taicpu.Op_none(A_MOVSL,S_NO));
+          S_L : list.concat(Taicpu.Op_none(A_MOVSD,S_NO));
         end;
         ungetregister(list,NR_EDI);
         ungetregister(list,NR_ECX);
@@ -389,7 +389,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.47  2004-02-27 10:21:05  florian
+  Revision 1.48  2004-04-09 14:36:05  peter
+    * A_MOVSL renamed to A_MOVSD
+
+  Revision 1.47  2004/02/27 10:21:05  florian
     * top_symbol killed
     + refaddr to treference added
     + refsymbol to treference added
diff --git a/compiler/x86/cgx86.pas b/compiler/x86/cgx86.pas
index 03f30efea5..11b91b0a7e 100644
--- a/compiler/x86/cgx86.pas
+++ b/compiler/x86/cgx86.pas
@@ -1459,12 +1459,12 @@ unit cgx86;
                       list.concat(Taicpu.op_none(A_MOVSQ,S_NO))
                     else
 {$endif cpu64bit}
-                      list.concat(Taicpu.op_none(A_MOVSL,S_NO));
+                      list.concat(Taicpu.op_none(A_MOVSD,S_NO));
                   end;
                 if len>=4 then
                   begin
                     dec(len,4);
-                    list.concat(Taicpu.op_none(A_MOVSL,S_NO));
+                    list.concat(Taicpu.op_none(A_MOVSD,S_NO));
                   end;
                 if len>=2 then
                   begin
@@ -1791,7 +1791,10 @@ unit cgx86;
 end.
 {
   $Log$
-  Revision 1.119  2004-03-11 19:35:05  peter
+  Revision 1.120  2004-04-09 14:36:05  peter
+    * A_MOVSL renamed to A_MOVSD
+
+  Revision 1.119  2004/03/11 19:35:05  peter
     * fixed concatcopy end bytes copy broken by 64bits patch
 
   Revision 1.118  2004/03/10 22:52:03  peter