pastojs: filer: fixed writing class destructor

This commit is contained in:
mattias 2021-03-24 10:19:02 +00:00
parent 40ffd215fa
commit c30c3d7fba

View File

@ -3803,7 +3803,7 @@ begin
else if C=TPasDestructor then
Obj.Add('Type','Destructor')
else if C=TPasClassDestructor then
Obj.Add('Type','Class Destructor')
Obj.Add('Type','ClassDestructor')
else if C=TPasAnonymousProcedure then
Obj.Add('Type','AnonymousProcedure')
else if C=TPasAnonymousFunction then