Лекция 8. Перед вызовом stml( ) выполнялось dconst( )

8) STML → STAT (‘;’ STAT)*

Перед вызовом stml() выполнялось dconst(). В начале этой функции есть exam(‘;’). При успешной проверке вызывается get(), и она возвращает новую лексему.

void stml()

{

stat();

while (lex = = ‘;’)

{

get();

stat();

}

return;

}

9) STAT → iden ‘=’ EXPR | readl iden | pritl EXPR | retrl EXPR | ifl EXPR thenl STML endl | whilel EXPR dol STML endl

Перед вызовом stat() “свежая” лексема есть. В зависимости от ее значения идет разветвление по switch (lex).

void stat()

{

switch (lex)

{

case IDEN: get(); exam (‘=’); expr(); break;

case READL: get(); exam (IDEN); break;

case PRITL: get(); expr(); break;

case RETRL: get(); expr(); break;

case IFL: get(); expr(); exam(THENL); stml(); exam(ENDL); break;

case WHILEL: get(); expr(); exam(DOL); stml(); exam(ENDL); break;

default: printf(“Синтакс. ошибка в stat в строке nst=%i \n”, nst);

}

return;

}

10) EXPR → [‘+’|’-’] TERM ((‘+’|’-’)TERM)*

//“Свежая” лексема есть

void expr()

{

if (lex = = ‘+’ || lex = = ‘-‘)

get();

term();

while (lex = = ‘+’ || lex = = ‘-‘)

{

get();

term();

}

return;

}

11)TERM→FACT ((’*’|’/’| ‘%’)FACT)*

//Есть «свежая» лексема

void term();

{

fact();

while(lex = =’*’||lex = =’/’||lex = = ‘%’)

{

get();

fact();

}

return;

}

12) FACT →‘(’EXPR’)’|numb| iden [‘(‘[FCTL]’)’]

void fact()

{

switch(lex)

{

case ‘(’: get(); expr();exam(‘)’); break;

case NUMB: get(); break;

case IDEN: get(); if(lex = =’(‘)

{

get();

if(lex!=’)’)

fctl ();

exam(‘)’);

}

break;

default: printf (“ Ошибка синтаксиса в fact. lex =%d номер строки

nst=%d \n”,lex, nst);

}

return;

}

Функция fact() всегда вызывается после get(). Следовательно, есть новая лексема. В зависимости от ее значения происходит переход на одну из трех ветвей. В любой из них вначале вызывается get(), чтобы получить следующую лексему. Затем происходит анализ в соответствии с регулярными выражениями и синтаксической диаграммой.

13)FTCL →EXPR(‘,’EXPR)*

//Есть новая лексема

void fctl()

{

expr();

while(lex = = ‘,’)

{

get();

expr();

}

return;

}

Дата добавления: 2015-06-27