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

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

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

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

void GetFilename(void); // Запрос имени файла для открытия.

int ScanStr(char*); // Поиск GOTO.

int Scaner(char*); // Обработка строки.

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

void Delspace(char*); // Удаление ненужных пробелов в строке.

int AB(void); // Реализация нетерминала <АВ>.

int T(void); // Реализация нетерминала <Т>.

int O(void); // Реализация нетерминала <О>.

int IDENT(void); // Реализация нетерминала <IDENT>.

int FLOAT(void); // Реализация нетерминала <FLOAT>.

void Error(int=0,char* =""); // Обработка ошибки.

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

// Глобальные переменные.

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

char filename[MAX_STR_LEN]; // Имя файла.

char *text[COL_STR+1]; // Массив указателей на строки текста.

char screen[4096]; // Буфер под копию экрана.

char mes[21][20][80]; // Массив под сообщения об ошибках.

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

int pos; // Текущая позиция в строке.

char STR[80]; // Сканируемая строка.

int ERR1; // Счетчик страниц в массиве ошибок.

int ERR2; // Счетчик строк в массиве ошибок.

FILE *errors; // Дескриптор файла.

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

// Функция MAIN.