Browse Source

* Fixed fpc_shortstr_assign for arm.

git-svn-id: trunk@10635 -
yury 17 years ago
parent
commit
3dc94e678d
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/arm/arm.inc

+ 1 - 1
rtl/arm/arm.inc

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