`TPascalCodeGenerator`
pt		DoLog
pt		BaseUnits
		Create
		Destroy
		EnsureSection
		PushSection
		PopSection
		CreateHeader
		CreateUnitClause
		Indent
		Undent
		IsKeyWord
		EscapeKeyWord
		MakePascalString
		PrettyPrint
		AddLn
		Comment
		ClassComment
		ClassHeader
		SimpleMethodBody
		SaveToStream
		SaveToFile