src/scan-skel.l

/* Scan Bison Skeletons.                                       -*- C -*-
   Copyright (C) 2001, 2002  Free Software Foundation, Inc.

   This file is part of Bison, the GNU Compiler Compiler.

   Bison is free software; you can redistribute it and/or modify it
   under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   Bison is distributed in the hope that it will be useful, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with Bison; see the file COPYING.  If not, write to the Free
   Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
   02111-1307, USA.  */

%option nodefault noyywrap nounput never-interactive
%option prefix="skel_" outfile="lex.yy.c"

%{
#include "system.h"
#include "quotearg.h"
#include "error.h"
#include "getargs.h"
#include "files.h"

int skel_lex (void);

static int yylineno = 1;
static char *yyoutname = NULL;

%}
%%
  /* This is an approximation, but we don't need more. */
^"#output \""[^\"]+\"\n        {
     yytext[yyleng - 2] = '\0';
     XFREE (yyoutname);
     yyoutname = xstrdup (yytext + strlen ("#output \""));
     yyout = xfopen (yyoutname, "w");
     yylineno = 1;
   }

"@<:@"           fputc ('[', yyout);
"@:>@"           fputc (']', yyout);

"__oline__"      fprintf (yyout, "%d", yylineno+1);
"__ofile__"      fprintf (yyout, "%s", quotearg_style (escape_quoting_style, yyoutname));
[^@_\n]+         ECHO;
\n+              yylineno += yyleng; ECHO;
.                ECHO;

<<EOF>>          xfclose (yyout); free (yyoutname); return EOF;
%%

/*------------------------.
| Scan a Bison skeleton.  |
`------------------------*/

void scan_skel (FILE *);

void
scan_skel (FILE *in)
{
  skel_in = in;
  skel_lex ();

  /* Reclaim Flex's buffers.  */
  yy_delete_buffer (YY_CURRENT_BUFFER);
}
Commit	Line	Data
	1	/* Scan Bison Skeletons. -- C --
	2	Copyright (C) 2001, 2002 Free Software Foundation, Inc.
	3
	4	This file is part of Bison, the GNU Compiler Compiler.
	5
	6	Bison is free software; you can redistribute it and/or modify it
	7	under the terms of the GNU General Public License as published by
	8	the Free Software Foundation; either version 2, or (at your option)
	9	any later version.
	10
	11	Bison is distributed in the hope that it will be useful, but
	12	WITHOUT ANY WARRANTY; without even the implied warranty of
	13	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	14	General Public License for more details.
	15
	16	You should have received a copy of the GNU General Public License
	17	along with Bison; see the file COPYING. If not, write to the Free
	18	Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
	19	02111-1307, USA. */
	20
	21	%option nodefault noyywrap nounput never-interactive
	22	%option prefix="skel_" outfile="lex.yy.c"
	23
	24	%{
	25	#include "system.h"
	26	#include "quotearg.h"
	27	#include "error.h"
	28	#include "getargs.h"
	29	#include "files.h"
	30
	31	int skel_lex (void);
	32
	33	static int yylineno = 1;
	34	static char *yyoutname = NULL;
	35
	36	%}
	37	%%
	38	/* This is an approximation, but we don't need more. */
	39	^"#output \""[^\"]+\"\n {
	40	yytext[yyleng - 2] = '\0';
	41	XFREE (yyoutname);
	42	yyoutname = xstrdup (yytext + strlen ("#output \""));
	43	yyout = xfopen (yyoutname, "w");
	44	yylineno = 1;
	45	}
	46
	47	"@<:@" fputc ('[', yyout);
	48	"@:>@" fputc (']', yyout);
	49
	50	"__oline__" fprintf (yyout, "%d", yylineno+1);
	51	"__ofile__" fprintf (yyout, "%s", quotearg_style (escape_quoting_style, yyoutname));
	52	[^@_\n]+ ECHO;
	53	\n+ yylineno += yyleng; ECHO;
	54	. ECHO;
	55
	56	<<EOF>> xfclose (yyout); free (yyoutname); return EOF;
	57	%%
	58
	59	/*------------------------.
	60	\| Scan a Bison skeleton. \|
	61	`------------------------*/
	62
	63	void scan_skel (FILE *);
	64
	65	void
	66	scan_skel (FILE *in)
	67	{
	68	skel_in = in;
	69	skel_lex ();
	70
	71	/* Reclaim Flex's buffers. */
	72	yy_delete_buffer (YY_CURRENT_BUFFER);
	73	}