3
3
using Rubberduck . CodeAnalysis . Inspections . Concrete ;
4
4
using Rubberduck . Parsing . Inspections . Abstract ;
5
5
using Rubberduck . Parsing . VBA ;
6
- using Rubberduck . VBEditor ;
7
6
using Rubberduck . VBEditor . SafeComWrappers ;
8
- using RubberduckTests . Mocks ;
9
7
10
8
namespace RubberduckTests . Inspections
11
9
{
@@ -140,12 +138,11 @@ Private Sub Baz(arg As Variant)
140
138
End Sub
141
139
" ;
142
140
143
- var vbe = MockVbeBuilder . BuildFromModules (
141
+ var inspectionResults = InspectionResultsForModules (
144
142
( "Class1" , class1Code , ComponentType . ClassModule ) ,
145
143
( "Class2" , class2Code , ComponentType . ClassModule ) ,
146
144
( "Module1" , moduleCode , ComponentType . StandardModule ) ) ;
147
145
148
- var inspectionResults = InspectionResults ( vbe . Object ) ;
149
146
Assert . AreEqual ( 1 , inspectionResults . Count ( ) ) ;
150
147
}
151
148
@@ -227,12 +224,11 @@ Private Sub Baz(arg As Variant)
227
224
End Sub
228
225
" ;
229
226
230
- var vbe = MockVbeBuilder . BuildFromModules (
227
+ var inspectionResults = InspectionResultsForModules (
231
228
( "Class1" , class1Code , ComponentType . ClassModule ) ,
232
229
( "Class2" , class2Code , ComponentType . ClassModule ) ,
233
230
( "Module1" , moduleCode , ComponentType . StandardModule ) ) ;
234
231
235
- var inspectionResults = InspectionResults ( vbe . Object ) ;
236
232
Assert . AreEqual ( 1 , inspectionResults . Count ( ) ) ;
237
233
}
238
234
@@ -283,13 +279,12 @@ Private Sub Baz(arg As Variant)
283
279
End Sub
284
280
" ;
285
281
286
- var vbe = MockVbeBuilder . BuildFromModules (
282
+ var inspectionResults = InspectionResultsForModules (
287
283
( "Class1" , class1Code , ComponentType . ClassModule ) ,
288
284
( "Class2" , class2Code , ComponentType . ClassModule ) ,
289
285
( "Class3" , class3Code , ComponentType . ClassModule ) ,
290
286
( "Module1" , moduleCode , ComponentType . StandardModule ) ) ;
291
287
292
- var inspectionResults = InspectionResults ( vbe . Object ) ;
293
288
Assert . AreEqual ( 1 , inspectionResults . Count ( ) ) ;
294
289
}
295
290
@@ -329,12 +324,11 @@ Private Sub Baz(arg As Variant)
329
324
End Sub
330
325
" ;
331
326
332
- var vbe = MockVbeBuilder . BuildFromModules (
327
+ var inspectionResults = InspectionResultsForModules (
333
328
( "Class1" , class1Code , ComponentType . ClassModule ) ,
334
329
( "Class2" , class2Code , ComponentType . ClassModule ) ,
335
330
( "Module1" , moduleCode , ComponentType . StandardModule ) ) ;
336
331
337
- var inspectionResults = InspectionResults ( vbe . Object ) ;
338
332
Assert . IsFalse ( inspectionResults . Any ( ) ) ;
339
333
}
340
334
@@ -358,11 +352,10 @@ Dim bar As Class1
358
352
End Function
359
353
" ;
360
354
361
- var vbe = MockVbeBuilder . BuildFromModules (
355
+ var inspectionResults = InspectionResultsForModules (
362
356
( "Class1" , classCode , ComponentType . ClassModule ) ,
363
357
( "Module1" , moduleCode , ComponentType . StandardModule ) ) ;
364
358
365
- var inspectionResults = InspectionResults ( vbe . Object ) ;
366
359
Assert . IsFalse ( inspectionResults . Any ( ) ) ;
367
360
}
368
361
@@ -383,16 +376,13 @@ Dim bar As Class1
383
376
End Function
384
377
" ;
385
378
386
- var vbe = new MockVbeBuilder ( )
387
- . ProjectBuilder ( "TestProject" , ProjectProtection . Unprotected )
388
- . AddComponent ( "Class1" , ComponentType . ClassModule , classCode )
389
- . AddComponent ( "Module1" , ComponentType . StandardModule , moduleCode )
390
- . AddReference ( "VBA" , MockVbeBuilder . LibraryPathVBA , 4 , 2 , true )
391
- . AddProjectToVbeBuilder ( )
392
- . Build ( ) ;
379
+ var modules = new ( string , string , ComponentType ) [ ]
380
+ {
381
+ ( "Class1" , classCode , ComponentType . ClassModule ) ,
382
+ ( "Module1" , moduleCode , ComponentType . StandardModule ) ,
383
+ } ;
393
384
394
- var inspectionResults = InspectionResults ( vbe . Object ) ;
395
- Assert . IsFalse ( inspectionResults . Any ( ) ) ;
385
+ Assert . IsFalse ( InspectionResultsForModules ( modules , "VBA" ) . Any ( ) ) ;
396
386
}
397
387
398
388
protected override IInspection InspectionUnderTest ( RubberduckParserState state )
0 commit comments