summaryrefslogtreecommitdiff
path: root/support/splint/cweb/mkscanner.w
blob: 05f22bd6e399f78ba6d49a152316e4c3e689d25a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
% Copyright 2012-2022, Alexander Shibakov
% This file is part of SPLinT
%
% SPLinT 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 3 of the License, or
% (at your option) any later version.
%
% SPLinT 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 SPLinT.  If not, see <http://www.gnu.org/licenses/>.

@**Lexer tables. This is the main table output code. 
Its core comes from the Flex Kit(ten?) (\.{fk.w}) 
which will be included as soon as this paragraph is
over. Feel free to
interpret the acronym as something easier to remember.

@<Table names@>=
  @<Scanner table names@>@;

@ @<Local variable and type declarations@>=
  @<Variables and types local to the scanner driver@>@;

@ @<Establish defaults@>=
  @<Compute exotic scanner constants@>@;

@ @<Output action switch, if any@>=
  @<Output scanner actions@>@;

@ @<Constant names@>=
  @<Scanner constants@>@;

@ @<Output constants@>=
  @<Output exotic scanner constants@>@;

@ @<\Cee\ preamble@>=
  @<Common code for \Cee\ preamble@>@;
  @<Scanner variables and types for \Cee\ preamble@>@;

@ @<Output modes@>=
  @<Scanner specific output modes@>@;

@ @<Various output modes@>=
  @<Handle scanner output modes@>@;

@ @<Cases affecting the whole program@>=
  @<Handle scanner output options@>@;

@ @<Options with shortcuts@>=
  @<Scanner specific options with shortcuts@>@;

@ @<Options without shortcuts@>=
  @<Scanner specific options without shortcuts@>@;

@ @<Short option list@>=
  @<Shortcuts for command line options affecting scanner output@>@;

@i common.w
@i fk.w

@*1 Lexer dependent settings. 
This is it for the core table output functions. 
To make all this into a working code in this
case, no function declarations are supplied.
@<Auxiliary function declarations@>=

@ @<Auxiliary function definitions@>=

@ @<\Cee\ preamble@>=
  void define_all_states( void );

@ The lexer takes no parameters in this case but if one reuses a
lexer written for a different purpose, the situation may be different.
%\let\B\oldB % \Cee\ mode mixes all up

@d YYPARSE_PARAMETERS
@d YY_USER_INIT        define_all_states();
@d yyterminate()       TeX_( "/yyterminate" ); return YY_NULL

@c

@<\Cee\ preamble@>@;
typedef int YYSTYPE;
#define YY_BREAK return 0;
#define YY_USER_ACTION  fprintf( tables_out, "%s\n", "      \\YYRULESETUP" );

#include LEXER_FILE

@<\Cee\ postamble@>@;

@** Index (for {\tt \jobname}).
%\def\readcontents{%
%  {%
%    \acrofalse
%    \def\jobname{bparser}\input bparser.toc 
%  }%
%  \input \contentsfile
%}