1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
%{
#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<ctype.h>
void three_address_code();
char add_to_table(char ,char, char);
int yyerror(char *);
int yylex();
int idx = 0;
char tvar = '1';
struct instruction {
char op1;
char op2;
char opr;
};
%}
%token IDENT NUM
%type expr
%left '+'
%left '*''/'
%left '-'
%%
statement: IDENT '=' expr ';' { add_to_table((char)$1, (char)$3, '='); }
| expr ';'
;
expr: expr '+' expr {$$ = add_to_table((char)$1, (char)$3, '+');}
| expr '-' expr {$$ = add_to_table((char)$1, (char)$3, '-');}
| expr '*' expr {$$ = add_to_table((char)$1, (char)$3, '*');}
| expr '/' expr {$$ = add_to_table((char)$1, (char)$3, '/');}
| '(' expr ')' {$$ = (char)$2;}
| NUM {$$ = (char)$1;}
| IDENT {$$ = (char)$1;}
| '-' expr {$$ = add_to_table((char)$2, (char)'\t', '-');}
;
%%
int yyerror(char *s) {
printf("ERROR: %s",s);
exit(0);
}
struct instruction ops[20];
char add_to_table(char op1, char op2, char opr) {
ops[idx].op1 = op1;
ops[idx].op2 = op2;
ops[idx].opr = opr;
idx++;
return tvar++;
}
void three_address_code() {
int count = 0;
char temp = '1';
while(count < idx) {
if(ops[count].opr != '=') {
printf("t%c=", temp++);
}
if(isalpha(ops[count].op1)) {
printf("%c",ops[count].op1);
} else if(ops[count].op1 >='1' && ops[count].op1 <='9') {
printf("t%c",ops[count].op1);
}
printf("%c",ops[count].opr);
if(isalpha(ops[count].op2)) {
printf(" %c\n",ops[count].op2);
} else if(ops[count].op2 >='1' && ops[count].op2 <='9') {
printf("t%c\n",ops[count].op2);
}
count++;
}
}
int main() {
yyparse();
three_address_code();
}
|