diff --git a/packages/fcl-base/src/pascodegen.pp b/packages/fcl-base/src/pascodegen.pp
index 78b8a58d86..138c2867ca 100644
--- a/packages/fcl-base/src/pascodegen.pp
+++ b/packages/fcl-base/src/pascodegen.pp
@@ -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.
-