X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=jive.l;h=1171975dae6e0b51212b0c14967318107639a102;hb=7a28020a66e7fda3417d1fc0c20a722fdba42624;hp=dcb99240b2bfcc52d71eab532eeb189e6b93c10e;hpb=7e3afbbacdd24f8c3fb87599eeda32b977fe6d6c;p=filters.git diff --git a/jive.l b/jive.l index dcb9924..1171975 100644 --- a/jive.l +++ b/jive.l @@ -7,6 +7,7 @@ * * Reproduction permitted so long as this notice is retained. */ + %} %e 1700 %p 4000 @@ -17,6 +18,12 @@ BW [ \t\(] EW [ \t.,;!\?$\)] %% +%{ + void plastc() + { + unput(yytext[yyleng-1]); + } +%} @[Bb]egin(.*) | ".so ".*$ printf("%s", yytext); {BW}send printf("%ct'row",yytext[0]); @@ -194,10 +201,6 @@ against printf("agin'"); meta printf("meta-fuckin'"); cally printf("c'l"); %% -plastc() -{ - unput(yytext[yyleng-1]); -} caseify(c) char c;