Merged revisions 10651 via svnmerge from

http://svn.freepascal.org/svn/fpc/trunk

........
  r10651 | yury | 2008-04-13 19:17:14 +0300 (Вс, 13 апр 2008) | 1 line
  
  * Fixed fpc_shortstr_to_shortstr for arm.
........

git-svn-id: branches/fixes_2_2@10660 -

rtl/arm/arm.inc

@@ -326,7 +326,7 @@ procedure fpc_shortstr_to_shortstr(out res:shortstring;const sstr:shortstring);a
 asm
     ldrb r12,[r2],#1
     cmp  r12,r1
-    movgt r1,r12
+    movgt r12,r1
     strb r12,[r0],#1
     cmp  r12,#6 (* 6 seems to be the break even point. *)
     blt  .LStartTailCopy