mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 17:49:27 +02:00
* skip hidden parameters while generating a cppdecl mangled name (patch by
Sven Barth, mantis #15063) git-svn-id: trunk@14159 -
This commit is contained in:
parent
f7360d47c5
commit
59d72f12d7
@ -3495,6 +3495,12 @@ implementation
|
||||
for i:=0 to paras.count-1 do
|
||||
begin
|
||||
hp:=tparavarsym(paras[i]);
|
||||
{ no hidden parameters form part of a C++ mangled name:
|
||||
a) self is not included
|
||||
b) there are no "high" or other hidden parameters
|
||||
}
|
||||
if vo_is_hidden_para in hp.varoptions then
|
||||
continue;
|
||||
s2:=getcppparaname(hp.vardef);
|
||||
if hp.varspez in [vs_var,vs_out] then
|
||||
s2:='R'+s2;
|
||||
|
Loading…
Reference in New Issue
Block a user