@@ -21,8 +21,6 @@ public class EncapsulateFieldTests : InteractiveRefactoringTestBase<IEncapsulate
21
21
{
22
22
private EncapsulateFieldTestSupport Support { get ; } = new EncapsulateFieldTestSupport ( ) ;
23
23
24
- private static Func < string , string > Param = EncapsulateFieldTestSupport . ParamNameBuilder ;
25
-
26
24
[ TestCase ( "fizz" , true , "baz" , true , "buzz" , true ) ]
27
25
[ TestCase ( "fizz" , false , "baz" , true , "buzz" , true ) ]
28
26
[ TestCase ( "fizz" , false , "baz" , false , "buzz" , true ) ]
@@ -69,10 +67,12 @@ public void EncapsulateMultipleFields(
69
67
70
68
foreach ( var variable in encapsulated )
71
69
{
70
+ var rhsParameterName = Support . RhsParameterNameBuilder ( $ "{ variable } Prop") ;
71
+
72
72
StringAssert . Contains ( $ "Private { variable } As", actualCode ) ;
73
73
StringAssert . Contains ( $ "{ variable } Prop = { variable } ", actualCode ) ;
74
- StringAssert . Contains ( $ "{ variable } = { Param ( $ " { variable } Prop" ) } ", actualCode ) ;
75
- StringAssert . Contains ( $ "Let { variable } Prop(ByVal { Param ( $ " { variable } Prop" ) } As", actualCode ) ;
74
+ StringAssert . Contains ( $ "{ variable } = { rhsParameterName } ", actualCode ) ;
75
+ StringAssert . Contains ( $ "Let { variable } Prop(ByVal { rhsParameterName } As", actualCode ) ;
76
76
StringAssert . Contains ( $ "Property Get { variable } Prop()", actualCode ) ;
77
77
}
78
78
}
@@ -133,10 +133,12 @@ public void EncapsulateMultipleFieldsInList(
133
133
{
134
134
if ( flags [ key ] )
135
135
{
136
+ var rhsParameterName = Support . RhsParameterNameBuilder ( $ "{ key } Prop") ;
137
+
136
138
StringAssert . Contains ( $ "Private { key } As", actualCode ) ;
137
139
StringAssert . Contains ( $ "{ key } Prop = { key } ", actualCode ) ;
138
- StringAssert . Contains ( $ "{ key } = { Param ( $ " { key } Prop" ) } ", actualCode ) ;
139
- StringAssert . Contains ( $ "Let { key } Prop(ByVal { Param ( $ " { key } Prop" ) } As", actualCode ) ;
140
+ StringAssert . Contains ( $ "{ key } = { rhsParameterName } ", actualCode ) ;
141
+ StringAssert . Contains ( $ "Let { key } Prop(ByVal { rhsParameterName } As", actualCode ) ;
140
142
StringAssert . Contains ( $ "Property Get { key } Prop()", actualCode ) ;
141
143
}
142
144
}
@@ -232,10 +234,11 @@ Property Set Foo(ByVal vall As Variant)
232
234
End Property" ;
233
235
234
236
var presenterAction = Support . SetParametersForSingleTarget ( "fizz" , "Name" ) ;
237
+ var rhsParameterName = Support . RhsParameterNameBuilder ( "Name" ) ;
235
238
236
239
var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
237
- Assert . Greater ( actualCode . IndexOf ( $ "fizz = { Param ( "Name" ) } ") , actualCode . IndexOf ( "fizz As Integer" ) ) ;
238
- Assert . Less ( actualCode . IndexOf ( $ "fizz = { Param ( "Name" ) } ") , actualCode . IndexOf ( "Get Foo" ) ) ;
240
+ Assert . Greater ( actualCode . IndexOf ( $ "fizz = { rhsParameterName } ") , actualCode . IndexOf ( "fizz As Integer" ) ) ;
241
+ Assert . Less ( actualCode . IndexOf ( $ "fizz = { rhsParameterName } ") , actualCode . IndexOf ( "Get Foo" ) ) ;
239
242
}
240
243
241
244
[ TestCase ( "|Public fizz As Integer\r \n Public buzz As Boolean" , "Private fizz As Integer\r \n Public buzz As Boolean" ) ]
@@ -294,12 +297,14 @@ public void EncapsulatePrivateField()
294
297
@"|Private fizz As Integer" ;
295
298
296
299
var presenterAction = Support . SetParametersForSingleTarget ( "fizz" , "Name" ) ;
300
+ var rhsParameterName = Support . RhsParameterNameBuilder ( "Name" ) ;
301
+
297
302
var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
298
303
StringAssert . Contains ( "Public Property Get Name() As Integer" , actualCode ) ;
299
304
StringAssert . Contains ( "Public Property Let Name(" , actualCode ) ;
300
- StringAssert . Contains ( $ "(ByVal { Param ( "Name" ) } As Integer)", actualCode ) ;
305
+ StringAssert . Contains ( $ "(ByVal { rhsParameterName } As Integer)", actualCode ) ;
301
306
StringAssert . Contains ( "Name = fizz" , actualCode ) ;
302
- StringAssert . Contains ( $ "fizz = { Param ( "Name" ) } ", actualCode ) ;
307
+ StringAssert . Contains ( $ "fizz = { rhsParameterName } ", actualCode ) ;
303
308
StringAssert . Contains ( "End Property" , actualCode ) ;
304
309
}
305
310
@@ -365,28 +370,17 @@ public void EncapsulatePrivateFieldInList()
365
370
const string inputCode =
366
371
@"Private fi|zz As Integer, fuzz As Integer, fazz As Integer" ;
367
372
368
- // const string expectedCode =
369
- // @"
370
- //Private fizz_1 As Integer, fuzz As Integer, fazz As Integer
371
-
372
- //Public Property Get Fizz() As Integer
373
- // Fizz = fizz_1
374
- //End Property
375
-
376
- //Public Property Let Fizz(ByVal value As Integer)
377
- // fizz_1 = value
378
- //End Property
379
- //";
380
373
var presenterAction = Support . SetParametersForSingleTarget ( "fizz" ) ;
374
+ var rhsParameterName = Support . RhsParameterNameBuilder ( "Fizz" ) ;
375
+
381
376
var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
382
377
StringAssert . Contains ( "Private fizz_1 As Integer, fuzz As Integer," , actualCode ) ;
383
378
StringAssert . Contains ( "Public Property Get Fizz() As Integer" , actualCode ) ;
384
379
StringAssert . Contains ( "Public Property Let Fizz(" , actualCode ) ;
385
- StringAssert . Contains ( $ "(ByVal { Param ( "Fizz" ) } As Integer)", actualCode ) ;
380
+ StringAssert . Contains ( $ "(ByVal { rhsParameterName } As Integer)", actualCode ) ;
386
381
StringAssert . Contains ( "Fizz = fizz_1" , actualCode ) ;
387
- StringAssert . Contains ( $ "fizz_1 = { Param ( "Fizz" ) } ", actualCode ) ;
382
+ StringAssert . Contains ( $ "fizz_1 = { rhsParameterName } ", actualCode ) ;
388
383
StringAssert . Contains ( "End Property" , actualCode ) ;
389
- //Assert.AreEqual(expectedCode.Trim(), actualCode);
390
384
}
391
385
392
386
[ Test ]
@@ -397,26 +391,16 @@ public void EncapsulatePrivateField_Defaults()
397
391
const string inputCode =
398
392
@"|Private fizz As Integer" ;
399
393
400
- // const string expectedCode =
401
- // @"Private fizz_1 As Integer
402
-
403
- //Public Property Get Fizz() As Integer
404
- // Fizz = fizz_1
405
- //End Property
406
-
407
- //Public Property Let Fizz(ByVal value As Integer)
408
- // fizz_1 = value
409
- //End Property
410
- //";
411
394
var presenterAction = Support . UserAcceptsDefaults ( ) ;
395
+ var rhsParameterName = Support . RhsParameterNameBuilder ( "Fizz" ) ;
396
+
412
397
var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
413
398
StringAssert . Contains ( "Public Property Get Fizz() As Integer" , actualCode ) ;
414
399
StringAssert . Contains ( "Public Property Let Fizz(" , actualCode ) ;
415
- StringAssert . Contains ( $ "(ByVal { Param ( "Fizz" ) } As Integer)", actualCode ) ;
400
+ StringAssert . Contains ( $ "(ByVal { rhsParameterName } As Integer)", actualCode ) ;
416
401
StringAssert . Contains ( "Fizz = fizz_1" , actualCode ) ;
417
- StringAssert . Contains ( $ "fizz_1 = { Param ( "Fizz" ) } ", actualCode ) ;
402
+ StringAssert . Contains ( $ "fizz_1 = { rhsParameterName } ", actualCode ) ;
418
403
StringAssert . Contains ( "End Property" , actualCode ) ;
419
- //Assert.AreEqual(expectedCode.Trim(), actualCode);
420
404
}
421
405
422
406
[ Test ]
@@ -428,10 +412,12 @@ public void EncapsulatePrivateField_DefaultsAsUDT()
428
412
@"|Private fizz As Integer" ;
429
413
430
414
var presenterAction = Support . UserAcceptsDefaults ( convertFieldToUDTMember : true ) ;
415
+ var rhsParameterName = Support . RhsParameterNameBuilder ( "Fizz" ) ;
416
+
431
417
var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
432
418
StringAssert . Contains ( "Fizz As Integer" , actualCode ) ;
433
419
StringAssert . Contains ( $ "this As { Support . StateUDTDefaultType } ", actualCode ) ;
434
- StringAssert . Contains ( $ "this.Fizz = { Param ( "Fizz" ) } ", actualCode ) ;
420
+ StringAssert . Contains ( $ "this.Fizz = { rhsParameterName } ", actualCode ) ;
435
421
}
436
422
437
423
[ Test ]
@@ -454,14 +440,15 @@ Sub Bar(ByVal name As Integer)
454
440
455
441
var validator = EncapsulateFieldValidationsProvider . NameOnlyValidator ( NameValidators . Default ) ;
456
442
var enapsulationIdentifiers = new EncapsulationIdentifiers ( "fizz" , validator ) { Property = "Name" } ;
443
+ var rhsParameterName = Support . RhsParameterNameBuilder ( "Name" ) ;
457
444
458
445
var actualCode = Support . RefactoredCode ( inputCode . ToCodeString ( ) , presenterAction ) ;
459
446
StringAssert . AreEqualIgnoringCase ( enapsulationIdentifiers . TargetFieldName , "fizz" ) ;
460
447
StringAssert . Contains ( $ "Private { enapsulationIdentifiers . TargetFieldName } As Integer", actualCode ) ;
461
448
StringAssert . Contains ( "Property Get Name" , actualCode ) ;
462
449
StringAssert . Contains ( "Property Let Name" , actualCode ) ;
463
450
StringAssert . Contains ( $ "Name = { enapsulationIdentifiers . TargetFieldName } ", actualCode ) ;
464
- StringAssert . Contains ( $ "{ enapsulationIdentifiers . TargetFieldName } = { Param ( "Name" ) } ", actualCode ) ;
451
+ StringAssert . Contains ( $ "{ enapsulationIdentifiers . TargetFieldName } = { rhsParameterName } ", actualCode ) ;
465
452
}
466
453
467
454
[ Test ]
0 commit comments