И.А. Волкова, Т.В. Руденко - Формальные грамматики и языки. Элементы теории трансляции, страница 7

T();

while (eq ("+") || eq ("-") || eq ("or"))

{curr_lex = getlex(); T();}

}

Для остальных нетерминалов грамматики модельного языка процедуры рекурсивного спуска пишутся аналогично.

"Запуск" синтаксического анализатора:

... curr_lex = getlex(); P(); ...

О семантическом анализе

Контекстно-свободные грамматики, с помощью которых описывают синтаксис языков программирования, не позволяют задавать контекстные условия, имеющиеся в любом языке.

Примеры наиболее часто встречающихся контекстных условий:

1. каждый используемый в программе идентификатор должен быть описан, но не более одного раза в одной зоне описания;

2. при вызове функции число фактических параметров и их типы должны соответствовать числу и типам формальных параметров;

3. обычно в языке накладываются ограничения на типы операндов любой операции, определенной в этом языке; на типы левой и правой частей в операторе присваивания; на тип параметра цикла; на тип условия в операторах цикла и условном операторе и т.п.

Проверку контекстных условий часто называют семантическим анализом. Его можно выполнять сразу после синтаксического анализа, некоторые требования можно контролировать во время генерации кода (например, ограничения на типы операндов в выражении), а можно совместить с синтаксическим анализом.

Мы выберем последний вариант: как только синтаксический анализатор распознает конструкцию, на компоненты которой наложены некоторые ограничения, проверяется их выполнение. Это означает, что на этапе синтаксического анализа придется выполнять некоторые дополнительные действия, осуществляющие семантический контроль.

Если для синтаксического анализа используется метод рекурсивного спуска, то в тела процедур РС-метода необходимо вставить вызовы дополнительных "семантических" процедур (семантические действия). Причем, как показывает практика, удобнее вставить их сначала в синтаксические правила, а потом по этим расширенным правилам строить процедуры РС-метода. Чтобы отличать вызовы семантических процедур от других символов грамматики, будем заключать их в угловые скобки.

Замечание: фактически, мы расширили понятие контекстно-свободной грамматики, добавив в ее правила вывода символы-действия.

Например, пусть в грамматике есть правило

A  a<D₁>B<D₁;D₂> | bC<D₃> ,

здесь A,B,C  VN; a,b  VT; <Di> означает вызов семантической процедуры D_i, i = 1, 2, 3. Имея такое правило грамматики, легко написать процедуру для метода рекурсивного спуска, которая будет выполнять синтаксический анализ и некоторые дополнительные действия:

void A() {

if (c=='a') {c = fgetc(fp); D1(); B(); D1(); D2();}

else if (c == 'b') {c = fgetc(fp); C(); D3();}

else ERROR();

}

Пример: написать грамматику, которая позволит распознавать цепочки языка L = {  (0,1)⁺ |  содержит равное количество 0 и 1}.

Этого можно добиться, пытаясь чисто синтаксическими средствами описать цепочки, обладающие этим свойством. Но гораздо проще с помощью синтаксических правил описать произвольные цепочки из 0 и 1, а потом вставить действия для отбора цепочек с равным количеством 0 и 1:

S  <k0 = 0; k1 = 0;> A

A  0 <k0 = k0+1> A | 1 <k1 = k1+1> A |

0 <k0 = k0+1; check()> | 1 <k1 = k1+1; check()>, где

void check()

{ if (k0 != k1) { printf("ERROR !!!"); exit(1);}

else { printf("SUCCESS !!!\n");exit(0);}

}

Теперь по этой грамматике легко построить анализатор, распознающий цепочки с нужными свойствами.

Семантический анализатор для М-языка

Контекстные условия, выполнение которых нам надо контролировать в программах на М-языке, таковы:

1. Любое имя, используемое в программе, должно быть описано и только один раз.

2. В операторе присваивания типы переменной и выражения должны совпадать.

3. В условном операторе и в операторе цикла в качестве условия возможно только логическое выражение.

4. Операнды операции отношения должны быть целочисленными.

5. Тип выражения и совместимость типов операндов в выражении определяются по обычным правилам (как в Паскале).

Проверку контекстных условий совместим с синтаксическим анализом. Для этого в синтаксические правила вставим вызовы процедур, осуществляющих необходимый контроль, а затем перенесем их в процедуры рекурсивного спуска.

Обработка описаний

Для контроля согласованности типов в выражениях и типов выражений в операторах, необходимо знать типы переменных, входящих в эти выражения. Кроме того, нужно проверять, нет ли повторных описаний идентификаторов. Эта информация становится известной в тот момент, когда синтаксический анализатор обрабатывает описания. Следовательно, в синтаксические правила для описаний нужно вставить действия, с помощью которых будем запоминать типы переменных и контролировать единственность их описания.

Лексический анализатор запомнил в таблице идентификаторов TID все идентификаторы-лексемы, которые были им обнаружены в тексте исходной программы. Информацию о типе переменных и о наличии их описания естественно заносить в ту же таблицу.

Пусть каждая строка в TID имеет вид

struct record {

char *name; /* идентификатор */

int declare; /* описан ? 1-"да", 0-"нет" */

char *type; /* тип переменной */

...

};

Тогда таблица идентификаторов TID - это массив структур

#define MAXSIZE_TID 1000

struct record TID [MAXSIZE_TID];

причем i-ая строка соответствует идентификатору-лексеме вида (4,i).

Лексический анализатор заполнил поле name; значения полей declare и type будем заполнять на этапе семантического анализа.

Для этого нам потребуется следующая функция:

void decid (int i, char *t) - в i-той строке таблицы TID контролирует и заполняет поле declare и, если лексема (4,i) впервые встретилась в разделе описаний, заполняет поле type:

void decid (int i, char *t)

{if (TID [i].declare) ERROR(); /*повторное описание */

else {TID [i].declare = 1; /* описан ! */

strcpy (TID [i].type, t);} /* тип t ! */

}

Раздел описаний имеет вид

D  I {,I}: [int | bool],

т.е. имени типа (int или bool) предшествует список идентификаторов. Эти идентификаторы (вернее, номера соответствующих им строк таблицы TID) надо запоминать (например, в стеке), а когда будет проанализировано имя типа, заполнить поля declare и type в этих строках.

Для этого будем использовать функции работы со стеком целых чисел:

void ipush (int i); /* значение i - в стек */

int ipop (void); /* из стека - целое */

Будем считать, что (-1) - "дно" стека; тогда функция

void dec (char *t)

{int i;

while ((i = ipop()) != -1)

decid(i,t);

}

считывает из стека номера строк TID и заносит в них информацию о наличии описания и о типе t.

С учетом этих функций правило вывода с действиями для обработки описаний будет таким:

D  < ipush (-1) > I < ipush (curr_lex.value) >

{, I < ipush (curr_lex.value) >}:

[ int < dec ("int") > | bool < dec ("bool") > ]

Контроль контекстных условий в выражении

Пусть есть функция

char *gettype (char *op, char *t1, char *t2),

которая проверяет допустимость сочетания операндов типа t1 (первый операнд) и типа t2 (второй операнд) в операции op; если типы совместимы, то выдает тип результата этой операции; иначе - строку "no".

Типы операндов и обозначение операции будем хранить в стеке; для этого нам нужны функции для работы со стеком строк:

void spush (char *s); /* значение s - в стек */

char *spop (void); /* из стека - строку */

Если в выражении встречается лексема-целое_число или логические константы true или false, то соответствующий тип сразу заносим в стек с помощью spush("int") или spush("bool").

Если операнд - лексема-переменная, то необходимо проверить, описана ли она; если описана, то ее тип надо занести в стек. Эти действия можно выполнить с помощью функции checkid:

void checkid (void)

{int i;

i = curr_lex.value;

if (TID [i].declare) /* описан? */

spush (TID [i].type); /* тип - в стек */

else ERROR(); /* описание отсутствует */

}

Тогда для контроля контекстных условий каждой тройки - "операнд-операция-операнд" будем использовать функцию checkop:

void checkop (void)

{char *op;

char *t1;char *t2;

char *res;

t2 = spop(); /* из стека - тип второго операнда */

op = spop(); /* из стека - обозначение операции */

t1 = spop(); /* из стека - тип первого операнда */

res = gettype (op,t1,t2); /* допустимо ? */

if (strcmp (res, "no")) spush (res); /* да! */

else ERROR(); /* нет! */

}

Для контроля за типом операнда одноместной операции not будем использовать функцию checknot:

void checknot (void)

{ if (strcmp (spop (), "bool")) ERROR();

else spush ("bool");}

Теперь главный вопрос: когда вызывать эти функции?

В грамматике модельного языка задано старшинство операций: наивысший приоритет имеет операция отрицания, затем в порядке убывания приоритета - группа операций умножения (*, /, and), группа операций сложения (+,-,or), операции отношения.

E  E1 | E1 [ = | < | > ] E1

E1  T {[ + | - | or ] T}

T  F {[ * | / | and ] F}

F  I | N | [ true | false ] | not F | (E)

Именно это свойство грамматики позволит провести синтаксически-управляемый контроль контекстных условий.

Замечание: сравните грамматики, описывающие выражения, состоящие из символов +, *, (, ), i:

G1: E  E+E | E*E | (E) | i G4: E  T | E+T

G2: E  E+T | E*T | T T  F | T*F

T  i | (E) F  i | (E)

G3: E  T+E | T*E | T G5: E  T | T+E

T  i |(E) T  F | F*T

F  i | (E)

оцените, насколько они удобны для трансляции выражений.

Правила вывода выражений модельного языка с действиями для контроля контекстных условий:

E  E1 | E1 [ = | < | > ] < spush ( TD [curr_lex.value] ) > E1 <checkop() >

E1  T { [ + | - | or ] < spush ( TD [curr_lex.value] ) > T < checkop() >}

T  F { [ * | / | and ] < spush ( TD [curr_lex.value] ) > F < checkop() >}

F  I < checkid() > | N < spush ("int") > | [ true | false ] < spush ("bool") > |

not F < checknot() > | (E)

Замечание: TD - это таблица ограничителей, к которым относятся и знаки операций; будем считать, что это массив

#define MAXSIZE_TD 50

char * TD[MAXSIZE_TD];

именно из этой таблицы по номеру лексемы в классе выбираем обозначение операции в виде строки.

Контроль контекстных условий в операторах

S  I := E | if E then S else E | while E do S | B | read (I) | write (E)

1. Оператор присваивания I := E

Контекстное условие: в операторе присваивания типы переменной I и выражения E должны совпадать.

В результате контроля контекстных условий выражения E в стеке останется тип этого выражения (как тип результата последней операции); если при анализе идентификатора I проверить, описан ли он, и занести его тип в тот же стек ( для этого можно использовать функцию checkid() ), то достаточно будет в нужный момент считать из стека два элемента и сравнить их:

void eqtype (void)

{ if (strcmp (spop (), spop ())) ERROR();}

Следовательно, правило для оператора присваивания:

I <checkid()> := E <eqtype()>

1. Условный оператор и оператор цикла

if E then S else S | while E do S

Контекстные условия: в условном операторе и в операторе цикла в качестве условия возможны только логические выражения.

В результате контроля контекстных условий выражения E в стеке останется тип этого выражения (как тип результата последней операции); следовательно, достаточно извлечь его из стека и проверить:

void eqbool (void)

{if (strcmp (spop(), "bool")) ERROR();}

Тогда правила для условного оператора и оператора цикла будут такими:

if E <eqbool()> then S else S | while E <eqbool()> do S