Fix Count Distinct on path with hql reserved words (nhibernate#3217)

Fixes nhibernate#3215

Author: bahusoid

src/NHibernate.Test/Async/NHSpecificTest/GH3215/FixtureByCode.cs

@@ -0,0 +1,64 @@
+//------------------------------------------------------------------------------
+// <auto-generated>
+//     This code was generated by AsyncGenerator.
+//
+//     Changes to this file may cause incorrect behavior and will be lost if
+//     the code is regenerated.
+// </auto-generated>
+//------------------------------------------------------------------------------
+
+
+using NHibernate.Cfg;
+using NHibernate.Cfg.MappingSchema;
+using NHibernate.Mapping.ByCode;
+using NUnit.Framework;
+
+namespace NHibernate.Test.NHSpecificTest.GH3215
+{
+	using System.Threading.Tasks;
+	[TestFixture]
+	public class ByCodeFixtureAsync : TestCaseMappingByCode
+	{
+		protected override HbmMapping GetMappings()
+		{
+			var mapper = new ModelMapper();
+
+			mapper.Class<Member>(rc =>
+			{
+				rc.Id(x => x.Code);
+				rc.Property(x => x.Name);
+				rc.Property(x => x.Date);
+			});
+
+			mapper.Class<Request>(rc =>
+			{
+				rc.Id(x => x.Id, m => m.Generator(Generators.GuidComb));
+				rc.ManyToOne(x => x.Member);
+			});
+			return mapper.CompileMappingForAllExplicitlyAddedEntities();
+		}
+
+		protected override bool AppliesTo(Dialect.Dialect dialect)
+		{
+			return TestDialect.SupportsCountDistinct;
+		}
+
+		protected override void Configure(Configuration configuration)
+		{
+			base.Configure(configuration);
+			configuration.SetProperty(Environment.Hbm2ddlKeyWords, "auto-quote");
+		}
+
+		[Test]
+		public async Task CountDistinctWithReservedWordsAsync()
+		{
+			using (var session = OpenSession())
+			{
+				var hql = "select  Count(DISTINCT r.Member.id), Count(DISTINCT Date(r.Member.Date)) from Request r";
+				var result = await (session.CreateQuery(hql).ListAsync());
+
+				Assert.That(result, Has.Count.EqualTo(1));
+			}
+		}
+	}
+}

src/NHibernate.Test/NHSpecificTest/GH3215/Entity.cs

@@ -0,0 +1,17 @@
+using System;
+
+namespace NHibernate.Test.NHSpecificTest.GH3215
+{
+	class Member
+	{
+		public virtual int Code { get; set; }
+		public virtual string Name { get; set; }
+		public virtual DateTime Date { get; set; }
+	}
+
+	class Request
+	{
+		public virtual Guid Id { get; set; }
+		public virtual Member Member { get; set; }
+	}
+}

src/NHibernate.Test/NHSpecificTest/GH3215/FixtureByCode.cs

@@ -0,0 +1,53 @@
+using NHibernate.Cfg;
+using NHibernate.Cfg.MappingSchema;
+using NHibernate.Mapping.ByCode;
+using NUnit.Framework;
+
+namespace NHibernate.Test.NHSpecificTest.GH3215
+{
+	[TestFixture]
+	public class ByCodeFixture : TestCaseMappingByCode
+	{
+		protected override HbmMapping GetMappings()
+		{
+			var mapper = new ModelMapper();
+
+			mapper.Class<Member>(rc =>
+			{
+				rc.Id(x => x.Code);
+				rc.Property(x => x.Name);
+				rc.Property(x => x.Date);
+			});
+
+			mapper.Class<Request>(rc =>
+			{
+				rc.Id(x => x.Id, m => m.Generator(Generators.GuidComb));
+				rc.ManyToOne(x => x.Member);
+			});
+			return mapper.CompileMappingForAllExplicitlyAddedEntities();
+		}
+
+		protected override bool AppliesTo(Dialect.Dialect dialect)
+		{
+			return TestDialect.SupportsCountDistinct;
+		}
+
+		protected override void Configure(Configuration configuration)
+		{
+			base.Configure(configuration);
+			configuration.SetProperty(Environment.Hbm2ddlKeyWords, "auto-quote");
+		}
+
+		[Test]
+		public void CountDistinctWithReservedWords()
+		{
+			using (var session = OpenSession())
+			{
+				var hql = "select  Count(DISTINCT r.Member.id), Count(DISTINCT Date(r.Member.Date)) from Request r";
+				var result = session.CreateQuery(hql).List();
+
+				Assert.That(result, Has.Count.EqualTo(1));
+			}
+		}
+	}
+}

src/NHibernate/Hql/Ast/ANTLR/Hql.g

@@ -600,7 +600,7 @@ vectorExpr
 // NOTE: handleDotIdent() is called immediately after the first IDENT is recognized because
 // the method looks a head to find keywords after DOT and turns them into identifiers.
 identPrimary
-	: identifier { HandleDotIdent(); }
+	: identifier {{ HandleDotIdent(); }}
 			( options {greedy=true;} : DOT^ ( identifier | o=OBJECT { $o.Type = IDENT; } ) )*
 			( ( op=OPEN^ { $op.Type = METHOD_CALL;} exprList CLOSE! )
 			)?