|
@@ -78,6 +78,10 @@ CONST
|
|
|
procedure SysInitThreadvar(var offset : dword;size : dword);
|
|
|
begin
|
|
|
offset:=threadvarblocksize;
|
|
|
+ {$ifdef CPUARM}
|
|
|
+ // Data must be allocated at 4 bytes boundary for ARM
|
|
|
+ size:=(size + 3) and not dword(3);
|
|
|
+ {$endif CPUARM}
|
|
|
inc(threadvarblocksize,size);
|
|
|
end;
|
|
|
|