paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-19 12:29:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE, lazbuild: treat xml syntax errors in pkg.compiled files as need clean build

Browse Source 
git-svn-id: trunk@46160 -
This commit is contained in:
mattias 2014-09-08 08:44:29 +00:00
parent 881c2a8272
commit da28de64ac
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
packager/packagesystem.pas
View File

@ -46,7 +46,7 @@ uses
{$ENDIF}
// FPC + LCL
Classes, SysUtils, FileProcs, FileUtil, LCLProc, Forms, Controls, Dialogs,
Laz2_XMLCfg, LazLogger, LazFileUtils, InterfaceBase, LazUTF8,
Laz2_XMLCfg, LazLogger, LazFileUtils, InterfaceBase, LazUTF8, laz2_XMLRead,
// codetools
AVL_Tree, contnrs, DefineTemplates, CodeCache,
BasicCodeTools, CodeToolsStructs, NonPascalCodeTools, SourceChanger,
@ -2982,6 +2982,15 @@ begin
stats^.StateFileDate:=StateFileAge;
stats^.StateFileLoaded:=true;
except
on E: EXMLReadError do begin
// invalid XML
debugln(['TLazPackageGraph.LoadPackageCompiledState syntax error in ',StateFile,' => need clean build.']);
stats^.Complete:=false;
stats^.CompilerFilename:='';
stats^.StateFileName:=StateFile;
stats^.StateFileDate:=StateFileAge;
stats^.StateFileLoaded:=true;
end;
on E: Exception do begin
if IgnoreErrors then begin
Result:=mrOk;