diff options
author | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2020-08-23 21:11:09 +0000 |
---|---|---|
committer | jonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2020-08-23 21:11:09 +0000 |
commit | c06a36a327a5f32b8224e61a835d1fdabb4d27b2 (patch) | |
tree | be627e2ea988e4e9d3951bb4247d286047498ae2 /compiler/jvm | |
parent | cef57dd36bc070b22fffcbbda2f1cedc0e421fea (diff) | |
download | fpc-c06a36a327a5f32b8224e61a835d1fdabb4d27b2.tar.gz |
* emit the correct declaration for procdefs used to force a procname in LLVM
o fixes lazarus startup on macOS/AArch64 when compiled with the LLVM cg
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@46675 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/jvm')
-rw-r--r-- | compiler/jvm/njvmcal.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/jvm/njvmcal.pas b/compiler/jvm/njvmcal.pas index b76c0c8131..f1384b7dd8 100644 --- a/compiler/jvm/njvmcal.pas +++ b/compiler/jvm/njvmcal.pas @@ -600,10 +600,10 @@ implementation result:=inherited pass_1; if assigned(result) then exit; - { set fforcedprocname so that even virtual method calls will be + { set foverrideprocnamedef so that even virtual method calls will be name-based (instead of based on VMT entry numbers) } if procdefinition.typ=procdef then - fforcedprocname:=tprocdef(procdefinition).mangledname + foverrideprocnamedef:=tprocdef(procdefinition) end; end; |