Adding option to exclude quoted lambda comment

Author: SteveWilkes

ReadableExpressions.UnitTests/WhenTranslatingLambdas.cs

@@ -104,6 +104,18 @@ public void ShouldTranslateANestedQuotedLambda()
             Assert.AreEqual(EXPECTED.TrimStart(), translated);
         }
 
+        [TestMethod]
+        public void ShouldTranslateQuotedLambdaWithNoAnnotation()
+        {
+            Expression<Func<int, double>> intToDouble = i => i;
+
+            var quotedLambda = Expression.Quote(intToDouble);
+
+            var translated = quotedLambda.ToReadableString(o => o.NoQuotedLambdaComments);
+
+            Assert.AreEqual("i => (double)i", translated);
+        }
+
         [TestMethod]
         public void ShouldTranslateRuntimeVariables()
         {

ReadableExpressions/TranslationSettings.cs

@@ -25,5 +25,20 @@ public TranslationSettings UseExplicitGenericParameters
         }
 
         internal bool UseImplicitGenericParameters { get; private set; }
+
+        /// <summary>
+        /// Do not annotate a Quoted Lambda Expression with a comment indicating that it has 
+        /// been Quoted.
+        /// </summary>
+        public TranslationSettings NoQuotedLambdaComments
+        {
+            get
+            {
+                DoNotCommentQuotedLambdas = true;
+                return this;
+            }
+        }
+
+        internal bool DoNotCommentQuotedLambdas { get; private set; }
     }
 }

ReadableExpressions/Translators/QuotedLambdaExpressionTranslator.cs

@@ -14,6 +14,11 @@ public override string Translate(Expression expression, TranslationContext conte
         {
             var quote = (UnaryExpression)expression;
 
+            if (context.Settings.DoNotCommentQuotedLambdas)
+            {
+                return context.TranslateAsCodeBlock(quote.Operand);
+            }
+
             var comment = ReadableExpression.Comment("Quoted to induce a closure:");
             var quotedLambdaBlock = Expression.Block(comment, quote.Operand);