ref: c12e49ecbf4ae7933b13d592543c9f7c7dc03581
dir: /sys/src/ape/lib/l/yyless.c/
#include <libl.h> #include <stdio.h> extern char yytext[]; extern int yyleng; extern int yyprevious; void yyunput(int c); void yyless(int x) { char *lastch, *ptr; lastch = yytext+yyleng; if(x>=0 && x <= yyleng) ptr = x + yytext; else ptr = (char*)x; while(lastch > ptr) yyunput(*--lastch); *lastch = 0; if (ptr >yytext) yyprevious = *--lastch; yyleng = ptr-yytext; }