Skip to content

Commit 12e7b6e

Browse files
authored
Merge pull request #4309 from MDoerner/SerializedTestDeclarationsUpdate
Serialized test declarations update
2 parents adf77c2 + 96e9c9d commit 12e7b6e

File tree

14 files changed

+49
-24
lines changed

14 files changed

+49
-24
lines changed

RubberduckTests/Inspections/MemberNotOnInterfaceInspectionTests.cs

Lines changed: 26 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -252,7 +252,7 @@ public void MemberNotOnInterface_WithNewReturnsResult()
252252
const string inputCode =
253253
@"Sub Foo()
254254
With New Dictionary
255-
Debug.Print .FooBar
255+
.FooBar
256256
End With
257257
End Sub";
258258

@@ -265,6 +265,31 @@ End With
265265
}
266266
}
267267

268+
//See https://github.com/rubberduck-vba/Rubberduck/issues/4308
269+
[Test]
270+
[Category("Inspections")]
271+
[Ignore("To be unignored in a PR fixing issue 4308.")]
272+
public void MemberNotOnInterface_ProcedureArgument()
273+
{
274+
const string inputCode =
275+
@"Sub Foo()
276+
Dim fooBaz As Dictionary
277+
Set fooBaz = New Dictionary
278+
Bar fooBaz.FooBar
279+
End Sub
280+
281+
Private Sub Bar(baz As Long)
282+
End Sub";
283+
284+
using (var state = ArrangeParserAndParse(inputCode))
285+
{
286+
var inspection = new MemberNotOnInterfaceInspection(state);
287+
var inspectionResults = inspection.GetInspectionResults(CancellationToken.None);
288+
289+
Assert.AreEqual(1, inspectionResults.Count());
290+
}
291+
}
292+
268293
[Test]
269294
[Category("Inspections")]
270295
public void MemberNotOnInterface_DoesNotReturnResult_WithNewBlockBangNotation()

RubberduckTests/Mocks/MockVbeBuilder.cs

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -20,20 +20,20 @@ public class MockVbeBuilder
2020
private readonly Mock<IVBEEvents> _vbeEvents;
2121

2222
#region standard library paths (referenced in all VBA projects hosted in Microsoft Excel)
23-
public static readonly string LibraryPathVBA = @"C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLL"; // standard library, priority locked
24-
public static readonly string LibraryPathMsExcel = @"C:\Program Files\Microsoft Office\Office15\EXCEL.EXE"; // mock host application, priority locked
25-
public static readonly string LibraryPathMsOffice = @"C:\Program Files\Common Files\Microsoft Shared\OFFICE15\MSO.DLL";
26-
public static readonly string LibraryPathStdOle = @"C:\Windows\System32\stdole2.tlb";
27-
public static readonly string LibraryPathMsForms = @"C:\Windows\system32\FM20.DLL"; // standard in projects with a UserForm module
23+
public static readonly string LibraryPathVBA = @"C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL"; // standard library, priority locked
24+
public static readonly string LibraryPathMsExcel = @"C:\Program Files\Microsoft Office 15\Root\Office15\EXCEL.EXE"; // mock host application, priority locked
25+
public static readonly string LibraryPathMsOffice = @"C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE15\MSO.DLL";
26+
public static readonly string LibraryPathStdOle = @"C:\Windows\SysWOW64\stdole2.tlb";
27+
public static readonly string LibraryPathMsForms = @"C:\Windows\SysWOW64\FM20.DLL"; // standard in projects with a UserForm module
2828
#endregion
2929

3030
public static readonly string LibraryPathVBIDE = @"C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB";
31-
public static readonly string LibraryPathScripting = @"C:\Windows\System32\scrrun.dll";
32-
public static readonly string LibraryPathRegex = @"C:\Windows\System32\vbscript.dll\3";
33-
public static readonly string LibraryPathMsXml = @"C:\Windows\System32\msxml6.dll";
34-
public static readonly string LibraryPathShDoc = @"C:\Windows\System32\ieframe.dll";
35-
public static readonly string LibraryPathAdoDb = @"C:\Program Files\Common Files\System\ado\msado15.dll";
36-
public static readonly string LibraryPathAdoRecordset = @"C:\Program Files\Common Files\System\ado\msador15.dll";
31+
public static readonly string LibraryPathScripting = @"C:\Windows\SysWOW64\scrrun.dll";
32+
public static readonly string LibraryPathRegex = @"C:\Windows\SysWOW64\vbscript.dll\3";
33+
public static readonly string LibraryPathMsXml = @"C:\Windows\SysWOW64\msxml6.dll";
34+
public static readonly string LibraryPathShDoc = @"C:\Windows\SysWOW64\ieframe.dll";
35+
public static readonly string LibraryPathAdoDb = @"C:\Program Files (x86)\Common Files\System\ado\msado15.dll";
36+
public static readonly string LibraryPathAdoRecordset = @"C:\Program Files (x86)\Common Files\System\ado\msador15.dll";
3737

3838
public static readonly Dictionary<string, string> LibraryPaths = new Dictionary<string, string>
3939
{

RubberduckTests/Testfiles/Resolver/ADODB.6.1.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/ADOR.6.0.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/Excel.1.8.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/MSForms.2.0.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/MSXML2.6.0.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/Office.2.7.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/SHDocVw.1.1.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

RubberduckTests/Testfiles/Resolver/Scripting.1.0.xml

Lines changed: 1 addition & 1 deletion
Large diffs are not rendered by default.

0 commit comments

Comments
 (0)