X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=lambda_evaluator.mdwn;h=87797dfb037d1764a4c40079010ffa73922bd219;hp=5b49732eca9f9e0a77e2e34842b2ee8ee382bba8;hb=a3b99e629ce7473014b705dbb8ea9c4321639805;hpb=af093f83afc2d42039b3ed3036531386ba016587 diff --git a/lambda_evaluator.mdwn b/lambda_evaluator.mdwn index 5b49732e..87797dfb 100644 --- a/lambda_evaluator.mdwn +++ b/lambda_evaluator.mdwn @@ -78,12 +78,15 @@ Object.prototype.error = function (message, t) { var parse = make_parse(); function go(source) { - var string, tree; + var string, tree, expr; try { tree = parse(source); // string = JSON.stringify(tree, ['key', 'name', 'message', 'value', 'arity', 'first', 'second', 'third', 'fourth'], 4); - // string = JSON.stringify(tree.handler(), ['key', 'name', 'message', 'value', 'arity', 'first', 'second', 'tag', 'variable', 'left', 'right', 'bound', 'body' ], 4); - string = reduce(tree.handler(), false, false).to_string(); + expr = tree.handler(); + // 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(); } catch (e) { string = JSON.stringify(e, ['name', 'message', 'from', 'to', 'key', 'value', 'arity', 'first', 'second', 'third', 'fourth'], 4);