Canon/Canon.Core/SyntaxNodes/ProcedureCall.cs

101 lines
2.5 KiB
C#
Raw Normal View History

using Canon.Core.Abstractions;
using Canon.Core.Enums;
using Canon.Core.LexicalParser;
using Canon.Core.SemanticParser;
namespace Canon.Core.SyntaxNodes;
public class ParameterGeneratorEventArgs : EventArgs
{
public required ExpressionList Parameters { get; init; }
}
public class NoParameterGeneratorEventArgs : EventArgs;
public class ProcedureCall : NonTerminatedSyntaxNode
{
public override NonTerminatorType Type => NonTerminatorType.ProcedureCall;
/// <summary>
/// 调用函数的名称
/// </summary>
public IdentifierSemanticToken ProcedureId
=> Children[0].Convert<TerminatedSyntaxNode>().Token.Convert<IdentifierSemanticToken>();
/// <summary>
/// 调用函数的参数
/// </summary>
public List<Expression> Parameters { get; } = [];
/// <summary>
/// 调用函数时含有参数的事件
/// </summary>
public event EventHandler<ParameterGeneratorEventArgs>? OnParameterGenerator;
/// <summary>
/// 调用函数是没有参数的事件
/// </summary>
public event EventHandler<NoParameterGeneratorEventArgs>? OnNoParameterGenerator;
private PascalType? _pascalType;
public PascalType ReturnType
{
get
{
if (_pascalType is null)
{
throw new InvalidOperationException();
}
return _pascalType;
}
set
{
_pascalType = value;
}
}
public override void PreVisit(SyntaxNodeVisitor visitor)
{
visitor.PreVisit(this);
RaiseEvent();
}
public override void PostVisit(SyntaxNodeVisitor visitor)
{
visitor.PostVisit(this);
RaiseEvent();
}
public static ProcedureCall Create(List<SyntaxNodeBase> children)
{
ProcedureCall result = new() { Children = children };
if (children.Count == 4)
{
result.Parameters.AddRange(children[2].Convert<ExpressionList>().Expressions);
}
return result;
}
private void RaiseEvent()
{
if (Children.Count == 4)
{
OnParameterGenerator?.Invoke(this, new ParameterGeneratorEventArgs
{
Parameters = Children[2].Convert<ExpressionList>()
});
}
else
{
OnNoParameterGenerator?.Invoke(this, new NoParameterGeneratorEventArgs());
}
OnParameterGenerator = null;
OnNoParameterGenerator = null;
}
}