|
@@ -99,7 +99,7 @@ type
|
|
procedure TestM_Hint_UnitNotUsed_No_OnlyExternal;
|
|
procedure TestM_Hint_UnitNotUsed_No_OnlyExternal;
|
|
procedure TestM_Hint_UnitUsed;
|
|
procedure TestM_Hint_UnitUsed;
|
|
procedure TestM_Hint_UnitUsedVarArgs;
|
|
procedure TestM_Hint_UnitUsedVarArgs;
|
|
- procedure TestM_Hint_UnitNotUsed_ClassInterfacesList;
|
|
|
|
|
|
+ procedure TestM_Hint_UnitNotUsed_ClassInterfaceAliasType; // todo
|
|
procedure TestM_Hint_ParameterNotUsed;
|
|
procedure TestM_Hint_ParameterNotUsed;
|
|
procedure TestM_Hint_ParameterNotUsedOff;
|
|
procedure TestM_Hint_ParameterNotUsedOff;
|
|
procedure TestM_Hint_ParameterInOverrideNotUsed;
|
|
procedure TestM_Hint_ParameterInOverrideNotUsed;
|
|
@@ -1630,8 +1630,10 @@ begin
|
|
CheckUseAnalyzerUnexpectedHints;
|
|
CheckUseAnalyzerUnexpectedHints;
|
|
end;
|
|
end;
|
|
|
|
|
|
-procedure TTestUseAnalyzer.TestM_Hint_UnitNotUsed_ClassInterfacesList;
|
|
|
|
|
|
+procedure TTestUseAnalyzer.TestM_Hint_UnitNotUsed_ClassInterfaceAliasType;
|
|
begin
|
|
begin
|
|
|
|
+ exit;
|
|
|
|
+
|
|
AddModuleWithIntfImplSrc('unit2.pp',
|
|
AddModuleWithIntfImplSrc('unit2.pp',
|
|
LinesToStr([
|
|
LinesToStr([
|
|
'type',
|
|
'type',
|