Реферат: Синтаксический распознаватель арифметического оператора условного перехода языка FORTRAN

char nx; // Текущий символ в строке.

int e1=0; // Счетчик страниц массива собщений об ошибках.

int e2=0; // Счетчик строк в странице.

int l=0; // Счетчик меток.

FILE* fl=fopen("MESSAGE.TXT","wt"); // Файл с сообщениями об ошибках.

//¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾

// Прототипы функций.

//¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾¾

void Windows(int,int,int,int,char*); // Построение окон.

void Beep(int,int); // Звуковой сигнал.

void Open_File(void); // Открытие файла.

void Second_Window(void); // Построение нижней панели.

void MyPuts(char*,int); // Аналог puts(char*).

void Print_File(void); // Печать файла.

void Menu(void); // Меню.

int i_readkey(void); // Опрос клавиатуры.

void Help(void); // Помощь.

void Grammar(void); // Грамматика языка.

void Language(void); // Язык оператора.

void Compile(void); // Компиляция.

void Operator(char*); // Сканирование оператора.

void Scan(void); // Сканирование следующего символа.

void Label(void); // Реализация Label.

int ABS(void); // Реализация ABS.

int IDENT(void); // Реализация IDENT.

int AB(void); // Реализация AB.

void Error(int); // Обработка ошибки.

int Term(void); // Реализация Term.

int Operand(void); // Реализация Operand.