1 void munchit(char *); 2 %% 3 \..*\n printf("%s", yytext); 4 pea[ ][_A-Za-z][A-Za-z0-9_]*$ {printf("pea");munchit(yytext+3);} 5 \ [_A-Za-z][A-Za-z0-9_]*/\, munchit(yytext); 6 . putchar(*yytext); 7 %% 8 void 9 munchit(s) 10 char *s; 11 { 12 putchar(*s++); 13 if (!strncmp(s, "fp", 2) || 14 !strncmp(s, "sp", 2) || 15 ((*s == 'a') || (*s == 'd')) && ((s[1]-'0')<=7)) 16 printf("%s", s); 17 else 18 printf("pc@(%s)",s); 19 } 20