diff options
| author | svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2019-09-13 20:38:25 +0000 |
|---|---|---|
| committer | svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2019-09-13 20:38:25 +0000 |
| commit | f4682889945c7df6b0cd942cb6c20f278923075f (patch) | |
| tree | 256429ce3cf7ba7728cbf9e0491b91126e5efe19 /compiler/aarch64/racpugas.pas | |
| parent | 188df4ad8531a1c799a0eec36c99142c54459a52 (diff) | |
| download | fpc-f4682889945c7df6b0cd942cb6c20f278923075f.tar.gz | |
* Aarch64 asm reader: explicitely set the refaddr for local labels
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@42989 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/aarch64/racpugas.pas')
| -rw-r--r-- | compiler/aarch64/racpugas.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/aarch64/racpugas.pas b/compiler/aarch64/racpugas.pas index 0e3e60b4f6..1f181e4d72 100644 --- a/compiler/aarch64/racpugas.pas +++ b/compiler/aarch64/racpugas.pas @@ -732,6 +732,8 @@ Unit racpugas; CreateLocalLabel(actasmpattern,hl,false); Consume(AS_ID); AddLabelOperand(hl); + if oper.opr.ref.refaddr=addr_pic then + oper.opr.ref.refaddr:=addr_page; end else { Check for label } |