LazUtils: Harmonize the CamelCase names of some units. Add a license header for LazTracer.

This commit is contained in:
Juha 2023-04-07 12:21:10 +03:00
parent 6788d80b4d
commit abb5f2b097
25 changed files with 62 additions and 56 deletions

View File

@ -14,12 +14,12 @@ interface
uses uses
Classes, SysUtils, math, contnrs, Classes, SysUtils, math, contnrs,
fpimage, fpcanvas, laz2_xmlread, laz2_dom, fgl, lazfileutils, fpimage, fpcanvas, Laz2_XMLRead, Laz2_DOM, fgl, LazFileUtils,
// image data formats // image data formats
fpreadpng, fpreadpng,
// HTML can contain SVG // HTML can contain SVG
svgvectorialreader, svgvectorialreader,
fpvectorial, fpvutils, lazutf8, TypInfo; fpvectorial, fpvutils, LazUTF8, TypInfo;
type type
{ TvHTMLVectorialReader } { TvHTMLVectorialReader }

View File

@ -14,7 +14,7 @@ interface
uses uses
Classes, SysUtils, Classes, SysUtils,
laz2_xmlread, laz2_dom, Laz2_XMLRead, Laz2_DOM,
fpvectorial; fpvectorial;
type type

View File

@ -54,7 +54,7 @@ interface
uses uses
Classes, SysUtils, math, contnrs, Classes, SysUtils, math, contnrs,
fpimage, fpcanvas, laz2_xmlread, laz2_dom, fgl, fpimage, fpcanvas, Laz2_XMLRead, Laz2_DOM, fgl,
// image data formats // image data formats
fpreadpng, fpreadpng,
fpvectorial, fpvutils, lazutf8, TypInfo; fpvectorial, fpvutils, lazutf8, TypInfo;

View File

@ -18,11 +18,11 @@ interface
uses uses
Classes, SysUtils, math, contnrs, process, utf8Process, Classes, SysUtils, math, contnrs, process, utf8Process,
laz2_xmlread, laz2_xmlwrite, laz2_dom, Laz2_XMLRead, Laz2_XMLWrite, Laz2_DOM,
// image data formats // image data formats
fpreadpng, fpreadpng,
fpvectorial, fpvutils, lazutf8, TypInfo, fpvectorial, fpvutils, LazUTF8, TypInfo,
fileutil, lazfileutils; FileUtil, LazFileUtils;
type type
{ TvSVGVectorialReader_RSVG } { TvSVGVectorialReader_RSVG }

View File

@ -38,7 +38,7 @@ unit Laz2_DOM;
interface interface
uses uses
SysUtils, Classes, laz2_xmlutils; SysUtils, Classes, Laz2_XMLUtils;
// ------------------------------------------------------- // -------------------------------------------------------
// DOMException // DOMException

View File

@ -27,9 +27,8 @@ interface
uses uses
{$IFDEF MEM_CHECK}MemCheck,{$ENDIF} {$IFDEF MEM_CHECK}MemCheck,{$ENDIF}
Classes, sysutils, LazFileCache, Classes, sysutils, TypInfo,
Laz2_DOM, Laz2_XMLRead, Laz2_XMLWrite, LazUtilities, LazFileCache, Laz2_DOM, Laz2_XMLRead, Laz2_XMLWrite, LazUtilities;
typinfo;
type type

View File

@ -14,7 +14,7 @@
} }
unit laz2_XMLRead; unit Laz2_XMLRead;
{$ifdef fpc} {$ifdef fpc}
{$MODE objfpc}{$H+} {$MODE objfpc}{$H+}
@ -26,7 +26,7 @@ unit laz2_XMLRead;
interface interface
uses uses
SysUtils, Classes, laz2_DOM; SysUtils, Classes, Laz2_DOM;
type type
TErrorSeverity = (esWarning, esError, esFatal); TErrorSeverity = (esWarning, esError, esFatal);
@ -160,7 +160,7 @@ procedure RegisterDecoder(Proc: TGetDecoderProc);
implementation implementation
uses uses
UriParser, laz2_xmlutils, LazUTF8; URIParser, Laz2_XMLUtils, LazUTF8;
const const
PubidChars: TSetOfChar = [' ', #13, #10, 'a'..'z', 'A'..'Z', '0'..'9', PubidChars: TSetOfChar = [' ', #13, #10, 'a'..'z', 'A'..'Z', '0'..'9',

View File

@ -11,7 +11,7 @@
Copyright (c) 2006 by Sergei Gorelkin, sergei_gorelkin@mail.ru Copyright (c) 2006 by Sergei Gorelkin, sergei_gorelkin@mail.ru
} }
unit laz2_xmlutils; unit Laz2_XMLUtils;
{$ifdef fpc}{$mode objfpc}{$endif} {$ifdef fpc}{$mode objfpc}{$endif}
{$H+} {$H+}

View File

@ -15,7 +15,7 @@
} }
unit laz2_XMLWrite; unit Laz2_XMLWrite;
{$ifdef fpc}{$MODE objfpc}{$endif} {$ifdef fpc}{$MODE objfpc}{$endif}
{$H+} {$H+}
@ -25,7 +25,7 @@ unit laz2_XMLWrite;
interface interface
uses Classes, LazUTF8, laz2_DOM, SysUtils, laz2_xmlutils; uses Classes, SysUtils, LazUTF8, Laz2_DOM, Laz2_XMLUtils;
type type
TXMLWriterFlag = ( TXMLWriterFlag = (

View File

@ -16,13 +16,13 @@
{$mode objfpc} {$mode objfpc}
{$H+} {$H+}
unit laz2_xpath; unit Laz2_XPath;
interface interface
uses uses
Math, SysUtils, Classes, LazUtilsStrConsts, Math, SysUtils, Classes, LazUtilsStrConsts,
laz2_DOM, laz2_xmlutils; Laz2_DOM, Laz2_XMLUtils;
type type
TXPathContext = class; TXPathContext = class;

View File

@ -17,10 +17,10 @@ unit Laz_XMLRead;
interface interface
uses uses
Classes, laz2_XMLRead, laz2_DOM; Classes, Laz2_XMLRead, Laz2_DOM;
type type
EXMLReadError = laz2_XMLRead.EXMLReadError; EXMLReadError = Laz2_XMLRead.EXMLReadError;
const const
xrfOldXMLRead = [xrfAllowLowerThanInAttributeValue,xrfAllowSpecialCharsInAttributeValue]; xrfOldXMLRead = [xrfAllowLowerThanInAttributeValue,xrfAllowSpecialCharsInAttributeValue];
@ -43,65 +43,65 @@ implementation
procedure ReadXMLFile(out ADoc: TXMLDocument; const AFilename: String); procedure ReadXMLFile(out ADoc: TXMLDocument; const AFilename: String);
begin begin
laz2_XMLRead.ReadXMLFile(ADoc,AFilename,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFile(ADoc,AFilename,xrfOldXMLRead);
end; end;
procedure ReadXMLFile(out ADoc: TXMLDocument; var f: File); procedure ReadXMLFile(out ADoc: TXMLDocument; var f: File);
begin begin
laz2_XMLRead.ReadXMLFile(ADoc,f,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFile(ADoc,f,xrfOldXMLRead);
end; end;
procedure ReadXMLFile(out ADoc: TXMLDocument; f: TStream); procedure ReadXMLFile(out ADoc: TXMLDocument; f: TStream);
begin begin
laz2_XMLRead.ReadXMLFile(ADoc,f,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFile(ADoc,f,xrfOldXMLRead);
end; end;
procedure ReadXMLFile(out ADoc: TXMLDocument; f: TStream; procedure ReadXMLFile(out ADoc: TXMLDocument; f: TStream;
const AFilename: String); const AFilename: String);
begin begin
laz2_XMLRead.ReadXMLFile(ADoc,f,AFilename,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFile(ADoc,f,AFilename,xrfOldXMLRead);
end; end;
procedure ReadXMLFragment(AParentNode: TDOMNode; const AFilename: String); procedure ReadXMLFragment(AParentNode: TDOMNode; const AFilename: String);
begin begin
laz2_XMLRead.ReadXMLFragment(AParentNode,AFilename,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFragment(AParentNode,AFilename,xrfOldXMLRead);
end; end;
procedure ReadXMLFragment(AParentNode: TDOMNode; var f: File); procedure ReadXMLFragment(AParentNode: TDOMNode; var f: File);
begin begin
laz2_XMLRead.ReadXMLFragment(AParentNode,f,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFragment(AParentNode,f,xrfOldXMLRead);
end; end;
procedure ReadXMLFragment(AParentNode: TDOMNode; var f: TStream); procedure ReadXMLFragment(AParentNode: TDOMNode; var f: TStream);
begin begin
laz2_XMLRead.ReadXMLFragment(AParentNode,f,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFragment(AParentNode,f,xrfOldXMLRead);
end; end;
procedure ReadXMLFragment(AParentNode: TDOMNode; var f: TStream; procedure ReadXMLFragment(AParentNode: TDOMNode; var f: TStream;
const AFilename: String); const AFilename: String);
begin begin
laz2_XMLRead.ReadXMLFragment(AParentNode,f,AFilename,xrfOldXMLRead); Laz2_XMLRead.ReadXMLFragment(AParentNode,f,AFilename,xrfOldXMLRead);
end; end;
procedure ReadDTDFile(var ADoc: TXMLDocument; const AFilename: String); procedure ReadDTDFile(var ADoc: TXMLDocument; const AFilename: String);
begin begin
laz2_XMLRead.ReadDTDFile(ADoc,AFilename); Laz2_XMLRead.ReadDTDFile(ADoc,AFilename);
end; end;
procedure ReadDTDFile(var ADoc: TXMLDocument; var f: File); procedure ReadDTDFile(var ADoc: TXMLDocument; var f: File);
begin begin
laz2_XMLRead.ReadDTDFile(ADoc,f); Laz2_XMLRead.ReadDTDFile(ADoc,f);
end; end;
procedure ReadDTDFile(var ADoc: TXMLDocument; var f: TStream); procedure ReadDTDFile(var ADoc: TXMLDocument; var f: TStream);
begin begin
laz2_XMLRead.ReadDTDFile(ADoc,f); Laz2_XMLRead.ReadDTDFile(ADoc,f);
end; end;
procedure ReadDTDFile(var ADoc: TXMLDocument; var f: TStream; procedure ReadDTDFile(var ADoc: TXMLDocument; var f: TStream;
const AFilename: String); const AFilename: String);
begin begin
laz2_XMLRead.ReadDTDFile(ADoc,f,AFilename); Laz2_XMLRead.ReadDTDFile(ADoc,f,AFilename);
end; end;
end. end.

View File

@ -16,7 +16,7 @@ unit Laz_XMLWrite;
interface interface
uses Classes, laz2_XMLWrite, laz2_DOM; uses Classes, Laz2_XMLWrite, Laz2_DOM;
const const
xwfOldXMLWrite = [xwfSpecialCharsInAttributeValue]; xwfOldXMLWrite = [xwfSpecialCharsInAttributeValue];
@ -33,32 +33,32 @@ implementation
procedure WriteXMLFile(doc: TXMLDocument; const AFileName: String); procedure WriteXMLFile(doc: TXMLDocument; const AFileName: String);
begin begin
laz2_XMLWrite.WriteXMLFile(doc,AFileName,xwfOldXMLWrite); Laz2_XMLWrite.WriteXMLFile(doc,AFileName,xwfOldXMLWrite);
end; end;
procedure WriteXMLFile(doc: TXMLDocument; var AFile: Text); procedure WriteXMLFile(doc: TXMLDocument; var AFile: Text);
begin begin
laz2_XMLWrite.WriteXMLFile(doc,AFile,xwfOldXMLWrite); Laz2_XMLWrite.WriteXMLFile(doc,AFile,xwfOldXMLWrite);
end; end;
procedure WriteXMLFile(doc: TXMLDocument; AStream: TStream); procedure WriteXMLFile(doc: TXMLDocument; AStream: TStream);
begin begin
laz2_XMLWrite.WriteXMLFile(doc,AStream,xwfOldXMLWrite); Laz2_XMLWrite.WriteXMLFile(doc,AStream,xwfOldXMLWrite);
end; end;
procedure WriteXML(Element: TDOMNode; const AFileName: String); procedure WriteXML(Element: TDOMNode; const AFileName: String);
begin begin
laz2_XMLWrite.WriteXML(Element,AFileName,xwfOldXMLWrite); Laz2_XMLWrite.WriteXML(Element,AFileName,xwfOldXMLWrite);
end; end;
procedure WriteXML(Element: TDOMNode; var AFile: Text); procedure WriteXML(Element: TDOMNode; var AFile: Text);
begin begin
laz2_XMLWrite.WriteXML(Element,AFile,xwfOldXMLWrite); Laz2_XMLWrite.WriteXML(Element,AFile,xwfOldXMLWrite);
end; end;
procedure WriteXML(Element: TDOMNode; AStream: TStream); procedure WriteXML(Element: TDOMNode; AStream: TStream);
begin begin
laz2_XMLWrite.WriteXML(Element,AStream,xwfOldXMLWrite); Laz2_XMLWrite.WriteXML(Element,AStream,xwfOldXMLWrite);
end; end;
end. end.

View File

@ -1,3 +1,11 @@
{
*****************************************************************************
This file is part of LazUtils.
See the file COPYING.modifiedLGPL.txt, included in this distribution,
for details about the license.
*****************************************************************************
}
unit LazTracer; unit LazTracer;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}

View File

@ -6,7 +6,7 @@
for details about the license. for details about the license.
***************************************************************************** *****************************************************************************
} }
unit lcsvutils; unit LCSVUtils;
{$mode objfpc}{$H+} {$mode objfpc}{$H+}
{$modeswitch nestedprocvars} {$modeswitch nestedprocvars}

View File

@ -83,8 +83,8 @@ unit Wiki2FPDocConvert;
interface interface
uses uses
Classes, SysUtils, WikiParser, laz2_DOM, LazFileUtils, laz2_XMLRead, Classes, SysUtils, WikiParser, LazFileUtils,
laz2_XMLWrite, LazLoggerBase, WikiFormat; Laz2_DOM, Laz2_XMLRead, Laz2_XMLWrite, LazLoggerBase, WikiFormat;
type type

View File

@ -27,7 +27,7 @@ interface
uses uses
Classes, SysUtils, Classes, SysUtils,
// LazUtils // LazUtils
laz2_XMLWrite, LazUTF8, laz2_DOM, LazLoggerBase, LazFileUtils, AvgLvlTree, Laz2_XMLWrite, Laz2_DOM, LazUTF8, LazLoggerBase, LazFileUtils, AvgLvlTree,
// CodeTools // CodeTools
BasicCodeTools, KeywordFuncLists, BasicCodeTools, KeywordFuncLists,
// LazWiki // LazWiki

View File

@ -29,7 +29,7 @@ interface
uses uses
Classes, SysUtils, Laz_AVL_Tree, Classes, SysUtils, Laz_AVL_Tree,
// LazUtils // LazUtils
LazFileUtils, laz2_XMLRead, laz2_DOM, LazLoggerBase, AvgLvlTree, LazUTF8, LazStringUtils, LazFileUtils, Laz2_XMLRead, Laz2_DOM, LazLoggerBase, AvgLvlTree, LazUTF8, LazStringUtils,
// Codetools // Codetools
BasicCodeTools, KeywordFuncLists, BasicCodeTools, KeywordFuncLists,
// LazWiki // LazWiki

View File

@ -36,7 +36,7 @@ interface
uses uses
Classes, SysUtils, Classes, SysUtils,
// LazUtils // LazUtils
laz2_XMLRead, laz2_DOM, LazLoggerBase, LazUTF8, LazStringUtils, Laz2_XMLRead, Laz2_DOM, LazLoggerBase, LazUTF8, LazStringUtils,
// CodeTools // CodeTools
BasicCodeTools, KeywordFuncLists; BasicCodeTools, KeywordFuncLists;

View File

@ -31,7 +31,7 @@ uses
{$ENDIF} {$ENDIF}
Classes, SysUtils, CustApp, strutils, Laz_AVL_Tree, Classes, SysUtils, CustApp, strutils, Laz_AVL_Tree,
// LazUtils // LazUtils
LazFileUtils, laz2_XMLRead, laz2_DOM, laz2_XMLWrite, LazLogger, avglvltree, LazFileUtils, Laz2_XMLRead, Laz2_DOM, Laz2_XMLWrite, LazLogger, avglvltree,
LazUTF8, LazStringUtils, LazUTF8, LazStringUtils,
// CodeTools // CodeTools
CodeToolsStructs, CodeToolsStructs,

View File

@ -43,9 +43,8 @@ uses
{$ELSE} {$ELSE}
LazAdvancedIPC, LazAdvancedIPC,
{$ENDIF} {$ENDIF}
Interfaces, Controls, Forms, Dialogs, ExtCtrls, LCLProc, Interfaces, Controls, Forms, Dialogs, ExtCtrls, LCLProc, LCLIntf, LCLType,
LCLIntf, LCLType, LazFileUtils, LazUTF8, laz2_XMLRead, laz2_XMLWrite, LazFileUtils, FileUtil, Laz2_XMLRead, Laz2_XMLWrite, Laz2_DOM, LazUTF8, UTF8Process,
Laz2_DOM, FileUtil, UTF8Process,
LazarusIDEStrConsts, IDECmdLine, LazConf; LazarusIDEStrConsts, IDECmdLine, LazConf;
type type

View File

@ -41,7 +41,7 @@ uses
TypInfo, Classes, SysUtils, math, Types, fgl, TypInfo, Classes, SysUtils, math, Types, fgl,
// LazUtils // LazUtils
Laz2_XMLCfg, LazFileUtils, LazStringUtils, LazUtilities, LazLoggerBase, Laz2_XMLCfg, LazFileUtils, LazStringUtils, LazUtilities, LazLoggerBase,
LazClasses, Maps, LazMethodList, laz2_XMLWrite, LazClasses, Maps, LazMethodList, Laz2_XMLWrite,
// DebuggerIntf // DebuggerIntf
DbgIntfBaseTypes, DbgIntfMiscClasses, DbgIntfDebuggerBase, LazDebuggerIntf, DbgIntfBaseTypes, DbgIntfMiscClasses, DbgIntfDebuggerBase, LazDebuggerIntf,
LazDebuggerIntfBaseTypes, LazDebuggerValueConverter, LazDebuggerTemplate, LazDebuggerIntfBaseTypes, LazDebuggerValueConverter, LazDebuggerTemplate,

View File

@ -6,7 +6,7 @@ interface
uses uses
Classes, SysUtils, IDEOptionsIntf, Laz2_XMLCfg, LazFileUtils, LazUTF8, Classes, SysUtils, IDEOptionsIntf, Laz2_XMLCfg, LazFileUtils, LazUTF8,
LazLoggerBase, Laz2_DOM, laz2_XMLRead, laz2_XMLWrite, DbgIntfDebuggerBase, LazLoggerBase, Laz2_DOM, Laz2_XMLRead, Laz2_XMLWrite, DbgIntfDebuggerBase,
IdeDebuggerStringConstants, IdeDebuggerBackendValueConv, EnvironmentOpts; IdeDebuggerStringConstants, IdeDebuggerBackendValueConv, EnvironmentOpts;
type type

View File

@ -6,7 +6,7 @@ interface
uses uses
Classes, SysUtils, IdeDebuggerOpts, EnvironmentOpts, DbgIntfDebuggerBase, Classes, SysUtils, IdeDebuggerOpts, EnvironmentOpts, DbgIntfDebuggerBase,
Laz2_DOM, laz2_XMLRead, laz2_xpath, fpcunit, Laz2_DOM, Laz2_XMLRead, Laz2_XPath, fpcunit,
testregistry; testregistry;
type type

View File

@ -50,7 +50,7 @@ uses
Forms, Controls, Dialogs, LCLProc, Forms, Controls, Dialogs, LCLProc,
// LazUtils // LazUtils
FileUtil, LazFileCache, LazLoggerBase, LazUtilities, LazFileUtils, LazUTF8, FileUtil, LazFileCache, LazLoggerBase, LazUtilities, LazFileUtils, LazUTF8,
Laz2_XMLCfg, laz2_XMLRead, LazStringUtils, AvgLvlTree, Laz2_XMLCfg, Laz2_XMLRead, LazStringUtils, AvgLvlTree,
// codetools // codetools
FileProcs, DefineTemplates, CodeToolManager, CodeCache, DirectoryCacher, FileProcs, DefineTemplates, CodeToolManager, CodeCache, DirectoryCacher,
BasicCodeTools, NonPascalCodeTools, SourceChanger, BasicCodeTools, NonPascalCodeTools, SourceChanger,

View File

@ -15,8 +15,8 @@ unit TestLazXML;
interface interface
uses uses
Classes, SysUtils, fpcunit, testglobals, laz2_DOM, laz2_xmlutils, laz2_xpath, Classes, SysUtils, fpcunit, testglobals, Laz2_DOM, Laz2_XMLUtils, Laz2_XPath,
laz2_XMLRead, LazLogger; Laz2_XMLRead, LazLogger;
type type