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

* change def parameter of single_type() from var to out (part of patch by Blaise.ru)

Browse Source 
git-svn-id: trunk@47809 -
This commit is contained in:
svenbarth 2020-12-18 13:50:36 +00:00
parent 4b3fee38a5
commit a1b252538f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/ptype.pas
View File

@ -41,7 +41,7 @@ interface
procedure resolve_forward_types;
{ reads a string, file type or a type identifier }
procedure single_type(var def:tdef;options:TSingleTypeOptions);
procedure single_type(out def:tdef;options:TSingleTypeOptions);
{ reads any type declaration, where the resulting type will get name as type identifier }
procedure read_named_type(var def:tdef;const newsym:tsym;genericdef:tstoreddef;genericlist:tfphashobjectlist;parseprocvardir:boolean;var hadtypetoken:boolean);
@ -454,7 +454,7 @@ implementation
end;
procedure single_type(var def:tdef;options:TSingleTypeOptions);
procedure single_type(out def:tdef;options:TSingleTypeOptions);
var
t2 : tdef;
isspecialize,