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

* patch from Dmitry for "file of integer" like syntax, mantis 16673

Browse Source 
git-svn-id: trunk@15729 -
This commit is contained in:
marco 2010-08-06 16:29:31 +00:00
parent 2e8b8fa54e
commit b10b49efda
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/fcl-passrc/src/pparser.pp
View File

@ -490,6 +490,7 @@ begin
tkFile: tkFile:
begin begin
Result := TPasFileType(CreateElement(TPasFileType, '', Parent)); Result := TPasFileType(CreateElement(TPasFileType, '', Parent));
ParseFileType(TPasFileType(Result));
end; end;
tkArray: tkArray:
begin begin