annotate generator/parser/control.cpp @ 414:b2a803c73b89 default tip

Declare tabArray const.
author David Nadlinger <code@klickverbot.at>
date Fri, 06 May 2011 13:39:49 +0200
parents 09a0f1d048f2
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1
e78566595089 initial import
mandel
parents:
diff changeset
1 /****************************************************************************
e78566595089 initial import
mandel
parents:
diff changeset
2 **
52
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
3 ** Copyright (C) 1992-2009 Nokia. All rights reserved.
1
e78566595089 initial import
mandel
parents:
diff changeset
4 ** Copyright (C) 2002-2005 Roberto Raggi <roberto@kdevelop.org>
e78566595089 initial import
mandel
parents:
diff changeset
5 **
e78566595089 initial import
mandel
parents:
diff changeset
6 ** This file is part of Qt Jambi.
e78566595089 initial import
mandel
parents:
diff changeset
7 **
52
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
8 ** Commercial Usage
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
9 Licensees holding valid Qt Commercial licenses may use this file in
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
10 accordance with the Qt Commercial License Agreement provided with the
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
11 Software or, alternatively, in accordance with the terms contained in
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
12 a written agreement between you and Nokia.
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
13
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
14 GNU Lesser General Public License Usage
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
15 Alternatively, this file may be used under the terms of the GNU Lesser
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
16 General Public License version 2.1 as published by the Free Software
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
17 Foundation and appearing in the file LICENSE.LGPL included in the
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
18 packaging of this file. Please review the following information to
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
19 ensure the GNU Lesser General Public License version 2.1 requirements
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
20 will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
21
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
22 In addition, as a special exception, Nokia gives you certain
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
23 additional rights. These rights are described in the Nokia Qt LGPL
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
24 Exception version 1.0, included in the file LGPL_EXCEPTION.txt in this
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
25 package.
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
26
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
27 GNU General Public License Usage
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
28 Alternatively, this file may be used under the terms of the GNU
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
29 General Public License version 3.0 as published by the Free Software
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
30 Foundation and appearing in the file LICENSE.GPL included in the
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
31 packaging of this file. Please review the following information to
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
32 ensure the GNU General Public License version 3.0 requirements will be
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
33 met: http://www.gnu.org/copyleft/gpl.html.
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
34
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
35 If you are unsure which license is appropriate for your use, please
09a0f1d048f2 update parser to that from jambi 4.5, attemt to fix building with gcc 4.4
eldar
parents: 1
diff changeset
36 contact the sales department at qt-sales@nokia.com.
1
e78566595089 initial import
mandel
parents:
diff changeset
37
e78566595089 initial import
mandel
parents:
diff changeset
38 **
e78566595089 initial import
mandel
parents:
diff changeset
39 ** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
e78566595089 initial import
mandel
parents:
diff changeset
40 ** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
e78566595089 initial import
mandel
parents:
diff changeset
41 **
e78566595089 initial import
mandel
parents:
diff changeset
42 ****************************************************************************/
e78566595089 initial import
mandel
parents:
diff changeset
43
e78566595089 initial import
mandel
parents:
diff changeset
44
e78566595089 initial import
mandel
parents:
diff changeset
45 #include "control.h"
e78566595089 initial import
mandel
parents:
diff changeset
46 #include "lexer.h"
e78566595089 initial import
mandel
parents:
diff changeset
47
e78566595089 initial import
mandel
parents:
diff changeset
48 Control::Control()
e78566595089 initial import
mandel
parents:
diff changeset
49 : current_context(0),
e78566595089 initial import
mandel
parents:
diff changeset
50 _M_skipFunctionBody(false),
e78566595089 initial import
mandel
parents:
diff changeset
51 _M_lexer(0),
e78566595089 initial import
mandel
parents:
diff changeset
52 _M_parser(0)
e78566595089 initial import
mandel
parents:
diff changeset
53 {
e78566595089 initial import
mandel
parents:
diff changeset
54 pushContext();
e78566595089 initial import
mandel
parents:
diff changeset
55
e78566595089 initial import
mandel
parents:
diff changeset
56 declareTypedef(findOrInsertName("__builtin_va_list",
e78566595089 initial import
mandel
parents:
diff changeset
57 strlen("__builtin_va_list")), 0);
e78566595089 initial import
mandel
parents:
diff changeset
58 }
e78566595089 initial import
mandel
parents:
diff changeset
59
e78566595089 initial import
mandel
parents:
diff changeset
60 Control::~Control()
e78566595089 initial import
mandel
parents:
diff changeset
61 {
e78566595089 initial import
mandel
parents:
diff changeset
62 popContext();
e78566595089 initial import
mandel
parents:
diff changeset
63
e78566595089 initial import
mandel
parents:
diff changeset
64 Q_ASSERT(current_context == 0);
e78566595089 initial import
mandel
parents:
diff changeset
65 }
e78566595089 initial import
mandel
parents:
diff changeset
66
e78566595089 initial import
mandel
parents:
diff changeset
67 Lexer *Control::changeLexer(Lexer *lexer)
e78566595089 initial import
mandel
parents:
diff changeset
68 {
e78566595089 initial import
mandel
parents:
diff changeset
69 Lexer *old = _M_lexer;
e78566595089 initial import
mandel
parents:
diff changeset
70 _M_lexer = lexer;
e78566595089 initial import
mandel
parents:
diff changeset
71 return old;
e78566595089 initial import
mandel
parents:
diff changeset
72 }
e78566595089 initial import
mandel
parents:
diff changeset
73
e78566595089 initial import
mandel
parents:
diff changeset
74 Parser *Control::changeParser(Parser *parser)
e78566595089 initial import
mandel
parents:
diff changeset
75 {
e78566595089 initial import
mandel
parents:
diff changeset
76 Parser *old = _M_parser;
e78566595089 initial import
mandel
parents:
diff changeset
77 _M_parser = parser;
e78566595089 initial import
mandel
parents:
diff changeset
78 return old;
e78566595089 initial import
mandel
parents:
diff changeset
79 }
e78566595089 initial import
mandel
parents:
diff changeset
80
e78566595089 initial import
mandel
parents:
diff changeset
81 Type *Control::lookupType(const NameSymbol *name) const
e78566595089 initial import
mandel
parents:
diff changeset
82 {
e78566595089 initial import
mandel
parents:
diff changeset
83 Q_ASSERT(current_context != 0);
e78566595089 initial import
mandel
parents:
diff changeset
84
e78566595089 initial import
mandel
parents:
diff changeset
85 return current_context->resolve(name);
e78566595089 initial import
mandel
parents:
diff changeset
86 }
e78566595089 initial import
mandel
parents:
diff changeset
87
e78566595089 initial import
mandel
parents:
diff changeset
88 void Control::declare(const NameSymbol *name, Type *type)
e78566595089 initial import
mandel
parents:
diff changeset
89 {
e78566595089 initial import
mandel
parents:
diff changeset
90 //printf("*** Declare:");
e78566595089 initial import
mandel
parents:
diff changeset
91 //printSymbol(name);
e78566595089 initial import
mandel
parents:
diff changeset
92 //putchar('\n');
e78566595089 initial import
mandel
parents:
diff changeset
93 Q_ASSERT(current_context != 0);
e78566595089 initial import
mandel
parents:
diff changeset
94
e78566595089 initial import
mandel
parents:
diff changeset
95 current_context->bind(name, type);
e78566595089 initial import
mandel
parents:
diff changeset
96 }
e78566595089 initial import
mandel
parents:
diff changeset
97
e78566595089 initial import
mandel
parents:
diff changeset
98 void Control::pushContext()
e78566595089 initial import
mandel
parents:
diff changeset
99 {
e78566595089 initial import
mandel
parents:
diff changeset
100 // printf("+Context\n");
e78566595089 initial import
mandel
parents:
diff changeset
101 Context *new_context = new Context;
e78566595089 initial import
mandel
parents:
diff changeset
102 new_context->parent = current_context;
e78566595089 initial import
mandel
parents:
diff changeset
103 current_context = new_context;
e78566595089 initial import
mandel
parents:
diff changeset
104 }
e78566595089 initial import
mandel
parents:
diff changeset
105
e78566595089 initial import
mandel
parents:
diff changeset
106 void Control::popContext()
e78566595089 initial import
mandel
parents:
diff changeset
107 {
e78566595089 initial import
mandel
parents:
diff changeset
108 // printf("-Context\n");
e78566595089 initial import
mandel
parents:
diff changeset
109 Q_ASSERT(current_context != 0);
e78566595089 initial import
mandel
parents:
diff changeset
110
e78566595089 initial import
mandel
parents:
diff changeset
111 Context *old_context = current_context;
e78566595089 initial import
mandel
parents:
diff changeset
112 current_context = current_context->parent;
e78566595089 initial import
mandel
parents:
diff changeset
113
e78566595089 initial import
mandel
parents:
diff changeset
114 delete old_context;
e78566595089 initial import
mandel
parents:
diff changeset
115 }
e78566595089 initial import
mandel
parents:
diff changeset
116
e78566595089 initial import
mandel
parents:
diff changeset
117 void Control::declareTypedef(const NameSymbol *name, Declarator *d)
e78566595089 initial import
mandel
parents:
diff changeset
118 {
e78566595089 initial import
mandel
parents:
diff changeset
119 // printf("declared typedef:");
e78566595089 initial import
mandel
parents:
diff changeset
120 // printSymbol(name);
e78566595089 initial import
mandel
parents:
diff changeset
121 // printf("\n");
e78566595089 initial import
mandel
parents:
diff changeset
122 stl_typedef_table.insert(name, d);
e78566595089 initial import
mandel
parents:
diff changeset
123 }
e78566595089 initial import
mandel
parents:
diff changeset
124
e78566595089 initial import
mandel
parents:
diff changeset
125 bool Control::isTypedef(const NameSymbol *name) const
e78566595089 initial import
mandel
parents:
diff changeset
126 {
e78566595089 initial import
mandel
parents:
diff changeset
127 // printf("is typedef:");
e78566595089 initial import
mandel
parents:
diff changeset
128 // printSymbol(name);
e78566595089 initial import
mandel
parents:
diff changeset
129 // printf("= %d\n", (stl_typedef_table.find(name) != stl_typedef_table.end()));
e78566595089 initial import
mandel
parents:
diff changeset
130
e78566595089 initial import
mandel
parents:
diff changeset
131 return stl_typedef_table.contains(name);
e78566595089 initial import
mandel
parents:
diff changeset
132 }
e78566595089 initial import
mandel
parents:
diff changeset
133
e78566595089 initial import
mandel
parents:
diff changeset
134 QList<Control::ErrorMessage> Control::errorMessages () const
e78566595089 initial import
mandel
parents:
diff changeset
135 {
e78566595089 initial import
mandel
parents:
diff changeset
136 return _M_error_messages;
e78566595089 initial import
mandel
parents:
diff changeset
137 }
e78566595089 initial import
mandel
parents:
diff changeset
138
e78566595089 initial import
mandel
parents:
diff changeset
139 void Control::clearErrorMessages ()
e78566595089 initial import
mandel
parents:
diff changeset
140 {
e78566595089 initial import
mandel
parents:
diff changeset
141 _M_error_messages.clear ();
e78566595089 initial import
mandel
parents:
diff changeset
142 }
e78566595089 initial import
mandel
parents:
diff changeset
143
e78566595089 initial import
mandel
parents:
diff changeset
144 void Control::reportError (const ErrorMessage &errmsg)
e78566595089 initial import
mandel
parents:
diff changeset
145 {
e78566595089 initial import
mandel
parents:
diff changeset
146 _M_error_messages.append(errmsg);
e78566595089 initial import
mandel
parents:
diff changeset
147 }
e78566595089 initial import
mandel
parents:
diff changeset
148
e78566595089 initial import
mandel
parents:
diff changeset
149 // kate: space-indent on; indent-width 2; replace-tabs on;