X-Git-Url: http://git.ieval.ro/?p=filters.git;a=blobdiff_plain;f=jive.l;h=750b3cdb9a5921db2c605cf0f0313a2d3383718a;hp=dcb99240b2bfcc52d71eab532eeb189e6b93c10e;hb=7f4e9d5ed94ae3d89fa2548194ef0bf190368080;hpb=7ce515b4328eb41a917327d53be0c0184be23203

diff --git a/jive.l b/jive.l
index dcb9924..750b3cd 100644
--- a/jive.l
+++ b/jive.l
@@ -7,6 +7,7 @@
  *
  *	Reproduction permitted so long as this notice is retained.
  */
+
 %}
 %e 1700
 %p 4000
@@ -196,7 +197,7 @@ cally				printf("c'l");
 %%
 plastc()
 {
-	unput(yytext[yyleng-1]);
+	yyunput(yytext[yyleng-1], yytext);
 }
 
 caseify(c)
@@ -242,6 +243,16 @@ expletive()
 		}
 }
 
+main()
+{
+	yylex();
+}
+
+int yywrap()
+{
+	return 1;
+}
+
 /*
  * Bugs:
  *