Fix NH-2172 (Unrecognised method call in expression when using QueryOver queries in VB.Net) - updated fix to handle other comparisons (<, <=, >, >=)

SVN: trunk@5421

Author: FlukeFan

src/NHibernate.Test/Criteria/Lambda/QueryOverFixture.cs

@@ -56,12 +56,20 @@ public void StringEqualityInVisualBasic()
 			ICriteria expected =
 				CreateTestCriteria(typeof(Person))
 					.Add(Restrictions.Eq("Name", "test name"))
-					.Add(Restrictions.Not(Restrictions.Eq("Name", "test name")));
+					.Add(Restrictions.Not(Restrictions.Eq("Name", "test name")))
+					.Add(Restrictions.Gt("Name", "test name"))
+					.Add(Restrictions.Ge("Name", "test name"))
+					.Add(Restrictions.Lt("Name", "test name"))
+					.Add(Restrictions.Le("Name", "test name"));
 
 			IQueryOver<Person> actual =
 				CreateTestQueryOver<Person>()
 					.And(p => CompareString(p.Name, "test name", true) == 0)
-					.And(p => CompareString(p.Name, "test name", true) != 0);
+					.And(p => CompareString(p.Name, "test name", true) != 0)
+					.And(p => CompareString(p.Name, "test name", true) > 0)
+					.And(p => CompareString(p.Name, "test name", true) >= 0)
+					.And(p => CompareString(p.Name, "test name", true) < 0)
+					.And(p => CompareString(p.Name, "test name", true) <= 0);
 
 			AssertCriteriaAreEqual(expected, actual);
 		}

src/NHibernate/Impl/ExpressionProcessor.cs

@@ -315,37 +315,32 @@ private static ICriterion ProcessSimpleExpression(BinaryExpression be)
 			if (be.Left.NodeType == ExpressionType.Call && ((MethodCallExpression)be.Left).Method.Name == "CompareString")
 				return ProcessVisualBasicStringComparison(be);
 
-			string property = FindMemberExpression(be.Left);
-			System.Type propertyType = FindMemberType(be.Left);
+			return ProcessSimpleExpression(be.Left, be.Right, be.NodeType);
+		}
+
+		public static ICriterion ProcessSimpleExpression(Expression left, Expression right, ExpressionType nodeType)
+		{
+			string property = FindMemberExpression(left);
+			System.Type propertyType = FindMemberType(left);
 
-			object value = FindValue(be.Right);
+			object value = FindValue(right);
 			value = ConvertType(value, propertyType);
 
 			if (value == null)
-				return ProcessSimpleNullExpression(property, be.NodeType);
+				return ProcessSimpleNullExpression(property, nodeType);
 
-			if (!_simpleExpressionCreators.ContainsKey(be.NodeType))
-				throw new Exception("Unhandled simple expression type: " + be.NodeType);
+			if (!_simpleExpressionCreators.ContainsKey(nodeType))
+				throw new Exception("Unhandled simple expression type: " + nodeType);
 
-			Func<string, object, ICriterion> simpleExpressionCreator = _simpleExpressionCreators[be.NodeType];
+			Func<string, object, ICriterion> simpleExpressionCreator = _simpleExpressionCreators[nodeType];
 			ICriterion criterion = simpleExpressionCreator(property, value);
 			return criterion;
 		}
 
 		private static ICriterion ProcessVisualBasicStringComparison(BinaryExpression be)
 		{
 			var methodCall = (MethodCallExpression)be.Left;
-			switch(be.NodeType)
-			{
-				case ExpressionType.Equal:
-					return ProcessSimpleExpression(Expression.Equal(methodCall.Arguments[0], methodCall.Arguments[1]));
-
-				case ExpressionType.NotEqual:
-					return ProcessSimpleExpression(Expression.NotEqual(methodCall.Arguments[0], methodCall.Arguments[1]));
-
-				default:
-					throw new Exception("Unhandled expression: " + be);
-			}
+			return ProcessSimpleExpression(methodCall.Arguments[0], methodCall.Arguments[1], be.NodeType);
 		}
 
 		private static ICriterion ProcessSimpleNullExpression(string property, ExpressionType expressionType)