From 9a92978d1e62e3abd8e23b5b243d04d429dfaba5 Mon Sep 17 00:00:00 2001
From: Jim Pryor <profjim@jimpryor.net>
Date: Thu, 23 Sep 2010 04:58:47 -0400
Subject: [PATCH] lambda eval: constants now seem OK

Signed-off-by: Jim Pryor <profjim@jimpryor.net>
---
 lambda_evaluator.mdwn | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lambda_evaluator.mdwn b/lambda_evaluator.mdwn
index d46fc785..3fba8fad 100644
--- a/lambda_evaluator.mdwn
+++ b/lambda_evaluator.mdwn
@@ -38,6 +38,7 @@ let and = \l r. l r false in
 )
 </textarea>
 <input id="PARSE" value="Normalize" type="button">
+<input id="ETA" type="checkbox">do eta-reductions too
 <noscript><p>You may not see it because you have JavaScript turned off. Uffff!</p></noscript>
 <script src="/code/lambda.js"></script>
 <script src="/code/tokens.js"></script>
@@ -86,7 +87,7 @@ Object.prototype.error = function (message, t) {
             // string = JSON.stringify(expr, ['key', 'name', 'message', 'value', 'arity', 'first', 'second', 'tag', 'variable', 'left', 'right', 'bound', 'body' ], 4);
 //			string = expr.to_string() + "\n\n~~>\n\n";
 			string = '';
-			string = string + reduce(expr, false, false).to_string();
+			string = string + reduce(expr, document.getElementById('ETA').value, false).to_string();
         } catch (e) {
             string = JSON.stringify(e, ['name', 'message', 'from', 'to', 'key',
                     'value', 'arity', 'first', 'second', 'third', 'fourth'], 4);
-- 
2.11.0