public override DynamicMetaObject BindInvokeMember(InvokeMemberBinder binder, DynamicMetaObject[] args)
{
Requires.NotNull(binder, nameof(binder));
ComMethodDesc method = null;
// See if this is actually a property set
ComBinder.ComInvokeMemberBinder comInvokeBinder = binder as ComBinder.ComInvokeMemberBinder;
if ((comInvokeBinder != null) && (comInvokeBinder.IsPropertySet))
{
DynamicMetaObject value = args[args.Length - 1];
bool holdsNull = value.Value == null && value.HasValue;
if (!_self.TryGetPropertySetter(binder.Name, out method, value.LimitType, holdsNull))
{
_self.TryGetPropertySetterExplicit(binder.Name, out method, value.LimitType, holdsNull);
}
}
// Otherwise, try property get
if (method == null)
{
if (!_self.TryGetMemberMethod(binder.Name, out method))
{
_self.TryGetMemberMethodExplicit(binder.Name, out method);
}
}
if (method != null)
{
List <ParameterExpression> temps = new List <ParameterExpression>();
List <Expression> initTemps = new List <Expression>();
bool[] isByRef = ComBinderHelpers.ProcessArgumentsForCom(method, ref args, temps, initTemps);
return(BindComInvoke(args, method, binder.CallInfo, isByRef, temps, initTemps));
}
return(base.BindInvokeMember(binder, args));
}
public override DynamicMetaObject BindSetIndex(SetIndexBinder binder, DynamicMetaObject[] indexes, DynamicMetaObject value)
{
IDispatchComObject target = _callable.DispatchComObject;
string name = _callable.MemberName;
bool holdsNull = value.Value == null && value.HasValue;
if (target.TryGetPropertySetter(name, out ComMethodDesc method, value.LimitType, holdsNull) ||
target.TryGetPropertySetterExplicit(name, out method, value.LimitType, holdsNull))
{
List <ParameterExpression> temps = new List <ParameterExpression>();
List <Expression> initTemps = new List <Expression>();
bool[] isByRef = ComBinderHelpers.ProcessArgumentsForCom(method, ref indexes, temps, initTemps);
isByRef = isByRef.AddLast(false);
// Convert the value to the target type
DynamicMetaObject updatedValue = new DynamicMetaObject(
value.CastOrConvertMethodArgument(
value.LimitType,
name,
"SetIndex",
allowCastingToByRefLikeType: false,
temps,
initTemps),
value.Restrictions);
var result = BindComInvoke(method, indexes.AddLast(updatedValue), binder.CallInfo, isByRef, temps, initTemps);
// Make sure to return the value; some languages need it.
return(new DynamicMetaObject(
Expression.Block(result.Expression, Expression.Convert(value.Expression, typeof(object))),
result.Restrictions
));
}
return(base.BindSetIndex(binder, indexes, value));
}
