paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-02 13:40:00 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: quick fixes for 5036,5037,5057..5060,5090..5094: does not seem to be initialized

Browse Source 
git-svn-id: trunk@48081 -
This commit is contained in:
mattias 2015-03-01 14:23:25 +00:00
parent d6f218a8d3
commit e81b6644da
3 changed files with 19 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/ideintf/ideexterntoolintf.pas
View File

@ -1152,7 +1152,7 @@ destructor TAbstractExternalTool.Destroy;
var
h: TExternalToolHandler;
begin
{$IFDEF EnableCheckInterPkgFiles}
{$IFDEF VerboseCheckInterPkgFiles}
debugln(['TAbstractExternalTool.Destroy ',Title]);
{$ENDIF}
EnterCriticalSection;

31
ide/etquickfixes.pas
View File

@ -275,22 +275,25 @@ var
Code: TCodeBuffer;
begin
Result:=false;
if not Msg.HasSourcePosition then exit;
// Check: Local variable "$1" does not seem to be initialized
if not IsMsgId(5036) // W_Local variable "$1" does not seem to be initialized
or not IsMsgId(5037) // W_Variable "$1" does not seem to be initialized
or not IsMsgId(5057) // H_Local variable "$1" does not seem to be initialized
or not IsMsgId(5058) // H_Variable "$1" does not seem to be initialized
or not IsMsgId(5059) // W_Function result variable does not seem to initialized
or not IsMsgId(5060) // H_Function result variable does not seem to be initialized
or not IsMsgId(5089) // W_Local variable "$1" of a managed type does not seem to be initialized
or not IsMsgId(5090) // W_Variable "$1" of a managed type does not seem to be initialized
or not IsMsgId(5091) // H_Local variable "$1" of a managed type does not seem to be initialized
or not IsMsgId(5092) // H_Variable "$1" of a managed type does not seem to be initialized
or not IsMsgId(5093) // W_function result variable of a managed type does not seem to initialized
or not IsMsgId(5094) // H_Function result variable of a managed type does not seem to be initialized
then
if IsMsgId(5036) // W_Local variable "$1" does not seem to be initialized
or IsMsgId(5037) // W_Variable "$1" does not seem to be initialized
or IsMsgId(5057) // H_Local variable "$1" does not seem to be initialized
or IsMsgId(5058) // H_Variable "$1" does not seem to be initialized
or IsMsgId(5059) // W_Function result variable does not seem to initialized
or IsMsgId(5060) // H_Function result variable does not seem to be initialized
or IsMsgId(5089) // W_Local variable "$1" of a managed type does not seem to be initialized
or IsMsgId(5090) // W_Variable "$1" of a managed type does not seem to be initialized
or IsMsgId(5091) // H_Local variable "$1" of a managed type does not seem to be initialized
or IsMsgId(5092) // H_Variable "$1" of a managed type does not seem to be initialized
or IsMsgId(5093) // W_function result variable of a managed type does not seem to initialized
or IsMsgId(5094) // H_Function result variable of a managed type does not seem to be initialized
then begin
if not IsValidIdent(Identifier) then exit;
end else
exit;
if not Msg.HasSourcePosition or not IsValidIdent(Identifier) then exit;
// check if message position is at end of identifier
if not GetMsgIdentifierInSource(Msg,Identifier,Code,Tool,CleanPos,Node) then exit;

2
packager/packagesystem.pas
View File

@ -699,7 +699,7 @@ var
i: Integer;
Tool: TAbstractExternalTool;
begin
{$IFDEF EnableCheckInterPkgFiles}
{$IFDEF VerboseCheckInterPkgFiles}
debugln(['TLazPkgGraphBuildItem.Clear ',LazPackage.IDAsString]);
{$ENDIF}
for i:=Count-1 downto 0 do begin