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

{

char str[10];

int k,j,w; //счетчики

for(w=0;w<5;w++)

{

if(TEXT[x][y] == NULL) break;

str[w]=toupper(TEXT[x][y++]); //Toupper - переводит

} //все буквы в заглавные

str[w]=NULL;

if(strcmp(str,"WHILE") == 0) //Если While найден то производим

{ // дальнейший разбор

fprintf(fl_t,"Найден While проверка началась с символа - %c\n",TEXT[x][y]);

if(TEXT[x][y] != '(') mistake_number[2]=1;

else y++;

AB();

if(TEXT[x][y] != ')') mistake_number[3]=1;

y++;

mistake_number[1]=0;

FUNC();

return(1);

}

else return(0);

}

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

// Обработка выражения

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

int AB()

{

char signal[4]="><!=";