Merged revisions 10635 via svnmerge from

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

........
  r10635 | yury | 2008-04-12 18:58:35 +0300 (Сб, 12 апр 2008) | 1 line
  
  * Fixed fpc_shortstr_assign for arm.
........

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

rtl/arm/arm.inc

@@ -384,7 +384,7 @@ procedure fpc_shortstr_assign(len:longint;sstr,dstr:pointer);assembler;nostackfr
 asm
     ldrb r12,[r1],#1
     cmp  r12,r0
-    movgt r0,r12
+    movgt r12,r0
     strb r12,[r2],#1
     cmp  r12,#6 (* 6 seems to be the break even point. *)
     blt  .LStartTailCopy