2 * Copyright 2006 Adrian Thurston <thurston@cs.queensu.ca>
5 /* This file is part of Ragel.
7 * Ragel is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * Ragel is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with Ragel; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
27 #include "parsedata.h"
29 extern char *lelNames[];
38 # These must be declared first and in this order. Ragel currently cannot
39 # import kelbt keywords for use in machines, so in the scanner
40 # rely on knowing the values that kelbt will assign to these.
41 token KW_Machine, KW_Include, KW_Write, TK_Word, TK_Literal;
43 token TK_Number, TK_Inline, TK_Reference, TK_ColonEquals, TK_EndSection;
46 token TK_UInt, TK_Hex, TK_Word, TK_Literal, TK_BaseClause,
47 TK_DotDot, TK_ColonGt, TK_ColonGtGt, TK_LtColon, TK_Arrow,
48 TK_DoubleArrow, TK_StarStar, TK_ColonEquals, TK_NameSep, TK_BarStar,
52 token TK_StartCond, TK_AllCond, TK_LeavingCond;
56 # Global error actions.
57 token TK_StartGblError, TK_AllGblError, TK_FinalGblError,
58 TK_NotFinalGblError, TK_NotStartGblError, TK_MiddleGblError;
60 # Local error actions.
61 token TK_StartLocalError, TK_AllLocalError, TK_FinalLocalError,
62 TK_NotFinalLocalError, TK_NotStartLocalError, TK_MiddleLocalError;
64 # EOF Action embedding.
65 token TK_StartEOF, TK_AllEOF, TK_FinalEOF, TK_NotFinalEOF, TK_NotStartEOF,
69 token TK_StartToState, TK_AllToState, TK_FinalToState, TK_NotFinalToState,
70 TK_NotStartToState, TK_MiddleToState;
73 token TK_StartFromState, TK_AllFromState, TK_FinalFromState,
74 TK_NotFinalFromState, TK_NotStartFromState, TK_MiddleFromState;
76 # Regular expression tokens. */
77 token RE_Slash, RE_SqOpen, RE_SqOpenNeg, RE_SqClose, RE_Dot, RE_Star,
80 # Tokens specific to inline code.
81 token IL_WhiteSpace, IL_Comment, IL_Literal, IL_Symbol;
84 token KW_Action, KW_AlphType, KW_Range, KW_GetKey, KW_Include, KW_Write,
85 KW_Machine, KW_When, KW_Eof, KW_Err, KW_Lerr, KW_To, KW_From;
87 # Specials in code blocks.
88 token KW_Break, KW_Exec, KW_Hold, KW_PChar, KW_Char, KW_Goto, KW_Call,
89 KW_Ret, KW_CurState, KW_TargState, KW_Entry, KW_Next, KW_Exec,
90 KW_Variable, KW_Access;
92 # Special token for terminating semi-terminated code blocks. Needed because
93 # semi is sent as a token in the code block rather than as a generic
100 Parser( char *fileName, char *sectionName, InputLoc §ionLoc )
101 : sectionName(sectionName)
103 pd = new ParseData( fileName, sectionName, sectionLoc );
106 int token( InputLoc &loc, int tokId, char *tokstart, int toklen );
107 void tryMachineDef( InputLoc &loc, char *name,
108 JoinOrLm *joinOrLm, bool isInstance );
110 /* Report an error encountered by the parser. */
111 ostream &parser_error( int tokId, Token &token );
115 /* The name of the root section, this does not change during an include. */
119 NameRefList nameRefList;