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