我想我可能发现了一个错误,但我不确定。它可能是 我的语法错误,但编译器没有捕获。无论如何, 这就是我想要做的。基本上我写了自己的 存储库类,基本上只包装Fluent存储库 类。所以这是相关的代码:
Public Class GenericRepository(Of T As IHasIntId)
Private _fluentRepos As FluentNHibernate.Framework.IRepository
Public Sub New(ByVal FluentRepository As
FluentNHibernate.Framework.IRepository)
_fluentRepos = FluentRepository
End Sub
Private Sub New()
End Sub
Public Function GetById(ByVal Id As Integer) As T
Return Query(Function(x As T) (x.Id = Id)).FirstOrDefault
End Function
Public Function Query(ByVal w As Expression(Of System.Func(Of T,
Boolean))) As IList(Of T)
Return _fluentRepos.Query(Of T)(w).ToList()
End Function
End Class
然后我写了两个单元测试,一个可以通过 InMemoryRepository和一个将使用实际的NHibernate会话 打到真正的数据库。 他们在这里:
<TestMethod()> Public Sub InMemoryTest()
Dim inmemRepos As New InMemoryRepository()
Dim p As New Product()
Dim id As Integer = 5
p.Id = id
p.Title = "my product"
inmemRepos.Save(p)
Dim genRepos As New GenericRepository(Of Product)(inmemRepos)
Dim foundP = genRepos.GetById(id)
Assert.AreEqual(p.Title, foundP.Title)
End Sub
<TestMethod()> Public Sub DatabaseTest()
Dim session = NHibernateSessionManager.Instance.GetSession()
Dim flRepos As New Repository(session)
Dim genRepos As New GenericRepository(Of Product)(flRepos)
Dim id As Integer = 1
Dim p = genRepos.GetById(id)
Assert.IsNotNull(p)
Assert.AreEqual(id, p.Id)
End Sub
InMemoryTest已通过,DatabaseTest失败。例外 来自DatabaseTest的类型转换,从int到产品(或 也许相反。)我能够“修复”它。在里面 流畅的NHibernate代码我更改了Repository上的Query方法 来自:
return _session.Linq<T>().Where(where).ToArray();
到
return _session.Linq<T>().Where(where.Compile()).ToArray();
现在两个测试都通过了。 Fluent NHibernate中的所有单元测试 项目通过任何一种方式。
答案 0 :(得分:2)
Fluent NHibernate邮件列表中的answer that you received很可能是正确的。也就是说,这是Linq对NHibernate的一个错误,而不是Fluent NHibernate,这是由VB编译器为C#生成不同的表达式树引起的。