mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 12:49:12 +02:00
* arm: Fixed crash while loading double constants with PIC enabled. This is the regression after r41129. The crash has occurred due to usage of a rare code path. It will be fixed in the next commit.
git-svn-id: trunk@41404 -
This commit is contained in:
parent
ad6642edc0
commit
3e8c7f66b7
@ -2656,7 +2656,7 @@ unit cgcpu;
|
|||||||
if we can keep the original reference while copying }
|
if we can keep the original reference while copying }
|
||||||
function SimpleRef(const ref : treference) : boolean;
|
function SimpleRef(const ref : treference) : boolean;
|
||||||
begin
|
begin
|
||||||
result:=((ref.base=NR_PC) and (ref.addressmode=AM_OFFSET) and (ref.refaddr=addr_full)) or
|
result:=((ref.base=NR_PC) and (ref.addressmode=AM_OFFSET) and (ref.refaddr in [addr_full,addr_no])) or
|
||||||
((ref.symbol=nil) and
|
((ref.symbol=nil) and
|
||||||
(ref.addressmode=AM_OFFSET) and
|
(ref.addressmode=AM_OFFSET) and
|
||||||
(((ref.offset>=0) and (ref.offset+len<=31)) or
|
(((ref.offset>=0) and (ref.offset+len<=31)) or
|
||||||
|
Loading…
Reference in New Issue
Block a user