fcl-base: typo

This commit is contained in:
mattias 2022-07-27 23:41:35 +02:00
parent de650dea55
commit d36d9c7dee

View File

@ -198,9 +198,9 @@ end;
constructor TPascalCodeGenerator.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FSource:=TstringList.Create;
FSource:=TStringList.Create;
FLicenseText:=TstringList.Create;
FSwitches:=TstringList.Create;
FSwitches:=TStringList.Create;
FSwitches.Add('MODE ObjFPC');
FSwitches.Add('H+');
SetLength(FSections,0);
@ -408,5 +408,3 @@ end;
end.
end.