paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-10 11:32:46 +02:00
Code Issues Packages Projects Releases Wiki Activity

- removed double calling of handlemanagedbyrefpara() for managed targets,

Browse Source 
not sure why it didn't cause problems before

git-svn-id: trunk@31668 -
This commit is contained in:
Jonas Maebe 2015-09-13 19:06:29 +00:00
parent b12bedb9f8
commit 4d0c42ee23
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/ncal.pas
View File

@ -1271,9 +1271,7 @@ implementation
vs_out :
begin
if not valid_for_formal_var(left,true) then
CGMessagePos(left.fileinfo,parser_e_illegal_parameter_list)
else if (target_info.system in systems_managed_vm) then
handlemanagedbyrefpara(left.resultdef);
CGMessagePos(left.fileinfo,parser_e_illegal_parameter_list);
end;
vs_const :
begin