* load moveproc with default value

git-svn-id: trunk@6803 -

rtl/arm/arm.inc

@@ -20,8 +20,6 @@
 const
   cpu_has_edsp : boolean = false;
   in_edsp_test : boolean = false;
-var
-  moveproc : pointer;
 
 procedure fpc_cpuinit;
 begin
@@ -278,6 +276,9 @@ asm
 end;
 
 
+const
+  moveproc : pointer = @move_blended;
+
 procedure Move(const source;var dest;count:longint);[public, alias: 'FPC_MOVE'];assembler;nostackframe;
 asm
   ldr ip,.Lmoveproc