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