public override Type GenCode(ILGenerator ilGenerator, TypeBuilder parent, FieldBuilder IsBreakFields, List <FieldBuilder> level, Label endLabel)
{
FieldBuilder field = parent.DefineField(Name, v.Var_type.MyType(), FieldAttributes.Public);
ilGenerator.Emit(OpCodes.Ldarg_0); //meto el this
Asig.GenCode(ilGenerator, parent, IsBreakFields, level, endLabel); //meto el valor a asignar en la pila
ilGenerator.Emit(OpCodes.Stfld, field); //asigna el valor del argumento al campo field
v.VarbBuilder = field; //guardo el FieldBuilder de la variable para usarlo en el GenCode de VariableNode
return(null);
}
public override Type GenCode(ILGenerator ilGenerator, TypeBuilder parent, FieldBuilder IsBreakFields, List <FieldBuilder> level, Label endLabel)
{
//creo una clase para el for
TypeBuilder forClass = parent.DefineNestedType("For" + Utils.AutoNumeric, TypeAttributes.NestedPublic | TypeAttributes.Class); //defino la clase anidada
ConstructorBuilder forConstructor = forClass.DefineConstructor(MethodAttributes.Public, CallingConventions.Standard, new List <Type>()
{
parent, typeof(int), typeof(int)
}.ToArray());
ILGenerator ilFor = forConstructor.GetILGenerator(); //cojo el generador de la clase del for
//creando el campo 'parent'
FieldBuilder forParent = forClass.DefineField("parent", parent, FieldAttributes.Public); //defino el campo parent del for
ilFor.Emit(OpCodes.Ldarg_0); //meto el this
ilFor.Emit(OpCodes.Ldarg_1); //meto el padre en la pila
ilFor.Emit(OpCodes.Stfld, forParent); //el padre ahora es el for (this.parent = forParent)
//creando el campo 'Break'
FieldBuilder field = forClass.DefineField("Break", typeof(bool), FieldAttributes.Public);
ilFor.Emit(OpCodes.Ldarg_0); //meto el this
ilFor.Emit(OpCodes.Ldc_I4_0); //meto un cero en la pila
ilFor.Emit(OpCodes.Stfld, field); //crea el campo con false
//creando el campo del i
FieldBuilder index = forClass.DefineField(Name, typeof(int), FieldAttributes.Public); //i del for (de la clase)
ilFor.Emit(OpCodes.Ldarg_0); //meto el this
ilFor.Emit(OpCodes.Ldarg_2); //meto el padre en la pila
ilFor.Emit(OpCodes.Stfld, index); //el padre ahora es el for (this.parent = forParent)
//Type asignType = Asig.GenCode(ilFor, forClass, field,level, endLabel); //genero el codigo de la asignacion (mete la asignacion en la pila)
//ilFor.Emit(OpCodes.Stfld, index); //actualizo el valor de la asignacion
varFor.VarbBuilder = index;
//creando el to del for
FieldBuilder toBuilder = forClass.DefineField("To" + Utils.AutoNumeric, typeof(int), FieldAttributes.Public);
//LocalBuilder to = ilFor.DeclareLocal(typeof(int)); //declaro el to del for (para quedarme con el valor)
ilFor.Emit(OpCodes.Ldarg_0); //meto el this
ilFor.Emit(OpCodes.Ldarg_3); //meto el padre en la pila
ilFor.Emit(OpCodes.Stfld, toBuilder); //el padre ahora es el for (this.parent = forParent)
//Type toType = To.GenCode(ilFor, forClass, field, level, endLabel); //en el tope esta el valor del to
//ilFor.Emit(OpCodes.Stfld, toBuilder); //actualizo el valor de la asignacion
//Cerrar el constructor
ilFor.Emit(OpCodes.Ret);
//creo el metodo donde se encuentra el body
MethodBuilder bodyBuilder = forClass.DefineMethod("ForBody", MethodAttributes.Public, CallingConventions.HasThis, typeof(void), new Type[] { });
ILGenerator ilBody = bodyBuilder.GetILGenerator();
//comienza la generacion de codigo del for
Label start = ilBody.DefineLabel();
Label end = ilBody.DefineLabel();
//comienza el for
//meto en el tope el campo this.index
ilBody.MarkLabel(start); //defino el comienzo del for
ilBody.Emit(OpCodes.Ldarg_0); //meto el this
ilBody.Emit(OpCodes.Ldfld, index); //meto la i del for
//meto en el campo this.toBuilder
ilBody.Emit(OpCodes.Ldarg_0); //meto el this
ilBody.Emit(OpCodes.Ldfld, toBuilder); //meto el to del for
ilBody.Emit(OpCodes.Bgt, end); //si i > to se acabo el for
level.Add(forParent);
//genero el codigo del body
Type bodyType = Body.GenCode(ilBody, forClass, field, level, end);
level.RemoveAt(level.Count - 1);
ilBody.Emit(OpCodes.Ldarg_0);
ilBody.Emit(OpCodes.Ldfld, field);
ilBody.Emit(OpCodes.Ldc_I4_1);
ilBody.Emit(OpCodes.Beq, end);
//actualizo this.index
ilBody.Emit(OpCodes.Ldarg_0); //meto el this
ilBody.Emit(OpCodes.Ldarg_0); //meto el this
ilBody.Emit(OpCodes.Ldfld, index); //busco el valor de this.i y lo dejo en el tope
ilBody.Emit(OpCodes.Ldc_I4_1); //meto el 1
ilBody.Emit(OpCodes.Add); //i + 1
ilBody.Emit(OpCodes.Stfld, index); //i = i + 1 (uso el replace estatico porque lo que tengo en el tope es un valor y no una referencia)
ilBody.Emit(OpCodes.Br, start); //comienza de nuevo el for
ilBody.MarkLabel(end); //final
ilBody.Emit(OpCodes.Ret); //se acabo el metodo del body del for
forClass.CreateType(); //creo el tipo de la clase for
// Crear una instancia del tipo que representa al for.
ilGenerator.Emit(OpCodes.Ldarg_0);
Asig.GenCode(ilGenerator, parent, IsBreakFields, level, endLabel);
To.GenCode(ilGenerator, parent, IsBreakFields, level, endLabel);
ilGenerator.Emit(OpCodes.Newobj, forConstructor);
// Llamar al método que representa el cuerpo del for.
ilGenerator.Emit(OpCodes.Callvirt, bodyBuilder);
return(null); //el for no retorna valor
}
