public override void visit(program_name pn)
{
if (pn != null)
{
ProgramKeyword = true;
}
}
public program_module NewProgramModule(program_name progName, Object optHeadCompDirs,
uses_list mainUsesClose, syntax_tree_node progBlock, Object optPoint, LexLocation loc)
{
var progModule = new program_module(progName, mainUsesClose, progBlock as block, null, loc);
progModule.Language = LanguageId.PascalABCNET;
if (optPoint == null && progBlock != null)
{
var fp = progBlock.source_context.end_position;
var err_stn = progBlock;
if ((progBlock is block) && (progBlock as block).program_code != null &&
(progBlock as block).program_code.subnodes != null &&
(progBlock as block).program_code.subnodes.Count > 0)
{
err_stn = (progBlock as block).program_code.subnodes[
(progBlock as block).program_code.subnodes.Count - 1];
}
parsertools.errors.Add(new PABCNETUnexpectedToken(parsertools.CurrentFileName,
StringResources.Get("TKPOINT"),
new SourceContext(fp.line_num, fp.column_num + 1, fp.line_num, fp.column_num + 1, 0, 0),
err_stn));
}
return(progModule);
}
public override void visit(program_name _program_name)
{
text = "program name: " + _program_name.prog_name.name;
}
public virtual void visit(program_name _program_name)
{
DefaultVisit(_program_name);
}
public virtual void post_do_visit(program_name _program_name)
{
}
public override void visit(program_name _program_name)
{
DefaultVisit(_program_name);
pre_do_visit(_program_name);
visit(program_name.prog_name);
post_do_visit(_program_name);
}
public virtual void visit(program_name _program_name)
{
}
public override void visit(program_name _program_name)
{
AddPossibleComments(_program_name, true, false);
_program_name.prog_name.visit(this);
}
public virtual void visit(program_name _program_name)
{
}
public virtual void visit(program_name _program_name)
{
DefaultVisit(_program_name);
}
public override void visit(program_name _program_name)
{
prepare_node(_program_name.prog_name, "program name");
}
public override void visit(program_name _program_name)
{
executer.visit(_program_name);
if (_program_name.prog_name != null)
this.visit((dynamic)_program_name.prog_name);
}
