codetools: tests: clean up

git-svn-id: trunk@54662 -
This commit is contained in:
mattias 2017-04-21 18:23:30 +00:00
parent c3b49f8828
commit d4d351c801
11 changed files with 9 additions and 55 deletions

1
.gitattributes vendored
View File

@ -1012,7 +1012,6 @@ components/codetools/tests/testmethodjumptool.pas svneol=native#text/plain
components/codetools/tests/testpascalparser.pas svneol=native#text/plain
components/codetools/tests/testrefactoring.pas svneol=native#text/plain
components/codetools/tests/teststdcodetools.pas svneol=native#text/plain
components/codetools/tests/testvarcompletion.pas svneol=native#text/plain
components/codetools/unitdictionary.pas svneol=native#text/plain
components/compilers/c/examples/test.c svneol=native#text/plain
components/compilers/c/languages/lazcstrconsts.de.po svneol=native#text/plain

View File

@ -37,7 +37,7 @@
<PackageName Value="fpcunitconsolerunner"/>
</Item2>
</RequiredPackages>
<Units Count="16">
<Units Count="15">
<Unit0>
<Filename Value="runtestscodetools.lpr"/>
<IsPartOfProject Value="True"/>
@ -102,11 +102,6 @@
<Filename Value="moduletests/fdt_proc_basetypes.pas"/>
<IsPartOfProject Value="True"/>
</Unit14>
<Unit15>
<Filename Value="testvarcompletion.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="TestVarCompletion"/>
</Unit15>
</Units>
</ProjectOptions>
<CompilerOptions>

View File

@ -42,8 +42,7 @@ uses
{$ENDIF}
fdt_classof, fdt_with, rt_explodewith, fdt_generics,
TestBasicCodetools, TestCTRangeScan, TestPascalParser, TestMethodJumpTool,
TestStdCodetools, TestFindDeclaration, TestCompleteBlock, TestRefactoring,
TestVarCompletion;
TestStdCodetools, TestFindDeclaration, TestCompleteBlock, TestRefactoring;
const
ConfigFilename = 'codetools.config';

View File

@ -13,7 +13,7 @@ unit TestCfgScript;
interface
uses
Classes, SysUtils, fpcunit, testregistry, testglobals, FileProcs,
Classes, SysUtils, fpcunit, testregistry, FileProcs,
CodeToolsCfgScript;
type

View File

@ -18,7 +18,7 @@ unit TestCompleteBlock;
interface
uses
Classes, SysUtils, fpcunit, testregistry, testglobals, FileProcs,
Classes, SysUtils, fpcunit, testregistry, FileProcs,
CodeToolManager, CodeCache, CustomCodeTool;
type

View File

@ -18,7 +18,7 @@ unit TestCTH2Pas;
interface
uses
Classes, SysUtils, fpcunit, testregistry, testglobals, FileProcs,
Classes, SysUtils, fpcunit, testregistry, FileProcs,
CodeToolManager, BasicCodeTools, CodeCache, CCodeParserTool, H2PasTool;
type

View File

@ -21,7 +21,7 @@ unit TestCTRangeScan;
interface
uses
Classes, SysUtils, fpcunit, testregistry, testglobals, FileProcs,
Classes, SysUtils, fpcunit, testregistry, FileProcs,
CodeToolManager, CodeCache, CustomCodeTool, LinkScanner, CodeTree,
EventCodeTool, PascalParserTool;

View File

@ -10,7 +10,7 @@ unit TestMethodJumpTool;
interface
uses
Classes, SysUtils, LCLProc, testglobals, fpcunit, testregistry,
Classes, SysUtils, LCLProc, fpcunit, testregistry,
CodeToolManager, StdCodeTools, CodeCache, LinkScanner;
type

View File

@ -141,7 +141,7 @@ begin
' class operator Initialize(var t: TMyRecord);',
' class operator Finalize(var t: TMyRecord);',
' class operator Copy(var t: TMyRecord);',
' class operator Clone(constref t1: TMyRecord ; var t2: TMyRecord);',
' class operator AddRef(constref t1: TMyRecord ; var t2: TMyRecord);',
' end;',
'',
'class operator TMyRecord.Implicit(t: TMyRecord): TMyRecord;',

View File

@ -11,7 +11,7 @@ unit TestStdCodetools;
interface
uses
Classes, SysUtils, LCLProc, testglobals, fpcunit, testregistry,
Classes, SysUtils, LCLProc, fpcunit, testregistry,
CodeToolManager, StdCodeTools, CodeCache, LinkScanner;
type

View File

@ -1,39 +0,0 @@
{
Test with:
./testcodetools --format=plain --suite=TTestVarCompletion
./testcodetools --format=plain --suite=TestVarComplete_ForInSet
}
unit TestVarCompletion;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, CodeToolManager, CodeCache, CodeTree,
BasicCodeTools, LazLogger, LazFileUtils, fpcunit, testregistry,
TestFinddeclaration;
type
{ TTestVarCompletion }
TTestVarCompletion = class(TTestCase)
private
published
procedure TestVarComplete_ForInSet;
end;
implementation
{ TTestVarCompletion }
procedure TTestVarCompletion.TestVarComplete_ForInSet;
begin
end;
initialization
RegisterTests([TTestVarCompletion]);
end.