public DebugRoutineDirective([NotNull] AsmExpr file, [NotNull] AsmExpr line, [NotNull] AsmExpr column,
[NotNull] string name, [ItemNotNull][NotNull] IEnumerable <string> locals)
: base(file, line, column)
{
Name = name;
Locals = new List <string>(locals);
}
public static bool IsQuote([NotNull] this AsmExpr asmExpr, out AsmExpr inner)
{
if (asmExpr is QuoteExpr quote)
{
inner = quote.Inner;
return(true);
}
inner = null;
return(false);
}
public DebugClassDirective([NotNull] string name,
[NotNull] AsmExpr startFile, [NotNull] AsmExpr startLine, [NotNull] AsmExpr startColumn,
[NotNull] AsmExpr endFile, [NotNull] AsmExpr endLine, [NotNull] AsmExpr endColumn)
{
Name = name;
StartFile = startFile;
StartLine = startLine;
StartColumn = startColumn;
EndFile = endFile;
EndLine = endLine;
EndColumn = endColumn;
}
public DebugObjectDirective([NotNull] AsmExpr number, [NotNull] string name,
[NotNull] AsmExpr startFile, [NotNull] AsmExpr startLine, [NotNull] AsmExpr startColumn,
[NotNull] AsmExpr endFile, [NotNull] AsmExpr endLine, [NotNull] AsmExpr endColumn)
{
Number = number;
Name = name;
StartFile = startFile;
StartLine = startLine;
StartColumn = startColumn;
EndFile = endFile;
EndLine = endLine;
EndColumn = endColumn;
}
public ObjectDirective([NotNull] string name,
[NotNull] AsmExpr flags1, [NotNull] AsmExpr flags2, [CanBeNull] AsmExpr flags3,
[NotNull] AsmExpr parent, [NotNull] AsmExpr sibling, [NotNull] AsmExpr child,
[NotNull] AsmExpr propTable)
: base(name)
{
Flags1 = flags1;
Flags2 = flags2;
Flags3 = flags3;
Parent = parent;
Sibling = sibling;
Child = child;
PropTable = propTable;
}
protected NumberAndNameDebugDirective([NotNull] AsmExpr number, [NotNull] string name)
{
Number = number;
Name = name;
}
public NewDirective([CanBeNull] AsmExpr version)
{
Version = version;
}
public Instruction([NotNull] string name, [NotNull] AsmExpr operand1)
: this(name)
{
Operands.Add(operand1);
}
public LangDirective([NotNull] AsmExpr langId, [NotNull] AsmExpr escapeChar)
{
LanguageId = langId;
EscapeChar = escapeChar;
}
public AlignDirective([NotNull] AsmExpr divisor)
{
Divisor = divisor;
}
public DebugMapDirective([NotNull] string key, [CanBeNull] AsmExpr value)
{
Key = key;
Value = value;
}
public DebugFileDirective([NotNull] AsmExpr number, [NotNull] string includeName, [NotNull] string actualName)
{
Number = number;
IncludeName = includeName;
ActualName = actualName;
}
public TableDirective([CanBeNull] AsmExpr size)
{
Size = size;
}
public DebugFakeActionDirective([NotNull] AsmExpr number, [NotNull] string name)
: base(number, name)
{
}
public VocbegDirective([NotNull] AsmExpr recordSize, [NotNull] AsmExpr keySize)
{
RecordSize = recordSize;
KeySize = keySize;
}
public FunctLocal([NotNull] string name, [CanBeNull] AsmExpr defaultValue)
{
Name = name;
DefaultValue = defaultValue;
}
public Instruction([NotNull] string name, [NotNull] AsmExpr operand1, [NotNull] AsmExpr operand2, [NotNull] AsmExpr operand3, [NotNull] AsmExpr operand4)
: this(name, operand1, operand2, operand3)
{
Operands.Add(operand4);
}
public ChrsetDirective([NotNull] AsmExpr alphabetNum, [NotNull] IEnumerable <AsmExpr> characters)
{
CharsetNum = alphabetNum;
Characters = new List <AsmExpr>(characters);
}
public static bool IsStack([NotNull] this AsmExpr asmExpr)
{
return(asmExpr is SymbolExpr sym && sym.Text == "STACK");
}
public DebugRoutineEndDirective([NotNull] AsmExpr file, [NotNull] AsmExpr line, [NotNull] AsmExpr column)
: base(file, line, column)
{
}
public EqualsDirective([NotNull] string left, [NotNull] AsmExpr right)
{
Left = left;
Right = right;
}
public DebugPropDirective([NotNull] AsmExpr number, [NotNull] string name)
: base(number, name)
{
}
public PropDirective([NotNull] AsmExpr size, [NotNull] AsmExpr prop)
{
Size = size;
Prop = prop;
}
public GvarDirective([NotNull] string name, [CanBeNull] AsmExpr initialValue)
: base(name)
{
InitialValue = initialValue;
}
protected LineDebugDirective([NotNull] AsmExpr file, [NotNull] AsmExpr line, [NotNull] AsmExpr column)
{
TheFile = file;
TheLine = line;
TheColumn = column;
}
