private static OldClass DefaultExceptionCreator(string name, object baseType)
{
Tuple bases = (baseType == null) ? Tuple.MakeTuple() : Tuple.MakeTuple(baseType);
FieldIdDict dict = new FieldIdDict();
dict[SymbolTable.Module] = "exceptions";
OldClass oc = new OldClass(name, bases, dict);
oc.SetAttr(DefaultContext.Default, SymbolTable.Init, exceptionInitMethod);
oc.SetAttr(DefaultContext.Default, SymbolTable.GetItem, exceptionGetItemMethod);
oc.SetAttr(DefaultContext.Default, SymbolTable.String, exceptionStrMethod);
return(oc);
}
private static OldClass SyntaxErrorExceptionCreator(string name, object baseType)
{
OldClass syntaxError = DefaultExceptionCreator(name, baseType);
syntaxError.SetAttr(DefaultContext.Default, SymbolTable.String, syntaxErrorStrMethod);
return(syntaxError);
}