Mercurial > octave

annotate libinterp/corefcn/oct-tex-lexer.in.ll @ 19697:4197fc428c7d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Update copyright notices for 2015.
author John W. Eaton <jwe@octave.org>
date Wed, 11 Feb 2015 14:19:08 -0500
parents bdbf91c0a1a4
children a941a65c7cb8
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
1 /*
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
2
19697
4197fc428c7d maint: Update copyright notices for 2015.
John W. Eaton <jwe@octave.org>
parents: 17634
diff changeset
3 Copyright (C) 2013-2015 Michael Goffioul
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
4
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
5 This file is part of Octave.
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
6
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
10 option) any later version.
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
11
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
15 for more details.
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
16
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
18 along with Octave; see the file COPYING. If not, see
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
19 <http://www.gnu.org/licenses/>.
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
20
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
21 */
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
22
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
23 %option prefix = "octave_tex_"
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
24 %option noyywrap
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
25 %option reentrant
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
26 %option bison-bridge
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
27
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
28 %top {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
29 #ifdef HAVE_CONFIG_H
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
30 #include <config.h>
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
31 #endif
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
32
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
33 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
34
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
35 %x NUM_MODE
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
36 %x MAYBE_NUM_MODE
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
37
17634
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
38 %{
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
39
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
40 // The generated code may include unistd.h. We need that to happen
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
41 // before defining isatty to be prefixed with the gnulib namespace
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
42 // identifier.
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
43
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
44 #include <sys/types.h>
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
45 #include <unistd.h>
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
46
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
47 #include "txt-eng.h"
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
48 #include "oct-tex-parser.h"
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
49
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
50 #if defined (GNULIB_NAMESPACE)
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
51 // Calls to the following functions appear in the generated output from
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
52 // flex without the namespace tag. Redefine them so we will use them
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
53 // via the gnulib namespace.
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
54 #define fprintf GNULIB_NAMESPACE::fprintf
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
55 #define fread GNULIB_NAMESPACE::fread
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
56 #define fwrite GNULIB_NAMESPACE::fwrite
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
57 #define getc GNULIB_NAMESPACE::getc
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
58 #define isatty GNULIB_NAMESPACE::isatty
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
59 #define malloc GNULIB_NAMESPACE::malloc
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
60 #define realloc GNULIB_NAMESPACE::realloc
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
61 #endif
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
62
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
63 %}
bdbf91c0a1a4 avoid warnings about symbols without gnulib:: namespace tag
John W. Eaton <jwe@octave.org>
parents: 17327
diff changeset
64
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
65 D [0-9]
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
66 NUM (({D}+\.?{D}*)|(\.{D}+))
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
67
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
68 %%
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
69
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
70 %{
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
71 // Numeric values
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
72 %}
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
73
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
74 <NUM_MODE>{NUM} {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
75 int nread;
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
76
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
77 nread = sscanf (yytext, "%lf", &(yylval->num));
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
78 if (nread == 1)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
79 return NUM;
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
80 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
81 <NUM_MODE>[ \t]+ { }
17272
8ce6cdd272eb Support TeX elements in FreeType renderer.
Michael Goffioul <michael.goffioul@gmail.com>
parents: 17271
diff changeset
82 <NUM_MODE>"\n"|. { yyless (0); BEGIN (INITIAL); }
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
83
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
84 <MAYBE_NUM_MODE>"{" { BEGIN (NUM_MODE); return START; }
17272
8ce6cdd272eb Support TeX elements in FreeType renderer.
Michael Goffioul <michael.goffioul@gmail.com>
parents: 17271
diff changeset
85 <MAYBE_NUM_MODE>"\n"|. { yyless (0); BEGIN (INITIAL); }
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
86
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
87 %{
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
88 // Simple commands
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
89 %}
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
90
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
91 "\\bf" { return BF; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
92 "\\it" { return IT; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
93 "\\sl" { return SL; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
94 "\\rm" { return RM; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
95
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
96 %{
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
97 // Generic font commands
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
98 %}
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
99
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
100 "\\fontname" { return FONTNAME; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
101 "\\fontsize" { BEGIN (MAYBE_NUM_MODE); return FONTSIZE; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
102 "\\color[rgb]" { BEGIN (MAYBE_NUM_MODE); return COLOR_RGB; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
103 "\\color" { return COLOR; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
104
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
105 %{
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
106 // Special characters
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
107 %}
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
108
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
109 "{" { return START; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
110 "}" { return END; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
111 "^" { return SUPER; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
112 "_" { return SUB; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
113
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
114 "\\{" |
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
115 "\\}" |
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
116 "\\^" |
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
117 "\\_" |
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
118 "\\\\" { yylval->ch = yytext[1]; return CH; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
119
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
120 %{
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
121 // Symbols
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
122 %}
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
123
17327
fe6518a1d87c Move TeX symbol decoding into the lexer (bug #39831).
Michael Goffioul <michael.goffioul@gmail.com>
parents: 17320
diff changeset
124 @SYMBOL_RULES@
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
125
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
126 %{
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
127 // Generic character
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
128 %}
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
129
17271
cb7233cfbf43 Prepare base text rendering code for full TeX support.
Michael Goffioul <michael.goffioul@gmail.com>
parents: 17269
diff changeset
130 "\n" |
17269
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
131 . { yylval->ch = yytext[0]; return CH; }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
132
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
133 %%
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
134
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
135 bool
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
136 text_parser_tex::init_lexer (const std::string& s)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
137 {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
138 if (! scanner)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
139 octave_tex_lex_init (&scanner);
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
140
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
141 if (scanner)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
142 {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
143 if (buffer_state)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
144 {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
145 octave_tex__delete_buffer (reinterpret_cast<YY_BUFFER_STATE> (buffer_state),
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
146 scanner);
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
147 buffer_state = 0;
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
148 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
149
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
150 buffer_state = octave_tex__scan_bytes (s.data (), s.length (), scanner);
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
151 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
152
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
153 return (scanner && buffer_state);
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
154 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
155
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
156 void
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
157 text_parser_tex::destroy_lexer (void)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
158 {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
159 if (buffer_state)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
160 {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
161 octave_tex__delete_buffer (reinterpret_cast<YY_BUFFER_STATE> (buffer_state),
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
162 scanner);
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
163 buffer_state = 0;
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
164 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
165
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
166 if (scanner)
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
167 {
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
168 octave_tex_lex_destroy (scanner);
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
169 scanner = 0;
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
170 }
5b088598df1d Add simple TeX parser based on flex/bison.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
diff changeset
171 }