public CompiledMethod(CompiledClass parent,string name,BracketFragment parameterBlock,BracketFragment codeBlock,TypeFragment retType,bool isPublic){
Name=name;
Parent=parent;
CodeBlock=codeBlock;
Script=Parent.Script;
ParameterBlock=parameterBlock;
Type returnType=null;
if(retType!=null){
returnType=retType.FindType(Script);
if(returnType==null){
Error("Type '"+retType.Value+"' was not found.");
}
}
string methodName=Name;
MethodAttributes attrib=isPublic?MethodAttributes.Public:MethodAttributes.Private;
if(methodName=="new"){
methodName=".ctor";
attrib|=MethodAttributes.HideBySig|MethodAttributes.SpecialName|MethodAttributes.RTSpecialName;
}
// Does the parent base type define this method?
// If so, use it's name.
Type baseType=Parent.Builder.BaseType;
// Parse the parameter set right away:
ParseParameters();
MethodInfo mInfo=Types.GetOverload(baseType.GetMethods(),Name,ParameterTypes,true);
if(mInfo!=null){
methodName=mInfo.Name;
attrib|=MethodAttributes.Virtual|MethodAttributes.HideBySig;//|MethodAttributes.NewSlot;
}
bool isVoid=Types.IsVoid(returnType);
if(isVoid){
returnType=typeof(void);
}
Builder=Parent.Builder.DefineMethod(
methodName,
attrib,
returnType,
null
);
ApplyParameters();
ILStream=new NitroIL(Builder.GetILGenerator());
EndOfMethod=ILStream.DefineLabel();
if(!isVoid){
ReturnBay=ILStream.DeclareLocal(returnType);
}
}
public ConstructOperation(TypeFragment type,BracketFragment brackets,CompiledMethod method):base(method){
if(type==null){
Error("A constructor is missing the type to construct. E.g. new myClass();");
}
ObjectType=type.FindType(method.Script);
if(ObjectType==null){
Error("Couldn't find type '"+type+"'.");
}
// Compile the brackets - what types to they have?
Parameters=CompilationServices.CompileParameters(brackets,method);
SetConstructor();
}
public ConstructOperation(TypeFragment type, BracketFragment brackets, CompiledMethod method) : base(method)
{
if (type == null)
{
Error("A constructor is missing the type to construct. E.g. new myClass();");
}
ObjectType = type.FindType(method.Script);
if (ObjectType == null)
{
Error("Couldn't find type '" + type + "'.");
}
// Compile the brackets - what types to they have?
Parameters = CompilationServices.CompileParameters(brackets, method);
SetConstructor();
}
public override CompiledFragment Compile(CompiledMethod parent)
{
return(new ArrayOperation(parent, ArrayType.FindType(parent.Script), null, CompilationServices.CompileParameters(Defaults, parent)));
}
public CompiledMethod(CompiledClass parent, string name, BracketFragment parameterBlock, BracketFragment codeBlock, TypeFragment retType, bool isPublic)
{
Name = name;
Parent = parent;
CodeBlock = codeBlock;
Script = Parent.Script;
ParameterBlock = parameterBlock;
Type returnType = null;
if (retType != null)
{
returnType = retType.FindType(Script);
if (returnType == null)
{
Error("Type '" + retType.Value + "' was not found.");
}
}
string methodName = Name;
MethodAttributes attrib = isPublic?MethodAttributes.Public:MethodAttributes.Private;
if (methodName == "new")
{
methodName = ".ctor";
attrib |= MethodAttributes.HideBySig | MethodAttributes.SpecialName | MethodAttributes.RTSpecialName;
}
// Does the parent base type define this method?
// If so, use it's name.
Type baseType = Parent.Builder.BaseType;
// Parse the parameter set right away:
ParseParameters();
MethodInfo mInfo = Types.GetOverload(baseType.GetMethods(), Name, ParameterTypes, true);
if (mInfo != null)
{
methodName = mInfo.Name;
attrib |= MethodAttributes.Virtual | MethodAttributes.HideBySig; //|MethodAttributes.NewSlot;
}
bool isVoid = Types.IsVoid(returnType);
if (isVoid)
{
returnType = typeof(void);
}
Builder = Parent.Builder.DefineMethod(
methodName,
attrib,
returnType,
null
);
ApplyParameters();
ILStream = new NitroIL(Builder.GetILGenerator());
EndOfMethod = ILStream.DefineLabel();
if (!isVoid)
{
ReturnBay = ILStream.DeclareLocal(returnType);
}
}
