Explorar o código

* another ARM data alignment issue was fixed.

git-svn-id: trunk@1333 -
yury %!s(int64=20) %!d(string=hai) anos
pai
achega
a6b84b93e1
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      rtl/inc/heaptrc.pp

+ 4 - 0
rtl/inc/heaptrc.pp

@@ -649,7 +649,11 @@ begin
      old_display_extra_info_proc:=pp^.extra_info^.displayproc;
    end;
   { Do the real ReAllocMem, but alloc also for the info block }
+{$ifdef cpuarm}
+  allocsize:=(size + 3) and not 3+sizeof(theap_mem_info)+pp^.extra_info_size;
+{$else cpuarm}
   allocsize:=size+sizeof(theap_mem_info)+pp^.extra_info_size;
+{$endif cpuarm}
   if add_tail then
    inc(allocsize,sizeof(ptrint));
   { Try to resize the block, if not possible we need to do a