Реферат: Построение формального языка L

case ESC:

window(1,1,80,25);

textbackground(BLACK);

textcolor(WHITE);

clrscr();

fclose(fl_t);

exit(1);

}

}

}

//----------------------------------------------------------------------------

// Распечатывает текст, выводит на экран ошибки, найденные в обрабатываемой

// (текущей) строке

//----------------------------------------------------------------------------

void print_page()

{

int i,xx=10;

puttext(1,1,80,25,screen);

for(i=0;i<=15;i++) //очистка массива ошибок

mistake_number[i] = 0;

strange[0]=NULL;

s=0;

x=cur_y+position-3;

y=0;

f=0;

fprintf(fl_t,"______________________________________________________________________________\n");

fprintf(fl_t,"Обрабатываем строчку - %s\n",TEXT[x]);

scan(); //вызывает сканер для разбора строки

fprintf(fl_t,"\n Найденные ошибки в строке %s\n",TEXT[x]);