public static Type FindType(QualifiedName name)
{
Type t = null;
string typename = name.ToString();
foreach(Assembly a in AppDomain.CurrentDomain.GetAssemblies())
{
t = a.GetType(typename, false);
if(t != null)
return t;
}
throw new Exception("Typ '" + typename + "' nebyl nalezen");
}
public NewExpression(QualifiedName TypeName, NamedArgumentList Arguments)
{
this.TypeName = TypeName;
this.Arguments = Arguments;
}
public CastExpression(IExpression Expr, QualifiedName TypeName)
{
this.Expr = Expr;
this.TypeName = TypeName;
}
public TypeLiteral(QualifiedName Name)
{
this.Name = Name;
}
public CatchStatement(QualifiedName ExceptionType, string ID, IStatement Handler)
{
this.ExceptionType = ExceptionType;
this.ID = ID;
this.Handler = Handler;
}
