public void SettingPrivatePropertyFromOutsideContextOfClassShouldThrow()
{
const string name = "test";
var classWithPrivateMember = new ClassWithPrivateNameProperty();
var _ = DefaultRuntimeSupportClassFactory.DefaultVBScriptValueRetriever;
Assert.Throws <MissingMemberException>(() =>
_.SET(name, context: null, target: classWithPrivateMember, optionalMemberAccessor: "Name")
);
}
public void SettingPrivatePropertyFromWithinContextOfClassShouldWork()
{
const string name = "test";
var classWithPrivateMember = new ClassWithPrivateNameProperty();
var _ = DefaultRuntimeSupportClassFactory.DefaultVBScriptValueRetriever;
_.SET(name, context: classWithPrivateMember, target: classWithPrivateMember, optionalMemberAccessor: "Name");
Assert.Equal(
name,
_.CALL(context: classWithPrivateMember, target: classWithPrivateMember, member1: "Name")
);
}
