public override bool Visit(RoutineSection node)
{
declEnv.EnterNextContext();
Visit((Section)node);
traverse(node.block);
declEnv.EnterNextContext();
return(true);
}
// non-constructor method
public override bool Visit(RoutineSection node)
{
outputCode("{", true, true);
PushIdent();
Visit((Section)node);
traverse(node.block);
PopIdent();
outputCode("}", true, true);
return(true);
}
bool ProcessConstructor(RoutineSection node, MethodType t)
{
insideConstructor = true;
ClassRefType r = t.funcret as ClassRefType;
string classid = r.qualifid;
outputCode("{", true, true);
PushIdent();
outputCode("result = new " + classid + "();", true, true);
Visit((Section)node);
traverse(node.block);
PopIdent();
outputCode("}", true, true);
//outputCode(" result ", true, true);
outputCode("", false, true);
insideConstructor = false;
return(true);
}
public virtual T Visit(RoutineSection node)
{
Visit((Section)node);
return(traverse(node.block));
}
public override bool Visit(RoutineSection node)
{
Visit((Section)node);
TraversePrint(node.block);
return(true);
}
