This question is locked. New answers and comments are not allowed.
I wanted to make you aware of a couple of problems with the conversion of the following code to VB.net. When converted, this is converting the Lambda expression into a do loop. Also, the _ in the function declaration was giving me fits trying to figure out what that should be. I did eventually determine that the _ simply refers to a variable that you don't care what the return value is, and was able to get this converted (finally) with a different code conversion project, but I wanted to make you aware of the issue so that you can have a chance to try to fix the issue. I have also attached what I hope is the converted form of this function. Just trying to learn what this project is doing, so I may not be totally correct :)
public
void
Install(IWindsorContainer container, IConfigurationStore store)
{
container.Register(AllTypes
.FromAssemblyContaining(
typeof
(SaveZombieIncidentTask))
.BasedOn(
typeof
(IRequestHandler<,>))
.Unless(t => t.IsGenericTypeDefinition)
.WithService.Select((_, baseTypes) =>
{
return
from t
in
baseTypes
where t.IsGenericType
let td = t.GetGenericTypeDefinition()
where td ==
typeof
(IRequestHandler<,>)
select t;
}).LifestyleTransient());
}
Public
Sub
Install(container
As
Castle.Windsor.IWindsorContainer, store
As
Castle.MicroKernel.SubSystems.Configuration.IConfigurationStore)
Implements
Castle.MicroKernel.Registration.IWindsorInstaller.Install
container.Register(AllTypes.FromAssemblyContaining(
GetType
(EmployeesTask)).BasedOn(
GetType
(IRequestHandler(Of ,))).Unless(
Function
(t) t.IsGenericTypeDefinition).WithService.
Select
(
Function
(MyType, baseTypes) _
From t
In
baseTypes _
Where t.IsGenericType _
Let
td = t.GetGenericTypeDefinition() _
Where td
Is
GetType
(IRequestHandler(Of ,)) _
Select
t).LifestyleTransient())
End
Sub