public static void Main(string[] args)
{
var parser = new Parser(new Lexer(new StringReader(source), "source.lola"));
if (parser.Parse() == false)
{
throw new InvalidOperationException();
}
var pgm = parser.Result;
var env = pgm.Instantiate <LoLaObject>();
env.RegisterFunction("Print", new NativeFunction(arglist =>
{
Console.WriteLine(string.Join("", arglist));
return(Value.Null);
}));
env.RegisterFunction("CreateCounter", new NativeFunction(arglist =>
{
var counter = 0;
var obj = new LoLaObject();
obj.RegisterFunction("GetValue", new NativeFunction(a => counter));
obj.RegisterFunction("Increment", new NativeFunction(a => ++ counter));
obj.RegisterFunction("Decrement", new NativeFunction(a => -- counter));
return(obj);
}));
var exe = env.Tap();
int cnt;
for (cnt = 0; cnt < 10000 && exe.Next(); cnt++)
{
;
}
Console.WriteLine("Finished in {0} steps!", cnt);
if (exe.Result != Value.Null)
{
Console.WriteLine("Result = {0}", exe.Result);
}
Console.ReadLine();
}
public EvaluationEnvironment(LoLaObject environment) :
base(environment)
{
}
