paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-13 05:59:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* add a remark that's going to be important once extended RTTI is supported (Delphi programs crash if an attribute's constructor is used that does not have any extended RTTI)

Browse Source 
git-svn-id: trunk@42391 -
This commit is contained in:
svenbarth 2019-07-12 22:07:08 +00:00
parent 71fa4d1fe2
commit 5cea374255
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/pdecl.pas
View File

@ -464,6 +464,9 @@ implementation
if (pcalln.nodetype=calln) and assigned(tcallnode(pcalln).procdefinition) and not codegenerror then if (pcalln.nodetype=calln) and assigned(tcallnode(pcalln).procdefinition) and not codegenerror then
begin begin
{ TODO: once extended RTTI for methods is supported, reject a
constructor if it doesn't have extended RTTI enabled }
{ collect the parameters of the call node as there might be { collect the parameters of the call node as there might be
compile time type conversions (e.g. a Byte parameter being compile time type conversions (e.g. a Byte parameter being
passed a value > 255) } passed a value > 255) }