internal void MapVirtualMethods() { if (BaseType != null) { BaseType.MapVirtualMethods(); foreach (KeyValuePair <HLMethod, HLMethod> kv in BaseType.VirtualMap) { VirtualMap[kv.Key] = kv.Value; } } foreach (HLMethod method in VirtualMap.Keys.ToList()) { IMethodDefinition definition = TypeHelper.GetMethod(Definition, method.Definition, true); if (definition != Dummy.MethodDefinition) { VirtualMap[method] = HLDomain.GetOrCreateMethod(definition); } } List <HLMethod> methodsVirtuals = Methods.FindAll(m => m.IsVirtual); foreach (HLMethod method in methodsVirtuals) { IMethodDefinition definition = TypeHelper.GetMethod(Definition, method.Definition, true); if (definition == Dummy.MethodDefinition) { VirtualMap[method] = method; } else { VirtualMap[method] = HLDomain.GetOrCreateMethod(definition); } } }
private HLLocation ProcessCreateDelegateInstanceExpression(ICreateDelegateInstance pExpression) { HLLocation locationInstance = null; if (pExpression.Instance != null) { locationInstance = ProcessExpression(pExpression.Instance); } HLMethod methodCalled = HLDomain.GetOrCreateMethod(pExpression.MethodToCallViaDelegate); HLLocation locationDelegate = HLTemporaryLocation.Create(CreateTemporary(HLDomain.GetOrCreateType(pExpression.Type))); mCurrentBlock.EmitNewDelegate(locationDelegate.Type, locationDelegate.AddressOf(), locationInstance, methodCalled, pExpression.IsVirtualDelegate); return(locationDelegate); }
private HLLocation ProcessMethodCallExpression(IMethodCall pExpression) { List <HLLocation> locationsParameters = new List <HLLocation>(); if (pExpression.ThisArgument.Type.TypeCode != PrimitiveTypeCode.Invalid) { locationsParameters.Add(ProcessExpression(pExpression.ThisArgument)); } else if (pExpression.MethodToCall.IsStatic) { HLType typeContainer = null; if (pExpression.MethodToCall.ContainingType.ResolvedType.IsValueType) { typeContainer = HLDomain.GetOrCreateType(MutableModelHelper.GetManagedPointerTypeReference(pExpression.MethodToCall.ContainingType, HLDomain.Host.InternFactory, pExpression.MethodToCall.ContainingType)); } else { typeContainer = HLDomain.GetOrCreateType(pExpression.MethodToCall.ContainingType); } locationsParameters.Add(HLNullLocation.Create(typeContainer)); } foreach (IExpression argument in pExpression.Arguments) { locationsParameters.Add(ProcessExpression(argument)); } HLLocation locationReturn = null; HLMethod methodCalled = HLDomain.GetOrCreateMethod(pExpression.MethodToCall); if (methodCalled.ReturnType.Definition.TypeCode != PrimitiveTypeCode.Void) { locationReturn = HLTemporaryLocation.Create(CreateTemporary(methodCalled.ReturnType)); } mCurrentBlock.EmitCall(methodCalled, pExpression.IsVirtualCall, locationReturn, locationsParameters); return(locationReturn); }
private HLLocation ProcessCreateObjectInstanceExpression(ICreateObjectInstance pExpression) { HLMethod methodCalled = HLDomain.GetOrCreateMethod(pExpression.MethodToCall); HLLocation locationThis = HLTemporaryLocation.Create(CreateTemporary(methodCalled.Container)); List <HLLocation> locationsParameters = new List <HLLocation>(); if (methodCalled.Container == HLDomain.SystemString) { locationsParameters.Add(locationThis.AddressOf()); } else { mCurrentBlock.EmitNewObject(methodCalled.Container, locationThis.AddressOf()); locationsParameters.Add(locationThis); } foreach (IExpression argument in pExpression.Arguments) { locationsParameters.Add(ProcessExpression(argument)); } mCurrentBlock.EmitCall(methodCalled, false, null, locationsParameters); return(locationThis); }