Курсовой проект / Labs / TrdType

unit TrdType; {!!! Зависит от входного языка !!!}

interface
{ Модуль для описания допустимых типов триад }

type
{ Типы триад, соответствующие типам допустимых операций,
  а также три дополнительные типа триад:
  - CONST - для алгоритма свёртки объектного кода;
  - SAME - для алгоритма исключения лишних операций;
  - NOP (No OPerations) - для ссылок на конец списка триад. }
TTriadType = (TRD_IF, TRD_OR, TRD_XOR, TRD_AND, TRD_ASSIGN,
              TRD_JMP, TRD_CONST, TRD_SAME, TRD_NOP);

{ Массив строковых обозначений триад для вывода их списка на экран }
  TTriadStr = array[TTriadType] of string;
const
  TriadStr: TTriadStr = ('if','or','xor','and',':=','jmp','C','same','nop');
{ Множество триад, которые являются линейными операциями }
  TriadLineSet : set of TTriadType = [TRD_OR, TRD_XOR, TRD_AND];

implementation

end.