Skip to content

Commit

Permalink
Updated test to exactly match #2873 issue description
Browse files Browse the repository at this point in the history
  • Loading branch information
BZngr committed Mar 23, 2017
1 parent ae5bc92 commit 928a878
Showing 1 changed file with 7 additions and 6 deletions.
Expand Up @@ -159,12 +159,13 @@ public static string[] LocalVariable_NameInUseOtherProperty_SplitToken()
return splitToken;
}

//Replicates issue #2873 : AssignedByValParameter quick fix needs to use `Set` for reference types.
public static string LocalVariableAssignment_UsesSet_Input()
{
return
@"
Public Sub Foo(FirstArg As Long, ByVal arg1 As Range)
arg1 = Range(""A1: C4"")
Public Sub Foo(ByVal target As Range)
Set target = Selection
End Sub"
;

Expand All @@ -174,10 +175,10 @@ public static string LocalVariableAssignment_UsesSet_Expected()
{
return
@"
Public Sub Foo(FirstArg As Long, ByVal arg1 As Range)
Dim localArg1 As Range
Set localArg1 = arg1
localArg1 = Range(""A1: C4"")
Public Sub Foo(ByVal target As Range)
Dim localTarget As Range
Set localTarget = target
Set localTarget = Selection
End Sub"
;

Expand Down

0 comments on commit 928a878

Please sign in to comment.