*
* Reproduction permitted so long as this notice is retained.
*/
+
%}
%e 1700
%p 4000
%o 1500
BW [ \t\(]
EW [ \t.,;!\?$\)]
+%option noyywrap
+
+%{
+ void plastc(void);
+ char caseify(char);
+ void expletive(void);
+ void thing(char);
+%}
+
%%
+
@[Bb]egin(.*) |
".so ".*$ printf("%s", yytext);
{BW}send printf("%ct'row",yytext[0]);
meta printf("meta-fuckin'");
cally printf("c'l");
%%
-plastc()
+
+void plastc()
{
- unput(yytext[yyleng-1]);
+ unput(yytext[yyleng-1]);
}
-caseify(c)
+char caseify(c)
char c;
{
if (yytext[0] <= 'Z')
return (c);
}
-thing(c)
+void thing(c)
char c;
{
static short count = 0;
break;
}
}
-expletive()
+
+void expletive()
{
static short count = 0;
static short which = 0;