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

fcl-passrc: fixed spaces

Browse Source
This commit is contained in:
mattias 2021-03-02 09:21:00 +00:00
parent dbb9b3b67c
commit b3070f3e6e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/packages/fcl-passrc/src/pasuseanalyzer.pas
View File

@ -2854,7 +2854,7 @@ begin
begin
// write without read
if (vmExternal in El.VarModifiers)
or (El.ClassType=TPasProperty)
or (El.ClassType=TPasProperty)
or ((El.Parent is TPasClassType) and TPasClassType(El.Parent).IsExternal) then
exit;
if El.Visibility in [visPrivate,visStrictPrivate] then