public void CreateSimpleDefCommand()
{
IList<ParameterExpression> parameters = new ParameterExpression[] { new ParameterExpression("a", null, false), new ParameterExpression("b", null, false) };
ICommand body = new SetCommand("c", new ConstantExpression(1));
DefCommand command = new DefCommand("foo", parameters, body);
Assert.AreEqual("foo", command.Name);
Assert.AreEqual(parameters, command.ParameterExpressions);
Assert.AreEqual(body, command.Body);
}
public void CreateSimpleDefCommand()
{
IList <ParameterExpression> parameters = new ParameterExpression[] { new ParameterExpression("a", null, false), new ParameterExpression("b", null, false) };
ICommand body = new SetCommand("c", new ConstantExpression(1));
DefCommand command = new DefCommand("foo", parameters, body);
Assert.AreEqual("foo", command.Name);
Assert.AreEqual(parameters, command.ParameterExpressions);
Assert.AreEqual(body, command.Body);
}
public void CreateFunctionsWithEmptyDocString()
{
DefCommand command = new DefCommand("foo", null, new PassCommand());
Machine machine = new Machine();
command.Execute(machine.Environment);
var func = machine.Environment.GetValue("foo");
var dfunc = (DefinedFunction)func;
Assert.IsNull(dfunc.GetValue("__doc__"));
Assert.IsTrue(dfunc.HasValue("__doc__"));
}
public void CreateFunctionsWithEmptyDocString()
{
DefCommand command = new DefCommand("foo", null, new PassCommand());
Machine machine = new Machine();
command.Execute(machine.Environment);
var func = machine.Environment.GetValue("foo");
var dfunc = (DefinedFunction)func;
Assert.IsNull(dfunc.GetValue("__doc__"));
Assert.IsTrue(dfunc.HasValue("__doc__"));
}
public void RaiseWhenNonDefaultArgumentFollowsDefaultArgument()
{
IList<ParameterExpression> parameters = new ParameterExpression[] { new ParameterExpression("a", new ConstantExpression(1), false), new ParameterExpression("b", null, false) };
ICommand body = new SetCommand("c", new ConstantExpression(1));
try
{
DefCommand command = new DefCommand("foo", parameters, body);
Assert.Fail("Exception expected");
}
catch (Exception ex)
{
Assert.IsInstanceOfType(ex, typeof(SyntaxError));
Assert.AreEqual("non-default argument follows default argument", ex.Message);
}
}
public void RaiseWhenNonDefaultArgumentFollowsDefaultArgument()
{
IList <ParameterExpression> parameters = new ParameterExpression[] { new ParameterExpression("a", new ConstantExpression(1), false), new ParameterExpression("b", null, false) };
ICommand body = new SetCommand("c", new ConstantExpression(1));
try
{
DefCommand command = new DefCommand("foo", parameters, body);
Assert.Fail("Exception expected");
}
catch (Exception ex)
{
Assert.IsInstanceOfType(ex, typeof(SyntaxError));
Assert.AreEqual("non-default argument follows default argument", ex.Message);
}
}
public void ExecuteSimpleDefCommand()
{
IList<ParameterExpression> parameters = new ParameterExpression[] { new ParameterExpression("a", null, false), new ParameterExpression("b", null, false) };
ICommand body = new SetCommand("c", new ConstantExpression(1));
DefCommand command = new DefCommand("foo", parameters, body);
Machine machine = new Machine();
command.Execute(machine.Environment);
var func = machine.Environment.GetValue("foo");
Assert.IsNotNull(func);
Assert.IsInstanceOfType(func, typeof(IFunction));
Assert.IsInstanceOfType(func, typeof(DefinedFunction));
var dfunc = (DefinedFunction)func;
Assert.AreEqual(parameters.Count, dfunc.Parameters.Count);
Assert.AreEqual(body, dfunc.Body);
}
public void ExecuteSimpleDefCommand()
{
IList <ParameterExpression> parameters = new ParameterExpression[] { new ParameterExpression("a", null, false), new ParameterExpression("b", null, false) };
ICommand body = new SetCommand("c", new ConstantExpression(1));
DefCommand command = new DefCommand("foo", parameters, body);
Machine machine = new Machine();
command.Execute(machine.Environment);
var func = machine.Environment.GetValue("foo");
Assert.IsNotNull(func);
Assert.IsInstanceOfType(func, typeof(IFunction));
Assert.IsInstanceOfType(func, typeof(DefinedFunction));
var dfunc = (DefinedFunction)func;
Assert.AreEqual(parameters.Count, dfunc.Parameters.Count);
Assert.AreEqual(body, dfunc.Body);
}
