]>
Commit | Line | Data |
---|---|---|
be2a1a68 AD |
1 | /* Scan Bison Skeletons. -*- C -*- |
2 | Copyright (C) 2001, 2002 Free Software Foundation, Inc. | |
1239777d AD |
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. | |
9b3add5b | 15 | |
1239777d AD |
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. */ | |
9b3add5b | 20 | |
86eff183 | 21 | %option nodefault noyywrap nounput never-interactive |
aed7fd9b | 22 | %option prefix="skel_" outfile="lex.yy.c" |
9b3add5b | 23 | |
aed7fd9b AD |
24 | %{ |
25 | #include "system.h" | |
6e40b4eb | 26 | #include "quotearg.h" |
536545f3 AD |
27 | #include "error.h" |
28 | #include "getargs.h" | |
be2a1a68 | 29 | #include "files.h" |
6e40b4eb | 30 | |
d33cb3ae | 31 | int skel_lex (void); |
6e40b4eb | 32 | |
be2a1a68 | 33 | static int yylineno = 1; |
06446ccf | 34 | static char *yyoutname = NULL; |
6e40b4eb | 35 | |
aed7fd9b | 36 | %} |
9b3add5b | 37 | %% |
be2a1a68 AD |
38 | /* This is an approximation, but we don't need more. */ |
39 | ^"#output \""[^\"]+\"\n { | |
40 | yytext[yyleng - 2] = '\0'; | |
06446ccf AD |
41 | XFREE (yyoutname); |
42 | yyoutname = xstrdup (yytext + strlen ("#output \"")); | |
43 | yyout = xfopen (yyoutname, "w"); | |
be2a1a68 AD |
44 | yylineno = 1; |
45 | } | |
46 | ||
536545f3 AD |
47 | "@<:@" fputc ('[', yyout); |
48 | "@:>@" fputc (']', yyout); | |
2b7ed18a | 49 | |
158c687b | 50 | "__oline__" fprintf (yyout, "%d", yylineno+1); |
6e40b4eb | 51 | "__ofile__" fprintf (yyout, "%s", quotearg_style (escape_quoting_style, yyoutname)); |
2b7ed18a | 52 | [^@_\n]+ ECHO; |
be2a1a68 AD |
53 | \n+ yylineno += yyleng; ECHO; |
54 | . ECHO; | |
9b3add5b | 55 | |
536545f3 | 56 | <<EOF>> xfclose (yyout); free (yyoutname); return EOF; |
9b3add5b | 57 | %% |
536545f3 | 58 | |
2cdb2a7b PE |
59 | /*------------------------. |
60 | | Scan a Bison skeleton. | | |
61 | `------------------------*/ | |
536545f3 | 62 | |
2cdb2a7b | 63 | void scan_skel (FILE *); |
536545f3 AD |
64 | |
65 | void | |
2cdb2a7b | 66 | scan_skel (FILE *in) |
536545f3 | 67 | { |
2cdb2a7b | 68 | skel_in = in; |
536545f3 AD |
69 | skel_lex (); |
70 | ||
71 | /* Reclaim Flex's buffers. */ | |
72 | yy_delete_buffer (YY_CURRENT_BUFFER); | |
73 | } |