jackfiled
5e3ea6303e
重构语法树的部分，使用单独的类来抽象不同的非终结符节点。 **同时**，将`Pascal`语法的定义从测试项目中移动到核心项目中，在项目中只维护一份对于`Pascal`语法的定义。 Reviewed-on: PostGuard/Canon#23
41 lines
1.1 KiB
C#
41 lines
1.1 KiB
C#
using Canon.Core.Enums;
|
|
using Canon.Core.LexicalParser;
|
|
|
|
namespace Canon.Core.SyntaxNodes;
|
|
|
|
public class ProgramHead : NonTerminatedSyntaxNode
|
|
{
|
|
public override NonTerminatorType Type => NonTerminatorType.ProgramHead;
|
|
|
|
/// <summary>
|
|
/// 程序名称
|
|
/// </summary>
|
|
public IdentifierSemanticToken ProgramName
|
|
=> (IdentifierSemanticToken)Children[1].Convert<TerminatedSyntaxNode>().Token;
|
|
|
|
/// <summary>
|
|
/// 暂时意义不明的标识符列表
|
|
/// https://wiki.freepascal.org/Program_Structure/zh_CN
|
|
/// TODO: 查阅资料
|
|
/// </summary>
|
|
public IEnumerable<IdentifierSemanticToken> FileList => GetFileList();
|
|
|
|
public static ProgramHead Create(List<SyntaxNodeBase> children)
|
|
{
|
|
return new ProgramHead { Children = children };
|
|
}
|
|
|
|
private IEnumerable<IdentifierSemanticToken> GetFileList()
|
|
{
|
|
if (Children.Count == 2)
|
|
{
|
|
yield break;
|
|
}
|
|
|
|
foreach (IdentifierSemanticToken token in Children[3].Convert<IdentifierList>().Identifiers)
|
|
{
|
|
yield return token;
|
|
}
|
|
}
|
|
}
|