From bd5f98006cb88fd945b577160b259b6c2889f5db Mon Sep 17 00:00:00 2001 From: handa Date: Mon, 20 Jul 2009 07:05:30 +0000 Subject: [PATCH] *** empty log message *** --- MExpression.cs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/MExpression.cs b/MExpression.cs index 3c43747..588a5dc 100644 --- a/MExpression.cs +++ b/MExpression.cs @@ -7,7 +7,7 @@ using M17N.Core; namespace M17N.Core { - public delegate object MEvaluator (MExpression args); + public delegate object MEvaluator (MExpression args, MPlist bindings); public class MFunction { @@ -16,7 +16,7 @@ namespace M17N.Core public static Dictionary CommonTable = new Dictionary (); - public MFunction (MSymbol name, MEvaluator evaluator) + internal MFunction (MSymbol name, MEvaluator evaluator) { this.evaluator = evaluator; CommonTable[name] = this; @@ -29,9 +29,9 @@ namespace M17N.Core dict[name] = this; } - public object Call (MExpression args) + public object Call (MExpression args, MPlist bindings) { - return evaluator (args); + return evaluator (args, bindings); } private object plus (MExpression args) -- 1.7.10.4