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

Fix for Mantis #28738.

Browse Source 
pexpr.pas:
  * the gettypedef() overload should not have been commented... Note to self: don't test things during commits

git-svn-id: trunk@31875 -
This commit is contained in:
svenbarth 2015-09-28 09:25:07 +00:00
parent 5f0905d9c7
commit e2be6f400f
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/pexpr.pas
View File

@ -3749,7 +3749,7 @@ implementation
); );
end; end;
(*function gettypedef(n:tnode):tdef;inline; function gettypedef(n:tnode):tdef;inline;
{ This returns the typedef that belongs to the given typenode or { This returns the typedef that belongs to the given typenode or
loadvmtaddrnode. n must not be Nil! } loadvmtaddrnode. n must not be Nil! }
begin begin
@ -3757,7 +3757,7 @@ implementation
result:=ttypenode(n).typedef result:=ttypenode(n).typedef
else else
result:=ttypenode(tloadvmtaddrnode(n).left).typedef; result:=ttypenode(tloadvmtaddrnode(n).left).typedef;
end;*) end;
function gettypedef(sym:tsym):tdef;inline; function gettypedef(sym:tsym):tdef;inline;
begin begin