* emit a cld instruction before the rep movsXX in tcg386.g_copyvaluepara_openarray

git-svn-id: trunk@25555 -

compiler/i386/cgcpu.pas

@@ -485,6 +485,7 @@ unit cgcpu;
             else
               list.concat(Taicpu.op_const_reg(A_IMUL,S_L,len,NR_ECX));
           end;
+        list.concat(Taicpu.op_none(A_CLD,S_NO));
         list.concat(Taicpu.op_none(A_REP,S_NO));
         case opsize of
           S_B : list.concat(Taicpu.Op_none(A_MOVSB,S_NO));