private static void Round(IILState <Complex> ils, IReadOnlyList <Node> arguments)
{
ils.Push(arguments.Check(2)[0]);
ils.Push(arguments[1]);
ils.Generator.Emit(OpCodes.Conv_I4);
ils.Generator.Emit(OpCodes.Call, _round);
}
private static void PwlDerivative(IILState <double> ils, IReadOnlyList <Node> arguments)
{
if (arguments.Count < 3)
{
throw new ArgumentMismatchException(3, arguments.Count);
}
int points = (arguments.Count - 1) / 2;
if (arguments.Count % 2 == 0)
{
throw new ArgumentMismatchException(points * 2 + 1, arguments.Count);
}
var il = ils.Generator;
// Create our array
ils.Push(arguments[0]);
ils.PushInt(points);
il.Emit(OpCodes.Newarr, typeof(Point));
for (var i = 0; i < points; i++)
{
il.Emit(OpCodes.Dup); // Make another reference to the array
ils.PushInt(i); // Set the index
// Create the point
ils.Push(arguments[i * 2 + 1]);
ils.Push(arguments[i * 2 + 2]);
il.Emit(OpCodes.Newobj, _point);
// Store the element
il.Emit(OpCodes.Stelem, typeof(Point));
}
il.Emit(OpCodes.Call, _pwlDerivative);
}
private static void If(IILState <double> ils, IReadOnlyList <Node> arguments)
{
arguments.Check(3);
ils.Push(arguments[0]);
ils.Push(0.5);
var lblElse = ils.Generator.DefineLabel();
var lblEnd = ils.Generator.DefineLabel();
ils.Generator.Emit(OpCodes.Ble_S, lblElse);
ils.Push(arguments[1]);
ils.Generator.Emit(OpCodes.Br_S, lblEnd);
ils.Generator.MarkLabel(lblElse);
ils.Push(arguments[2]);
ils.Generator.MarkLabel(lblEnd);
}
private static void Nint(IILState <Complex> ils, IReadOnlyList <Node> arguments)
{
ils.Push(arguments.Check(1)[0]);
ils.PushInt(0);
ils.Generator.Emit(OpCodes.Call, _round);
}
// One-argument functions private static void Zero(IILState <Complex> ils, IReadOnlyList <Node> arguments) => ils.Push(new Complex());
private static void Decibels(IILState <double> ils, IReadOnlyList <Node> arguments)
{
ils.Call(HelperFunctions.Log10, arguments);
ils.Push(20.0);
ils.Generator.Emit(OpCodes.Mul);
}
private static void Square(IILState <double> ils, IReadOnlyList <Node> arguments)
{
ils.Push(arguments.Check(1)[0]); ils.Generator.Emit(OpCodes.Dup); ils.Generator.Emit(OpCodes.Mul);
}
// One-argument functions private static void Zero(IILState <double> ils, IReadOnlyList <Node> arguments) => ils.Push(0.0);