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 "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", 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 "error.h"
	27	#include "getargs.h"
	28	#include "files.h"
	29	int skel_lex (void);
	30	static int yylineno = 1;
	31	static char *yyoutname = NULL;
	32	%}
	33	%%
	34	/* This is an approximation, but we don't need more. */
	35	^"#output \""[^\"]+\"\n {
	36	yytext[yyleng - 2] = '\0';
	37	XFREE (yyoutname);
	38	yyoutname = xstrdup (yytext + strlen ("#output \""));
	39	yyout = xfopen (yyoutname, "w");
	40	yylineno = 1;
	41	}
	42
	43	"@<:@" fputc ('[', yyout);
	44	"@:>@" fputc (']', yyout);
	45
	46	"__oline__" fprintf (yyout, "%d", yylineno+1);
	47	"__ofile__" fprintf (yyout, "%s", yyoutname);
	48	[^@_\n]+ ECHO;
	49	\n+ yylineno += yyleng; ECHO;
	50	. ECHO;
	51
	52	<<EOF>> xfclose (yyout); free (yyoutname); return EOF;
	53	%%
	54
	55	/*------------------------.
	56	\| Scan a Bison skeleton. \|
	57	`------------------------*/
	58
	59	void scan_skel (FILE *);
	60
	61	void
	62	scan_skel (FILE *in)
	63	{
	64	skel_in = in;
	65	skel_lex ();
	66
	67	/* Reclaim Flex's buffers. */
	68	yy_delete_buffer (YY_CURRENT_BUFFER);
	69	}