Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 1 | //===--- Parser.cpp - C Language Family Parser ----------------------------===// |
| 2 | // |
| 3 | // The LLVM Compiler Infrastructure |
| 4 | // |
Chris Lattner | 0bc735f | 2007-12-29 19:59:25 +0000 | [diff] [blame] | 5 | // This file is distributed under the University of Illinois Open Source |
| 6 | // License. See LICENSE.TXT for details. |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 7 | // |
| 8 | //===----------------------------------------------------------------------===// |
| 9 | // |
| 10 | // This file implements the Parser interfaces. |
| 11 | // |
| 12 | //===----------------------------------------------------------------------===// |
| 13 | |
| 14 | #include "clang/Parse/Parser.h" |
Chris Lattner | 500d329 | 2009-01-29 05:15:15 +0000 | [diff] [blame] | 15 | #include "clang/Parse/ParseDiagnostic.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 16 | #include "clang/Parse/DeclSpec.h" |
| 17 | #include "clang/Parse/Scope.h" |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 18 | #include "llvm/Support/raw_ostream.h" |
Chris Lattner | c46d1a1 | 2008-10-20 06:45:43 +0000 | [diff] [blame] | 19 | #include "ExtensionRAIIObject.h" |
Daniel Dunbar | fcdd8fe | 2008-10-04 19:21:03 +0000 | [diff] [blame] | 20 | #include "ParsePragma.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 21 | using namespace clang; |
| 22 | |
Douglas Gregor | 2e22253 | 2009-07-02 17:08:52 +0000 | [diff] [blame] | 23 | /// \brief A comment handler that passes comments found by the preprocessor |
| 24 | /// to the parser action. |
| 25 | class ActionCommentHandler : public CommentHandler { |
| 26 | Action &Actions; |
| 27 | |
| 28 | public: |
| 29 | explicit ActionCommentHandler(Action &Actions) : Actions(Actions) { } |
| 30 | |
| 31 | virtual void HandleComment(Preprocessor &PP, SourceRange Comment) { |
| 32 | Actions.ActOnComment(Comment); |
| 33 | } |
| 34 | }; |
| 35 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 36 | Parser::Parser(Preprocessor &pp, Action &actions) |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 37 | : CrashInfo(*this), PP(pp), Actions(actions), Diags(PP.getDiagnostics()), |
Douglas Gregor | 55f6b14 | 2009-02-09 18:46:07 +0000 | [diff] [blame] | 38 | GreaterThanIsOperator(true) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 39 | Tok.setKind(tok::eof); |
| 40 | CurScope = 0; |
Chris Lattner | 9e344c6 | 2007-07-15 00:04:39 +0000 | [diff] [blame] | 41 | NumCachedScopes = 0; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 42 | ParenCount = BracketCount = BraceCount = 0; |
Chris Lattner | b28317a | 2009-03-28 19:18:32 +0000 | [diff] [blame] | 43 | ObjCImpDecl = DeclPtrTy(); |
Daniel Dunbar | fcdd8fe | 2008-10-04 19:21:03 +0000 | [diff] [blame] | 44 | |
| 45 | // Add #pragma handlers. These are removed and destroyed in the |
| 46 | // destructor. |
Ted Kremenek | 4726d03 | 2009-03-23 22:28:25 +0000 | [diff] [blame] | 47 | PackHandler.reset(new |
| 48 | PragmaPackHandler(&PP.getIdentifierTable().get("pack"), actions)); |
| 49 | PP.AddPragmaHandler(0, PackHandler.get()); |
| 50 | |
| 51 | UnusedHandler.reset(new |
| 52 | PragmaUnusedHandler(&PP.getIdentifierTable().get("unused"), actions, |
| 53 | *this)); |
| 54 | PP.AddPragmaHandler(0, UnusedHandler.get()); |
Eli Friedman | 9991479 | 2009-06-05 00:49:58 +0000 | [diff] [blame] | 55 | |
| 56 | WeakHandler.reset(new |
| 57 | PragmaWeakHandler(&PP.getIdentifierTable().get("weak"), actions)); |
| 58 | PP.AddPragmaHandler(0, WeakHandler.get()); |
Douglas Gregor | 2e22253 | 2009-07-02 17:08:52 +0000 | [diff] [blame] | 59 | |
| 60 | CommentHandler.reset(new ActionCommentHandler(actions)); |
| 61 | PP.AddCommentHandler(CommentHandler.get()); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 62 | } |
| 63 | |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 64 | /// If a crash happens while the parser is active, print out a line indicating |
| 65 | /// what the current token is. |
| 66 | void PrettyStackTraceParserEntry::print(llvm::raw_ostream &OS) const { |
| 67 | const Token &Tok = P.getCurToken(); |
Chris Lattner | ddcbc0a | 2009-03-05 07:27:50 +0000 | [diff] [blame] | 68 | if (Tok.is(tok::eof)) { |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 69 | OS << "<eof> parser at end of file\n"; |
| 70 | return; |
| 71 | } |
| 72 | |
Chris Lattner | ddcbc0a | 2009-03-05 07:27:50 +0000 | [diff] [blame] | 73 | if (Tok.getLocation().isInvalid()) { |
| 74 | OS << "<unknown> parser at unknown location\n"; |
| 75 | return; |
| 76 | } |
| 77 | |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 78 | const Preprocessor &PP = P.getPreprocessor(); |
| 79 | Tok.getLocation().print(OS, PP.getSourceManager()); |
| 80 | OS << ": current parser token '" << PP.getSpelling(Tok) << "'\n"; |
Douglas Gregor | f780abc | 2008-12-30 03:27:21 +0000 | [diff] [blame] | 81 | } |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 82 | |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 83 | |
Chris Lattner | 3cbfe2c | 2008-11-22 00:59:29 +0000 | [diff] [blame] | 84 | DiagnosticBuilder Parser::Diag(SourceLocation Loc, unsigned DiagID) { |
Chris Lattner | 0102c30 | 2009-03-05 07:24:28 +0000 | [diff] [blame] | 85 | return Diags.Report(FullSourceLoc(Loc, PP.getSourceManager()), DiagID); |
Chris Lattner | 1ab3b96 | 2008-11-18 07:48:38 +0000 | [diff] [blame] | 86 | } |
| 87 | |
Chris Lattner | 3cbfe2c | 2008-11-22 00:59:29 +0000 | [diff] [blame] | 88 | DiagnosticBuilder Parser::Diag(const Token &Tok, unsigned DiagID) { |
Chris Lattner | 1ab3b96 | 2008-11-18 07:48:38 +0000 | [diff] [blame] | 89 | return Diag(Tok.getLocation(), DiagID); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 90 | } |
| 91 | |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 92 | /// \brief Emits a diagnostic suggesting parentheses surrounding a |
| 93 | /// given range. |
| 94 | /// |
| 95 | /// \param Loc The location where we'll emit the diagnostic. |
| 96 | /// \param Loc The kind of diagnostic to emit. |
| 97 | /// \param ParenRange Source range enclosing code that should be parenthesized. |
| 98 | void Parser::SuggestParentheses(SourceLocation Loc, unsigned DK, |
| 99 | SourceRange ParenRange) { |
Douglas Gregor | b2fb6de | 2009-02-27 17:53:17 +0000 | [diff] [blame] | 100 | SourceLocation EndLoc = PP.getLocForEndOfToken(ParenRange.getEnd()); |
| 101 | if (!ParenRange.getEnd().isFileID() || EndLoc.isInvalid()) { |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 102 | // We can't display the parentheses, so just dig the |
| 103 | // warning/error and return. |
| 104 | Diag(Loc, DK); |
| 105 | return; |
| 106 | } |
| 107 | |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 108 | Diag(Loc, DK) |
Douglas Gregor | b2fb6de | 2009-02-27 17:53:17 +0000 | [diff] [blame] | 109 | << CodeModificationHint::CreateInsertion(ParenRange.getBegin(), "(") |
| 110 | << CodeModificationHint::CreateInsertion(EndLoc, ")"); |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 111 | } |
| 112 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 113 | /// MatchRHSPunctuation - For punctuation with a LHS and RHS (e.g. '['/']'), |
| 114 | /// this helper function matches and consumes the specified RHS token if |
| 115 | /// present. If not present, it emits the specified diagnostic indicating |
| 116 | /// that the parser failed to match the RHS of the token at LHSLoc. LHSName |
| 117 | /// should be the name of the unmatched LHS token. |
| 118 | SourceLocation Parser::MatchRHSPunctuation(tok::TokenKind RHSTok, |
| 119 | SourceLocation LHSLoc) { |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 120 | |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 121 | if (Tok.is(RHSTok)) |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 122 | return ConsumeAnyToken(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 123 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 124 | SourceLocation R = Tok.getLocation(); |
| 125 | const char *LHSName = "unknown"; |
| 126 | diag::kind DID = diag::err_parse_error; |
| 127 | switch (RHSTok) { |
| 128 | default: break; |
| 129 | case tok::r_paren : LHSName = "("; DID = diag::err_expected_rparen; break; |
| 130 | case tok::r_brace : LHSName = "{"; DID = diag::err_expected_rbrace; break; |
| 131 | case tok::r_square: LHSName = "["; DID = diag::err_expected_rsquare; break; |
| 132 | case tok::greater: LHSName = "<"; DID = diag::err_expected_greater; break; |
| 133 | } |
| 134 | Diag(Tok, DID); |
Chris Lattner | 28eb7e9 | 2008-11-23 23:17:07 +0000 | [diff] [blame] | 135 | Diag(LHSLoc, diag::note_matching) << LHSName; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 136 | SkipUntil(RHSTok); |
| 137 | return R; |
| 138 | } |
| 139 | |
| 140 | /// ExpectAndConsume - The parser expects that 'ExpectedTok' is next in the |
| 141 | /// input. If so, it is consumed and false is returned. |
| 142 | /// |
| 143 | /// If the input is malformed, this emits the specified diagnostic. Next, if |
| 144 | /// SkipToTok is specified, it calls SkipUntil(SkipToTok). Finally, true is |
| 145 | /// returned. |
| 146 | bool Parser::ExpectAndConsume(tok::TokenKind ExpectedTok, unsigned DiagID, |
| 147 | const char *Msg, tok::TokenKind SkipToTok) { |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 148 | if (Tok.is(ExpectedTok)) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 149 | ConsumeAnyToken(); |
| 150 | return false; |
| 151 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 152 | |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 153 | const char *Spelling = 0; |
Douglas Gregor | b2fb6de | 2009-02-27 17:53:17 +0000 | [diff] [blame] | 154 | SourceLocation EndLoc = PP.getLocForEndOfToken(PrevTokLocation); |
| 155 | if (EndLoc.isValid() && |
| 156 | (Spelling = tok::getTokenSimpleSpelling(ExpectedTok))) { |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 157 | // Show what code to insert to fix this problem. |
Douglas Gregor | b2fb6de | 2009-02-27 17:53:17 +0000 | [diff] [blame] | 158 | Diag(EndLoc, DiagID) |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 159 | << Msg |
Douglas Gregor | b2fb6de | 2009-02-27 17:53:17 +0000 | [diff] [blame] | 160 | << CodeModificationHint::CreateInsertion(EndLoc, Spelling); |
Douglas Gregor | 4b2d3f7 | 2009-02-26 21:00:50 +0000 | [diff] [blame] | 161 | } else |
| 162 | Diag(Tok, DiagID) << Msg; |
| 163 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 164 | if (SkipToTok != tok::unknown) |
| 165 | SkipUntil(SkipToTok); |
| 166 | return true; |
| 167 | } |
| 168 | |
| 169 | //===----------------------------------------------------------------------===// |
| 170 | // Error recovery. |
| 171 | //===----------------------------------------------------------------------===// |
| 172 | |
| 173 | /// SkipUntil - Read tokens until we get to the specified token, then consume |
Chris Lattner | 012cf46 | 2007-07-24 17:03:04 +0000 | [diff] [blame] | 174 | /// it (unless DontConsume is true). Because we cannot guarantee that the |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 175 | /// token will ever occur, this skips to the next token, or to some likely |
| 176 | /// good stopping point. If StopAtSemi is true, skipping will stop at a ';' |
| 177 | /// character. |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 178 | /// |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 179 | /// If SkipUntil finds the specified token, it returns true, otherwise it |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 180 | /// returns false. |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 181 | bool Parser::SkipUntil(const tok::TokenKind *Toks, unsigned NumToks, |
| 182 | bool StopAtSemi, bool DontConsume) { |
| 183 | // We always want this function to skip at least one token if the first token |
| 184 | // isn't T and if not at EOF. |
| 185 | bool isFirstTokenSkipped = true; |
| 186 | while (1) { |
| 187 | // If we found one of the tokens, stop and return true. |
| 188 | for (unsigned i = 0; i != NumToks; ++i) { |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 189 | if (Tok.is(Toks[i])) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 190 | if (DontConsume) { |
| 191 | // Noop, don't consume the token. |
| 192 | } else { |
| 193 | ConsumeAnyToken(); |
| 194 | } |
| 195 | return true; |
| 196 | } |
| 197 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 198 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 199 | switch (Tok.getKind()) { |
| 200 | case tok::eof: |
| 201 | // Ran out of tokens. |
| 202 | return false; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 203 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 204 | case tok::l_paren: |
| 205 | // Recursively skip properly-nested parens. |
| 206 | ConsumeParen(); |
| 207 | SkipUntil(tok::r_paren, false); |
| 208 | break; |
| 209 | case tok::l_square: |
| 210 | // Recursively skip properly-nested square brackets. |
| 211 | ConsumeBracket(); |
| 212 | SkipUntil(tok::r_square, false); |
| 213 | break; |
| 214 | case tok::l_brace: |
| 215 | // Recursively skip properly-nested braces. |
| 216 | ConsumeBrace(); |
| 217 | SkipUntil(tok::r_brace, false); |
| 218 | break; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 219 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 220 | // Okay, we found a ']' or '}' or ')', which we think should be balanced. |
| 221 | // Since the user wasn't looking for this token (if they were, it would |
| 222 | // already be handled), this isn't balanced. If there is a LHS token at a |
| 223 | // higher level, we will assume that this matches the unbalanced token |
| 224 | // and return it. Otherwise, this is a spurious RHS token, which we skip. |
| 225 | case tok::r_paren: |
| 226 | if (ParenCount && !isFirstTokenSkipped) |
| 227 | return false; // Matches something. |
| 228 | ConsumeParen(); |
| 229 | break; |
| 230 | case tok::r_square: |
| 231 | if (BracketCount && !isFirstTokenSkipped) |
| 232 | return false; // Matches something. |
| 233 | ConsumeBracket(); |
| 234 | break; |
| 235 | case tok::r_brace: |
| 236 | if (BraceCount && !isFirstTokenSkipped) |
| 237 | return false; // Matches something. |
| 238 | ConsumeBrace(); |
| 239 | break; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 240 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 241 | case tok::string_literal: |
| 242 | case tok::wide_string_literal: |
| 243 | ConsumeStringToken(); |
| 244 | break; |
| 245 | case tok::semi: |
| 246 | if (StopAtSemi) |
| 247 | return false; |
| 248 | // FALL THROUGH. |
| 249 | default: |
| 250 | // Skip this token. |
| 251 | ConsumeToken(); |
| 252 | break; |
| 253 | } |
| 254 | isFirstTokenSkipped = false; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 255 | } |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 256 | } |
| 257 | |
| 258 | //===----------------------------------------------------------------------===// |
| 259 | // Scope manipulation |
| 260 | //===----------------------------------------------------------------------===// |
| 261 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 262 | /// EnterScope - Start a new scope. |
| 263 | void Parser::EnterScope(unsigned ScopeFlags) { |
Chris Lattner | 9e344c6 | 2007-07-15 00:04:39 +0000 | [diff] [blame] | 264 | if (NumCachedScopes) { |
| 265 | Scope *N = ScopeCache[--NumCachedScopes]; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 266 | N->Init(CurScope, ScopeFlags); |
| 267 | CurScope = N; |
| 268 | } else { |
| 269 | CurScope = new Scope(CurScope, ScopeFlags); |
| 270 | } |
| 271 | } |
| 272 | |
| 273 | /// ExitScope - Pop a scope off the scope stack. |
| 274 | void Parser::ExitScope() { |
| 275 | assert(CurScope && "Scope imbalance!"); |
| 276 | |
Chris Lattner | 90ae68a | 2007-10-09 20:37:18 +0000 | [diff] [blame] | 277 | // Inform the actions module that this scope is going away if there are any |
| 278 | // decls in it. |
| 279 | if (!CurScope->decl_empty()) |
Steve Naroff | b216c88 | 2007-10-09 22:01:59 +0000 | [diff] [blame] | 280 | Actions.ActOnPopScope(Tok.getLocation(), CurScope); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 281 | |
Chris Lattner | 9e344c6 | 2007-07-15 00:04:39 +0000 | [diff] [blame] | 282 | Scope *OldScope = CurScope; |
| 283 | CurScope = OldScope->getParent(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 284 | |
Chris Lattner | 9e344c6 | 2007-07-15 00:04:39 +0000 | [diff] [blame] | 285 | if (NumCachedScopes == ScopeCacheSize) |
| 286 | delete OldScope; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 287 | else |
Chris Lattner | 9e344c6 | 2007-07-15 00:04:39 +0000 | [diff] [blame] | 288 | ScopeCache[NumCachedScopes++] = OldScope; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 289 | } |
| 290 | |
| 291 | |
| 292 | |
| 293 | |
| 294 | //===----------------------------------------------------------------------===// |
| 295 | // C99 6.9: External Definitions. |
| 296 | //===----------------------------------------------------------------------===// |
| 297 | |
| 298 | Parser::~Parser() { |
| 299 | // If we still have scopes active, delete the scope tree. |
| 300 | delete CurScope; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 301 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 302 | // Free the scope cache. |
Chris Lattner | 9e344c6 | 2007-07-15 00:04:39 +0000 | [diff] [blame] | 303 | for (unsigned i = 0, e = NumCachedScopes; i != e; ++i) |
| 304 | delete ScopeCache[i]; |
Daniel Dunbar | fcdd8fe | 2008-10-04 19:21:03 +0000 | [diff] [blame] | 305 | |
| 306 | // Remove the pragma handlers we installed. |
Ted Kremenek | 4726d03 | 2009-03-23 22:28:25 +0000 | [diff] [blame] | 307 | PP.RemovePragmaHandler(0, PackHandler.get()); |
| 308 | PackHandler.reset(); |
| 309 | PP.RemovePragmaHandler(0, UnusedHandler.get()); |
| 310 | UnusedHandler.reset(); |
Eli Friedman | 9991479 | 2009-06-05 00:49:58 +0000 | [diff] [blame] | 311 | PP.RemovePragmaHandler(0, WeakHandler.get()); |
| 312 | WeakHandler.reset(); |
Douglas Gregor | 2e22253 | 2009-07-02 17:08:52 +0000 | [diff] [blame] | 313 | PP.RemoveCommentHandler(CommentHandler.get()); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 314 | } |
| 315 | |
| 316 | /// Initialize - Warm up the parser. |
| 317 | /// |
| 318 | void Parser::Initialize() { |
| 319 | // Prime the lexer look-ahead. |
| 320 | ConsumeToken(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 321 | |
Chris Lattner | 31e0572 | 2007-08-26 06:24:45 +0000 | [diff] [blame] | 322 | // Create the translation unit scope. Install it as the current scope. |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 323 | assert(CurScope == 0 && "A scope is already active?"); |
Chris Lattner | 31e0572 | 2007-08-26 06:24:45 +0000 | [diff] [blame] | 324 | EnterScope(Scope::DeclScope); |
Steve Naroff | b216c88 | 2007-10-09 22:01:59 +0000 | [diff] [blame] | 325 | Actions.ActOnTranslationUnitScope(Tok.getLocation(), CurScope); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 326 | |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 327 | if (Tok.is(tok::eof) && |
Chris Lattner | f726175 | 2007-08-25 05:47:03 +0000 | [diff] [blame] | 328 | !getLang().CPlusPlus) // Empty source file is an extension in C |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 329 | Diag(Tok, diag::ext_empty_source_file); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 330 | |
Chris Lattner | 34870da | 2007-08-29 22:54:08 +0000 | [diff] [blame] | 331 | // Initialization for Objective-C context sensitive keywords recognition. |
Ted Kremenek | a526c5c | 2008-01-07 19:49:32 +0000 | [diff] [blame] | 332 | // Referenced in Parser::ParseObjCTypeQualifierList. |
Chris Lattner | 34870da | 2007-08-29 22:54:08 +0000 | [diff] [blame] | 333 | if (getLang().ObjC1) { |
Ted Kremenek | a526c5c | 2008-01-07 19:49:32 +0000 | [diff] [blame] | 334 | ObjCTypeQuals[objc_in] = &PP.getIdentifierTable().get("in"); |
| 335 | ObjCTypeQuals[objc_out] = &PP.getIdentifierTable().get("out"); |
| 336 | ObjCTypeQuals[objc_inout] = &PP.getIdentifierTable().get("inout"); |
| 337 | ObjCTypeQuals[objc_oneway] = &PP.getIdentifierTable().get("oneway"); |
| 338 | ObjCTypeQuals[objc_bycopy] = &PP.getIdentifierTable().get("bycopy"); |
| 339 | ObjCTypeQuals[objc_byref] = &PP.getIdentifierTable().get("byref"); |
Chris Lattner | 34870da | 2007-08-29 22:54:08 +0000 | [diff] [blame] | 340 | } |
Daniel Dunbar | 662e8b5 | 2008-08-14 22:04:54 +0000 | [diff] [blame] | 341 | |
| 342 | Ident_super = &PP.getIdentifierTable().get("super"); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 343 | } |
| 344 | |
| 345 | /// ParseTopLevelDecl - Parse one top-level declaration, return whatever the |
| 346 | /// action tells us to. This returns true if the EOF was encountered. |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 347 | bool Parser::ParseTopLevelDecl(DeclGroupPtrTy &Result) { |
| 348 | Result = DeclGroupPtrTy(); |
Chris Lattner | 9299f3f | 2008-08-23 03:19:52 +0000 | [diff] [blame] | 349 | if (Tok.is(tok::eof)) { |
| 350 | Actions.ActOnEndOfTranslationUnit(); |
| 351 | return true; |
| 352 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 353 | |
Steve Naroff | 89307ff | 2007-11-29 23:05:20 +0000 | [diff] [blame] | 354 | Result = ParseExternalDeclaration(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 355 | return false; |
| 356 | } |
| 357 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 358 | /// ParseTranslationUnit: |
| 359 | /// translation-unit: [C99 6.9] |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 360 | /// external-declaration |
| 361 | /// translation-unit external-declaration |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 362 | void Parser::ParseTranslationUnit() { |
Douglas Gregor | 8935b8b | 2008-12-10 06:34:36 +0000 | [diff] [blame] | 363 | Initialize(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 364 | |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 365 | DeclGroupPtrTy Res; |
Steve Naroff | 89307ff | 2007-11-29 23:05:20 +0000 | [diff] [blame] | 366 | while (!ParseTopLevelDecl(Res)) |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 367 | /*parse them all*/; |
Chris Lattner | 06f5485 | 2008-08-23 02:00:52 +0000 | [diff] [blame] | 368 | |
| 369 | ExitScope(); |
| 370 | assert(CurScope == 0 && "Scope imbalance!"); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 371 | } |
| 372 | |
| 373 | /// ParseExternalDeclaration: |
Chris Lattner | 90b93d6 | 2008-12-08 21:59:01 +0000 | [diff] [blame] | 374 | /// |
Douglas Gregor | c19923d | 2008-11-21 16:10:08 +0000 | [diff] [blame] | 375 | /// external-declaration: [C99 6.9], declaration: [C++ dcl.dcl] |
Chris Lattner | c301815 | 2007-08-10 20:57:02 +0000 | [diff] [blame] | 376 | /// function-definition |
| 377 | /// declaration |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 378 | /// [EXT] ';' |
| 379 | /// [GNU] asm-definition |
Chris Lattner | c301815 | 2007-08-10 20:57:02 +0000 | [diff] [blame] | 380 | /// [GNU] __extension__ external-declaration |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 381 | /// [OBJC] objc-class-definition |
| 382 | /// [OBJC] objc-class-declaration |
| 383 | /// [OBJC] objc-alias-declaration |
| 384 | /// [OBJC] objc-protocol-definition |
| 385 | /// [OBJC] objc-method-definition |
| 386 | /// [OBJC] @end |
Douglas Gregor | c19923d | 2008-11-21 16:10:08 +0000 | [diff] [blame] | 387 | /// [C++] linkage-specification |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 388 | /// [GNU] asm-definition: |
| 389 | /// simple-asm-expr ';' |
| 390 | /// |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 391 | Parser::DeclGroupPtrTy Parser::ParseExternalDeclaration() { |
| 392 | DeclPtrTy SingleDecl; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 393 | switch (Tok.getKind()) { |
| 394 | case tok::semi: |
Douglas Gregor | 9b3064b | 2009-04-01 22:41:11 +0000 | [diff] [blame] | 395 | Diag(Tok, diag::ext_top_level_semi) |
| 396 | << CodeModificationHint::CreateRemoval(SourceRange(Tok.getLocation())); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 397 | ConsumeToken(); |
| 398 | // TODO: Invoke action for top-level semicolon. |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 399 | return DeclGroupPtrTy(); |
Chris Lattner | 90b93d6 | 2008-12-08 21:59:01 +0000 | [diff] [blame] | 400 | case tok::r_brace: |
| 401 | Diag(Tok, diag::err_expected_external_declaration); |
| 402 | ConsumeBrace(); |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 403 | return DeclGroupPtrTy(); |
Chris Lattner | 90b93d6 | 2008-12-08 21:59:01 +0000 | [diff] [blame] | 404 | case tok::eof: |
| 405 | Diag(Tok, diag::err_expected_external_declaration); |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 406 | return DeclGroupPtrTy(); |
Chris Lattner | c301815 | 2007-08-10 20:57:02 +0000 | [diff] [blame] | 407 | case tok::kw___extension__: { |
Chris Lattner | c46d1a1 | 2008-10-20 06:45:43 +0000 | [diff] [blame] | 408 | // __extension__ silences extension warnings in the subexpression. |
| 409 | ExtensionRAIIObject O(Diags); // Use RAII to do this. |
Chris Lattner | 39146d6 | 2008-10-20 06:51:33 +0000 | [diff] [blame] | 410 | ConsumeToken(); |
Chris Lattner | c46d1a1 | 2008-10-20 06:45:43 +0000 | [diff] [blame] | 411 | return ParseExternalDeclaration(); |
Chris Lattner | c301815 | 2007-08-10 20:57:02 +0000 | [diff] [blame] | 412 | } |
Anders Carlsson | dfab6cb | 2008-02-08 00:33:21 +0000 | [diff] [blame] | 413 | case tok::kw_asm: { |
Sebastian Redl | effa8d1 | 2008-12-10 00:02:53 +0000 | [diff] [blame] | 414 | OwningExprResult Result(ParseSimpleAsm()); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 415 | |
Anders Carlsson | 3f9424f | 2008-02-08 00:23:11 +0000 | [diff] [blame] | 416 | ExpectAndConsume(tok::semi, diag::err_expected_semi_after, |
| 417 | "top-level asm block"); |
Anders Carlsson | dfab6cb | 2008-02-08 00:33:21 +0000 | [diff] [blame] | 418 | |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 419 | if (Result.isInvalid()) |
| 420 | return DeclGroupPtrTy(); |
| 421 | SingleDecl = Actions.ActOnFileScopeAsmDecl(Tok.getLocation(), move(Result)); |
| 422 | break; |
Anders Carlsson | dfab6cb | 2008-02-08 00:33:21 +0000 | [diff] [blame] | 423 | } |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 424 | case tok::at: |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 425 | // @ is not a legal token unless objc is enabled, no need to check for ObjC. |
| 426 | /// FIXME: ParseObjCAtDirectives should return a DeclGroup for things like |
| 427 | /// @class foo, bar; |
| 428 | SingleDecl = ParseObjCAtDirectives(); |
| 429 | break; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 430 | case tok::minus: |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 431 | case tok::plus: |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 432 | if (!getLang().ObjC1) { |
| 433 | Diag(Tok, diag::err_expected_external_declaration); |
| 434 | ConsumeToken(); |
| 435 | return DeclGroupPtrTy(); |
| 436 | } |
| 437 | SingleDecl = ParseObjCMethodDefinition(); |
| 438 | break; |
Douglas Gregor | f780abc | 2008-12-30 03:27:21 +0000 | [diff] [blame] | 439 | case tok::kw_using: |
Chris Lattner | 8f08cb7 | 2007-08-25 06:57:03 +0000 | [diff] [blame] | 440 | case tok::kw_namespace: |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 441 | case tok::kw_typedef: |
Douglas Gregor | adcac88 | 2008-12-01 23:54:00 +0000 | [diff] [blame] | 442 | case tok::kw_template: |
| 443 | case tok::kw_export: // As in 'export template' |
Anders Carlsson | 511d7ab | 2009-03-11 16:27:10 +0000 | [diff] [blame] | 444 | case tok::kw_static_assert: |
Chris Lattner | bae3511 | 2007-08-25 18:15:16 +0000 | [diff] [blame] | 445 | // A function definition cannot start with a these keywords. |
Chris Lattner | 97144fc | 2009-04-02 04:16:50 +0000 | [diff] [blame] | 446 | { |
| 447 | SourceLocation DeclEnd; |
| 448 | return ParseDeclaration(Declarator::FileContext, DeclEnd); |
| 449 | } |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 450 | default: |
| 451 | // We can't tell whether this is a function-definition or declaration yet. |
| 452 | return ParseDeclarationOrFunctionDefinition(); |
| 453 | } |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 454 | |
| 455 | // This routine returns a DeclGroup, if the thing we parsed only contains a |
| 456 | // single decl, convert it now. |
| 457 | return Actions.ConvertDeclToDeclGroup(SingleDecl); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 458 | } |
| 459 | |
Douglas Gregor | 1426e53 | 2009-05-12 21:31:51 +0000 | [diff] [blame] | 460 | /// \brief Determine whether the current token, if it occurs after a |
| 461 | /// declarator, continues a declaration or declaration list. |
| 462 | bool Parser::isDeclarationAfterDeclarator() { |
| 463 | return Tok.is(tok::equal) || // int X()= -> not a function def |
| 464 | Tok.is(tok::comma) || // int X(), -> not a function def |
| 465 | Tok.is(tok::semi) || // int X(); -> not a function def |
| 466 | Tok.is(tok::kw_asm) || // int X() __asm__ -> not a function def |
| 467 | Tok.is(tok::kw___attribute) || // int X() __attr__ -> not a function def |
| 468 | (getLang().CPlusPlus && |
| 469 | Tok.is(tok::l_paren)); // int X(0) -> not a function def [C++] |
| 470 | } |
| 471 | |
| 472 | /// \brief Determine whether the current token, if it occurs after a |
| 473 | /// declarator, indicates the start of a function definition. |
| 474 | bool Parser::isStartOfFunctionDefinition() { |
| 475 | return Tok.is(tok::l_brace) || // int X() {} |
| 476 | (!getLang().CPlusPlus && |
| 477 | isDeclarationSpecifier()) || // int X(f) int f; {} |
| 478 | (getLang().CPlusPlus && |
| 479 | (Tok.is(tok::colon) || // X() : Base() {} (used for ctors) |
| 480 | Tok.is(tok::kw_try))); // X() try { ... } |
| 481 | } |
| 482 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 483 | /// ParseDeclarationOrFunctionDefinition - Parse either a function-definition or |
| 484 | /// a declaration. We can't tell which we have until we read up to the |
Douglas Gregor | c4b4e7b | 2008-12-24 02:52:09 +0000 | [diff] [blame] | 485 | /// compound-statement in function-definition. TemplateParams, if |
| 486 | /// non-NULL, provides the template parameters when we're parsing a |
| 487 | /// C++ template-declaration. |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 488 | /// |
| 489 | /// function-definition: [C99 6.9.1] |
Chris Lattner | a798ebc | 2008-04-05 05:52:15 +0000 | [diff] [blame] | 490 | /// decl-specs declarator declaration-list[opt] compound-statement |
| 491 | /// [C90] function-definition: [C99 6.7.1] - implicit int result |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 492 | /// [C90] decl-specs[opt] declarator declaration-list[opt] compound-statement |
Chris Lattner | a798ebc | 2008-04-05 05:52:15 +0000 | [diff] [blame] | 493 | /// |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 494 | /// declaration: [C99 6.7] |
Chris Lattner | 697e15f | 2007-08-22 06:06:56 +0000 | [diff] [blame] | 495 | /// declaration-specifiers init-declarator-list[opt] ';' |
| 496 | /// [!C99] init-declarator-list ';' [TODO: warn in c99 mode] |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 497 | /// [OMP] threadprivate-directive [TODO] |
| 498 | /// |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 499 | Parser::DeclGroupPtrTy |
Douglas Gregor | 7091319 | 2009-05-12 21:43:46 +0000 | [diff] [blame] | 500 | Parser::ParseDeclarationOrFunctionDefinition(AccessSpecifier AS) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 501 | // Parse the common declaration-specifiers piece. |
| 502 | DeclSpec DS; |
Douglas Gregor | 4d9a16f | 2009-05-12 23:25:50 +0000 | [diff] [blame] | 503 | ParseDeclarationSpecifiers(DS, ParsedTemplateInfo(), AS); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 504 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 505 | // C99 6.7.2.3p6: Handle "struct-or-union identifier;", "enum { X };" |
| 506 | // declaration-specifiers init-declarator-list[opt] ';' |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 507 | if (Tok.is(tok::semi)) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 508 | ConsumeToken(); |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 509 | DeclPtrTy TheDecl = Actions.ParsedFreeStandingDeclSpec(CurScope, DS); |
| 510 | return Actions.ConvertDeclToDeclGroup(TheDecl); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 511 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 512 | |
Daniel Dunbar | 246e70f | 2008-09-26 04:48:09 +0000 | [diff] [blame] | 513 | // ObjC2 allows prefix attributes on class interfaces and protocols. |
| 514 | // FIXME: This still needs better diagnostics. We should only accept |
| 515 | // attributes here, no types, etc. |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 516 | if (getLang().ObjC2 && Tok.is(tok::at)) { |
Steve Naroff | dac269b | 2007-08-20 21:31:48 +0000 | [diff] [blame] | 517 | SourceLocation AtLoc = ConsumeToken(); // the "@" |
Daniel Dunbar | 246e70f | 2008-09-26 04:48:09 +0000 | [diff] [blame] | 518 | if (!Tok.isObjCAtKeyword(tok::objc_interface) && |
| 519 | !Tok.isObjCAtKeyword(tok::objc_protocol)) { |
| 520 | Diag(Tok, diag::err_objc_unexpected_attr); |
Chris Lattner | cb53b36 | 2007-12-27 19:57:00 +0000 | [diff] [blame] | 521 | SkipUntil(tok::semi); // FIXME: better skip? |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 522 | return DeclGroupPtrTy(); |
Chris Lattner | cb53b36 | 2007-12-27 19:57:00 +0000 | [diff] [blame] | 523 | } |
Fariborz Jahanian | 0de2ae2 | 2008-01-02 19:17:38 +0000 | [diff] [blame] | 524 | const char *PrevSpec = 0; |
John McCall | fec5401 | 2009-08-03 20:12:06 +0000 | [diff] [blame] | 525 | unsigned DiagID; |
| 526 | if (DS.SetTypeSpecType(DeclSpec::TST_unspecified, AtLoc, PrevSpec, DiagID)) |
| 527 | Diag(AtLoc, DiagID) << PrevSpec; |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 528 | |
| 529 | DeclPtrTy TheDecl; |
Daniel Dunbar | 246e70f | 2008-09-26 04:48:09 +0000 | [diff] [blame] | 530 | if (Tok.isObjCAtKeyword(tok::objc_protocol)) |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 531 | TheDecl = ParseObjCAtProtocolDeclaration(AtLoc, DS.getAttributes()); |
| 532 | else |
| 533 | TheDecl = ParseObjCAtInterfaceDeclaration(AtLoc, DS.getAttributes()); |
| 534 | return Actions.ConvertDeclToDeclGroup(TheDecl); |
Steve Naroff | dac269b | 2007-08-20 21:31:48 +0000 | [diff] [blame] | 535 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 536 | |
Chris Lattner | c6fdc34 | 2008-01-12 07:05:38 +0000 | [diff] [blame] | 537 | // If the declspec consisted only of 'extern' and we have a string |
| 538 | // literal following it, this must be a C++ linkage specifier like |
| 539 | // 'extern "C"'. |
Chris Lattner | 3c6f6a7 | 2008-01-12 07:08:43 +0000 | [diff] [blame] | 540 | if (Tok.is(tok::string_literal) && getLang().CPlusPlus && |
Chris Lattner | c6fdc34 | 2008-01-12 07:05:38 +0000 | [diff] [blame] | 541 | DS.getStorageClassSpec() == DeclSpec::SCS_extern && |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 542 | DS.getParsedSpecifiers() == DeclSpec::PQ_StorageClassSpecifier) { |
| 543 | DeclPtrTy TheDecl = ParseLinkage(Declarator::FileContext); |
| 544 | return Actions.ConvertDeclToDeclGroup(TheDecl); |
| 545 | } |
Chris Lattner | c6fdc34 | 2008-01-12 07:05:38 +0000 | [diff] [blame] | 546 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 547 | // Parse the first declarator. |
| 548 | Declarator DeclaratorInfo(DS, Declarator::FileContext); |
| 549 | ParseDeclarator(DeclaratorInfo); |
| 550 | // Error parsing the declarator? |
Douglas Gregor | 10bd368 | 2008-11-17 22:58:34 +0000 | [diff] [blame] | 551 | if (!DeclaratorInfo.hasName()) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 552 | // If so, skip until the semi-colon or a }. |
Douglas Gregor | cb43d99 | 2008-12-01 23:03:32 +0000 | [diff] [blame] | 553 | SkipUntil(tok::r_brace, true, true); |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 554 | if (Tok.is(tok::semi)) |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 555 | ConsumeToken(); |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 556 | return DeclGroupPtrTy(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 557 | } |
| 558 | |
Douglas Gregor | 1426e53 | 2009-05-12 21:31:51 +0000 | [diff] [blame] | 559 | // If we have a declaration or declarator list, handle it. |
| 560 | if (isDeclarationAfterDeclarator()) { |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 561 | // Parse the init-declarator-list for a normal declaration. |
Chris Lattner | 23c4b18 | 2009-03-29 17:18:04 +0000 | [diff] [blame] | 562 | DeclGroupPtrTy DG = |
| 563 | ParseInitDeclaratorListAfterFirstDeclarator(DeclaratorInfo); |
| 564 | // Eat the semi colon after the declaration. |
John McCall | 5c15fe1 | 2009-07-31 02:20:35 +0000 | [diff] [blame] | 565 | ExpectAndConsume(tok::semi, diag::err_expected_semi_declaration); |
Chris Lattner | 23c4b18 | 2009-03-29 17:18:04 +0000 | [diff] [blame] | 566 | return DG; |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 567 | } |
| 568 | |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 569 | if (DeclaratorInfo.isFunctionDeclarator() && |
Douglas Gregor | 1426e53 | 2009-05-12 21:31:51 +0000 | [diff] [blame] | 570 | isStartOfFunctionDefinition()) { |
Steve Naroff | e39bfd0 | 2008-02-14 02:58:32 +0000 | [diff] [blame] | 571 | if (DS.getStorageClassSpec() == DeclSpec::SCS_typedef) { |
| 572 | Diag(Tok, diag::err_function_declared_typedef); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 573 | |
Steve Naroff | e39bfd0 | 2008-02-14 02:58:32 +0000 | [diff] [blame] | 574 | if (Tok.is(tok::l_brace)) { |
| 575 | // This recovery skips the entire function body. It would be nice |
Douglas Gregor | 72c3f31 | 2008-12-05 18:15:24 +0000 | [diff] [blame] | 576 | // to simply call ParseFunctionDefinition() below, however Sema |
Steve Naroff | e39bfd0 | 2008-02-14 02:58:32 +0000 | [diff] [blame] | 577 | // assumes the declarator represents a function, not a typedef. |
| 578 | ConsumeBrace(); |
| 579 | SkipUntil(tok::r_brace, true); |
| 580 | } else { |
| 581 | SkipUntil(tok::semi); |
| 582 | } |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 583 | return DeclGroupPtrTy(); |
Steve Naroff | e39bfd0 | 2008-02-14 02:58:32 +0000 | [diff] [blame] | 584 | } |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 585 | DeclPtrTy TheDecl = ParseFunctionDefinition(DeclaratorInfo); |
| 586 | return Actions.ConvertDeclToDeclGroup(TheDecl); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 587 | } |
Chris Lattner | 682bf92 | 2009-03-29 16:50:03 +0000 | [diff] [blame] | 588 | |
| 589 | if (DeclaratorInfo.isFunctionDeclarator()) |
| 590 | Diag(Tok, diag::err_expected_fn_body); |
| 591 | else |
| 592 | Diag(Tok, diag::err_invalid_token_after_toplevel_declarator); |
| 593 | SkipUntil(tok::semi); |
| 594 | return DeclGroupPtrTy(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 595 | } |
| 596 | |
| 597 | /// ParseFunctionDefinition - We parsed and verified that the specified |
| 598 | /// Declarator is well formed. If this is a K&R-style function, read the |
| 599 | /// parameters declaration-list, then start the compound-statement. |
| 600 | /// |
Chris Lattner | a798ebc | 2008-04-05 05:52:15 +0000 | [diff] [blame] | 601 | /// function-definition: [C99 6.9.1] |
| 602 | /// decl-specs declarator declaration-list[opt] compound-statement |
| 603 | /// [C90] function-definition: [C99 6.7.1] - implicit int result |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 604 | /// [C90] decl-specs[opt] declarator declaration-list[opt] compound-statement |
Douglas Gregor | 7ad8390 | 2008-11-05 04:29:56 +0000 | [diff] [blame] | 605 | /// [C++] function-definition: [C++ 8.4] |
Chris Lattner | 23c4b18 | 2009-03-29 17:18:04 +0000 | [diff] [blame] | 606 | /// decl-specifier-seq[opt] declarator ctor-initializer[opt] |
| 607 | /// function-body |
Douglas Gregor | 7ad8390 | 2008-11-05 04:29:56 +0000 | [diff] [blame] | 608 | /// [C++] function-definition: [C++ 8.4] |
Sebastian Redl | d3a413d | 2009-04-26 20:35:05 +0000 | [diff] [blame] | 609 | /// decl-specifier-seq[opt] declarator function-try-block |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 610 | /// |
Douglas Gregor | 52591bf | 2009-06-24 00:54:41 +0000 | [diff] [blame] | 611 | Parser::DeclPtrTy Parser::ParseFunctionDefinition(Declarator &D, |
| 612 | const ParsedTemplateInfo &TemplateInfo) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 613 | const DeclaratorChunk &FnTypeInfo = D.getTypeObject(0); |
| 614 | assert(FnTypeInfo.Kind == DeclaratorChunk::Function && |
| 615 | "This isn't a function declarator!"); |
| 616 | const DeclaratorChunk::FunctionTypeInfo &FTI = FnTypeInfo.Fun; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 617 | |
Chris Lattner | a798ebc | 2008-04-05 05:52:15 +0000 | [diff] [blame] | 618 | // If this is C90 and the declspecs were completely missing, fudge in an |
| 619 | // implicit int. We do this here because this is the only place where |
| 620 | // declaration-specifiers are completely optional in the grammar. |
Chris Lattner | 2a327d1 | 2009-02-27 18:35:46 +0000 | [diff] [blame] | 621 | if (getLang().ImplicitInt && D.getDeclSpec().isEmpty()) { |
Chris Lattner | a798ebc | 2008-04-05 05:52:15 +0000 | [diff] [blame] | 622 | const char *PrevSpec; |
John McCall | fec5401 | 2009-08-03 20:12:06 +0000 | [diff] [blame] | 623 | unsigned DiagID; |
Chris Lattner | 31c2868 | 2008-10-20 02:01:34 +0000 | [diff] [blame] | 624 | D.getMutableDeclSpec().SetTypeSpecType(DeclSpec::TST_int, |
| 625 | D.getIdentifierLoc(), |
John McCall | fec5401 | 2009-08-03 20:12:06 +0000 | [diff] [blame] | 626 | PrevSpec, DiagID); |
Sebastian Redl | ab197ba | 2009-02-09 18:23:29 +0000 | [diff] [blame] | 627 | D.SetRangeBegin(D.getDeclSpec().getSourceRange().getBegin()); |
Chris Lattner | a798ebc | 2008-04-05 05:52:15 +0000 | [diff] [blame] | 628 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 629 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 630 | // If this declaration was formed with a K&R-style identifier list for the |
| 631 | // arguments, parse declarations for all of the args next. |
| 632 | // int foo(a,b) int a; float b; {} |
| 633 | if (!FTI.hasPrototype && FTI.NumArgs != 0) |
| 634 | ParseKNRParamDeclarations(D); |
| 635 | |
Douglas Gregor | 7ad8390 | 2008-11-05 04:29:56 +0000 | [diff] [blame] | 636 | // We should have either an opening brace or, in a C++ constructor, |
| 637 | // we may have a colon. |
Sebastian Redl | d3a413d | 2009-04-26 20:35:05 +0000 | [diff] [blame] | 638 | if (Tok.isNot(tok::l_brace) && Tok.isNot(tok::colon) && |
| 639 | Tok.isNot(tok::kw_try)) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 640 | Diag(Tok, diag::err_expected_fn_body); |
| 641 | |
| 642 | // Skip over garbage, until we get to '{'. Don't eat the '{'. |
| 643 | SkipUntil(tok::l_brace, true, true); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 644 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 645 | // If we didn't find the '{', bail out. |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 646 | if (Tok.isNot(tok::l_brace)) |
Chris Lattner | b28317a | 2009-03-28 19:18:32 +0000 | [diff] [blame] | 647 | return DeclPtrTy(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 648 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 649 | |
Chris Lattner | b652cea | 2007-10-09 17:14:05 +0000 | [diff] [blame] | 650 | // Enter a scope for the function body. |
Douglas Gregor | 8935b8b | 2008-12-10 06:34:36 +0000 | [diff] [blame] | 651 | ParseScope BodyScope(this, Scope::FnScope|Scope::DeclScope); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 652 | |
Chris Lattner | b652cea | 2007-10-09 17:14:05 +0000 | [diff] [blame] | 653 | // Tell the actions module that we have entered a function definition with the |
| 654 | // specified Declarator for the function. |
Douglas Gregor | 52591bf | 2009-06-24 00:54:41 +0000 | [diff] [blame] | 655 | DeclPtrTy Res = TemplateInfo.TemplateParams? |
| 656 | Actions.ActOnStartOfFunctionTemplateDef(CurScope, |
| 657 | Action::MultiTemplateParamsArg(Actions, |
| 658 | TemplateInfo.TemplateParams->data(), |
| 659 | TemplateInfo.TemplateParams->size()), |
| 660 | D) |
| 661 | : Actions.ActOnStartOfFunctionDef(CurScope, D); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 662 | |
Sebastian Redl | d3a413d | 2009-04-26 20:35:05 +0000 | [diff] [blame] | 663 | if (Tok.is(tok::kw_try)) |
| 664 | return ParseFunctionTryBlock(Res); |
| 665 | |
Douglas Gregor | 7ad8390 | 2008-11-05 04:29:56 +0000 | [diff] [blame] | 666 | // If we have a colon, then we're probably parsing a C++ |
| 667 | // ctor-initializer. |
| 668 | if (Tok.is(tok::colon)) |
| 669 | ParseConstructorInitializer(Res); |
Fariborz Jahanian | 0849d38 | 2009-07-14 20:06:22 +0000 | [diff] [blame] | 670 | else |
Fariborz Jahanian | 393612e | 2009-07-21 22:36:06 +0000 | [diff] [blame] | 671 | Actions.ActOnDefaultCtorInitializers(Res); |
Douglas Gregor | 7ad8390 | 2008-11-05 04:29:56 +0000 | [diff] [blame] | 672 | |
Chris Lattner | 40e9bc8 | 2009-03-05 00:49:17 +0000 | [diff] [blame] | 673 | return ParseFunctionStatementBody(Res); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 674 | } |
| 675 | |
| 676 | /// ParseKNRParamDeclarations - Parse 'declaration-list[opt]' which provides |
| 677 | /// types for a function with a K&R-style identifier list for arguments. |
| 678 | void Parser::ParseKNRParamDeclarations(Declarator &D) { |
| 679 | // We know that the top-level of this declarator is a function. |
| 680 | DeclaratorChunk::FunctionTypeInfo &FTI = D.getTypeObject(0).Fun; |
| 681 | |
Chris Lattner | 0442108 | 2008-04-08 04:40:51 +0000 | [diff] [blame] | 682 | // Enter function-declaration scope, limiting any declarators to the |
| 683 | // function prototype scope, including parameter declarators. |
Douglas Gregor | 3218c4b | 2009-01-09 22:42:13 +0000 | [diff] [blame] | 684 | ParseScope PrototypeScope(this, Scope::FunctionPrototypeScope|Scope::DeclScope); |
Chris Lattner | 0442108 | 2008-04-08 04:40:51 +0000 | [diff] [blame] | 685 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 686 | // Read all the argument declarations. |
| 687 | while (isDeclarationSpecifier()) { |
| 688 | SourceLocation DSStart = Tok.getLocation(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 689 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 690 | // Parse the common declaration-specifiers piece. |
| 691 | DeclSpec DS; |
| 692 | ParseDeclarationSpecifiers(DS); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 693 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 694 | // C99 6.9.1p6: 'each declaration in the declaration list shall have at |
| 695 | // least one declarator'. |
| 696 | // NOTE: GCC just makes this an ext-warn. It's not clear what it does with |
| 697 | // the declarations though. It's trivial to ignore them, really hard to do |
| 698 | // anything else with them. |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 699 | if (Tok.is(tok::semi)) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 700 | Diag(DSStart, diag::err_declaration_does_not_declare_param); |
| 701 | ConsumeToken(); |
| 702 | continue; |
| 703 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 704 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 705 | // C99 6.9.1p6: Declarations shall contain no storage-class specifiers other |
| 706 | // than register. |
| 707 | if (DS.getStorageClassSpec() != DeclSpec::SCS_unspecified && |
| 708 | DS.getStorageClassSpec() != DeclSpec::SCS_register) { |
| 709 | Diag(DS.getStorageClassSpecLoc(), |
| 710 | diag::err_invalid_storage_class_in_func_decl); |
| 711 | DS.ClearStorageClassSpecs(); |
| 712 | } |
| 713 | if (DS.isThreadSpecified()) { |
| 714 | Diag(DS.getThreadSpecLoc(), |
| 715 | diag::err_invalid_storage_class_in_func_decl); |
| 716 | DS.ClearStorageClassSpecs(); |
| 717 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 718 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 719 | // Parse the first declarator attached to this declspec. |
| 720 | Declarator ParmDeclarator(DS, Declarator::KNRTypeListContext); |
| 721 | ParseDeclarator(ParmDeclarator); |
| 722 | |
| 723 | // Handle the full declarator list. |
| 724 | while (1) { |
Chris Lattner | b28317a | 2009-03-28 19:18:32 +0000 | [diff] [blame] | 725 | Action::AttrTy *AttrList; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 726 | // If attributes are present, parse them. |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 727 | if (Tok.is(tok::kw___attribute)) |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 728 | // FIXME: attach attributes too. |
| 729 | AttrList = ParseAttributes(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 730 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 731 | // Ask the actions module to compute the type for this declarator. |
Chris Lattner | b28317a | 2009-03-28 19:18:32 +0000 | [diff] [blame] | 732 | Action::DeclPtrTy Param = |
Chris Lattner | 0442108 | 2008-04-08 04:40:51 +0000 | [diff] [blame] | 733 | Actions.ActOnParamDeclarator(CurScope, ParmDeclarator); |
Steve Naroff | 2bd42fa | 2007-09-10 20:51:04 +0000 | [diff] [blame] | 734 | |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 735 | if (Param && |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 736 | // A missing identifier has already been diagnosed. |
| 737 | ParmDeclarator.getIdentifier()) { |
| 738 | |
| 739 | // Scan the argument list looking for the correct param to apply this |
| 740 | // type. |
| 741 | for (unsigned i = 0; ; ++i) { |
| 742 | // C99 6.9.1p6: those declarators shall declare only identifiers from |
| 743 | // the identifier list. |
| 744 | if (i == FTI.NumArgs) { |
Chris Lattner | 1ab3b96 | 2008-11-18 07:48:38 +0000 | [diff] [blame] | 745 | Diag(ParmDeclarator.getIdentifierLoc(), diag::err_no_matching_param) |
Chris Lattner | 6898e33 | 2008-11-19 07:51:13 +0000 | [diff] [blame] | 746 | << ParmDeclarator.getIdentifier(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 747 | break; |
| 748 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 749 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 750 | if (FTI.ArgInfo[i].Ident == ParmDeclarator.getIdentifier()) { |
| 751 | // Reject redefinitions of parameters. |
Chris Lattner | 0442108 | 2008-04-08 04:40:51 +0000 | [diff] [blame] | 752 | if (FTI.ArgInfo[i].Param) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 753 | Diag(ParmDeclarator.getIdentifierLoc(), |
Chris Lattner | 1ab3b96 | 2008-11-18 07:48:38 +0000 | [diff] [blame] | 754 | diag::err_param_redefinition) |
Chris Lattner | 6898e33 | 2008-11-19 07:51:13 +0000 | [diff] [blame] | 755 | << ParmDeclarator.getIdentifier(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 756 | } else { |
Chris Lattner | 0442108 | 2008-04-08 04:40:51 +0000 | [diff] [blame] | 757 | FTI.ArgInfo[i].Param = Param; |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 758 | } |
| 759 | break; |
| 760 | } |
| 761 | } |
| 762 | } |
| 763 | |
| 764 | // If we don't have a comma, it is either the end of the list (a ';') or |
| 765 | // an error, bail out. |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 766 | if (Tok.isNot(tok::comma)) |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 767 | break; |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 768 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 769 | // Consume the comma. |
| 770 | ConsumeToken(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 771 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 772 | // Parse the next declarator. |
| 773 | ParmDeclarator.clear(); |
| 774 | ParseDeclarator(ParmDeclarator); |
| 775 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 776 | |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 777 | if (Tok.is(tok::semi)) { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 778 | ConsumeToken(); |
| 779 | } else { |
| 780 | Diag(Tok, diag::err_parse_error); |
| 781 | // Skip to end of block or statement |
| 782 | SkipUntil(tok::semi, true); |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 783 | if (Tok.is(tok::semi)) |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 784 | ConsumeToken(); |
| 785 | } |
| 786 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 787 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 788 | // The actions module must verify that all arguments were declared. |
Douglas Gregor | a3a8351 | 2009-04-01 23:51:29 +0000 | [diff] [blame] | 789 | Actions.ActOnFinishKNRParamDeclarations(CurScope, D, Tok.getLocation()); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 790 | } |
| 791 | |
| 792 | |
| 793 | /// ParseAsmStringLiteral - This is just a normal string-literal, but is not |
| 794 | /// allowed to be a wide string, and is not subject to character translation. |
| 795 | /// |
| 796 | /// [GNU] asm-string-literal: |
| 797 | /// string-literal |
| 798 | /// |
Sebastian Redl | effa8d1 | 2008-12-10 00:02:53 +0000 | [diff] [blame] | 799 | Parser::OwningExprResult Parser::ParseAsmStringLiteral() { |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 800 | if (!isTokenStringLiteral()) { |
| 801 | Diag(Tok, diag::err_expected_string_literal); |
Sebastian Redl | 61364dd | 2008-12-11 19:30:53 +0000 | [diff] [blame] | 802 | return ExprError(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 803 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 804 | |
Sebastian Redl | 20df9b7 | 2008-12-11 22:51:44 +0000 | [diff] [blame] | 805 | OwningExprResult Res(ParseStringLiteralExpression()); |
Sebastian Redl | effa8d1 | 2008-12-10 00:02:53 +0000 | [diff] [blame] | 806 | if (Res.isInvalid()) return move(Res); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 807 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 808 | // TODO: Diagnose: wide string literal in 'asm' |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 809 | |
Sebastian Redl | effa8d1 | 2008-12-10 00:02:53 +0000 | [diff] [blame] | 810 | return move(Res); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 811 | } |
| 812 | |
| 813 | /// ParseSimpleAsm |
| 814 | /// |
| 815 | /// [GNU] simple-asm-expr: |
| 816 | /// 'asm' '(' asm-string-literal ')' |
| 817 | /// |
Sebastian Redl | ab197ba | 2009-02-09 18:23:29 +0000 | [diff] [blame] | 818 | Parser::OwningExprResult Parser::ParseSimpleAsm(SourceLocation *EndLoc) { |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 819 | assert(Tok.is(tok::kw_asm) && "Not an asm!"); |
Anders Carlsson | dfab6cb | 2008-02-08 00:33:21 +0000 | [diff] [blame] | 820 | SourceLocation Loc = ConsumeToken(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 821 | |
Chris Lattner | 0007322 | 2007-10-09 17:23:58 +0000 | [diff] [blame] | 822 | if (Tok.isNot(tok::l_paren)) { |
Chris Lattner | 1ab3b96 | 2008-11-18 07:48:38 +0000 | [diff] [blame] | 823 | Diag(Tok, diag::err_expected_lparen_after) << "asm"; |
Sebastian Redl | 61364dd | 2008-12-11 19:30:53 +0000 | [diff] [blame] | 824 | return ExprError(); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 825 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 826 | |
Sebastian Redl | ab197ba | 2009-02-09 18:23:29 +0000 | [diff] [blame] | 827 | Loc = ConsumeParen(); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 828 | |
Sebastian Redl | effa8d1 | 2008-12-10 00:02:53 +0000 | [diff] [blame] | 829 | OwningExprResult Result(ParseAsmStringLiteral()); |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 830 | |
Sebastian Redl | ab197ba | 2009-02-09 18:23:29 +0000 | [diff] [blame] | 831 | if (Result.isInvalid()) { |
| 832 | SkipUntil(tok::r_paren, true, true); |
| 833 | if (EndLoc) |
| 834 | *EndLoc = Tok.getLocation(); |
| 835 | ConsumeAnyToken(); |
| 836 | } else { |
| 837 | Loc = MatchRHSPunctuation(tok::r_paren, Loc); |
| 838 | if (EndLoc) |
| 839 | *EndLoc = Loc; |
| 840 | } |
Mike Stump | a6f0177 | 2008-06-19 19:28:49 +0000 | [diff] [blame] | 841 | |
Sebastian Redl | effa8d1 | 2008-12-10 00:02:53 +0000 | [diff] [blame] | 842 | return move(Result); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 843 | } |
| 844 | |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 845 | /// TryAnnotateTypeOrScopeToken - If the current token position is on a |
| 846 | /// typename (possibly qualified in C++) or a C++ scope specifier not followed |
| 847 | /// by a typename, TryAnnotateTypeOrScopeToken will replace one or more tokens |
| 848 | /// with a single annotation token representing the typename or C++ scope |
| 849 | /// respectively. |
| 850 | /// This simplifies handling of C++ scope specifiers and allows efficient |
| 851 | /// backtracking without the need to re-parse and resolve nested-names and |
| 852 | /// typenames. |
Argyrios Kyrtzidis | 44802cc | 2008-11-26 21:51:07 +0000 | [diff] [blame] | 853 | /// It will mainly be called when we expect to treat identifiers as typenames |
| 854 | /// (if they are typenames). For example, in C we do not expect identifiers |
| 855 | /// inside expressions to be treated as typenames so it will not be called |
| 856 | /// for expressions in C. |
| 857 | /// The benefit for C/ObjC is that a typename will be annotated and |
Steve Naroff | b43a50f | 2009-01-28 19:39:02 +0000 | [diff] [blame] | 858 | /// Actions.getTypeName will not be needed to be called again (e.g. getTypeName |
Argyrios Kyrtzidis | 44802cc | 2008-11-26 21:51:07 +0000 | [diff] [blame] | 859 | /// will not be called twice, once to check whether we have a declaration |
| 860 | /// specifier, and another one to get the actual type inside |
| 861 | /// ParseDeclarationSpecifiers). |
Chris Lattner | a7bc7c8 | 2009-01-04 23:23:14 +0000 | [diff] [blame] | 862 | /// |
Chris Lattner | c8e27cc | 2009-06-26 04:27:47 +0000 | [diff] [blame] | 863 | /// This returns true if the token was annotated or an unrecoverable error |
| 864 | /// occurs. |
Chris Lattner | 55a7cef | 2009-01-05 00:13:00 +0000 | [diff] [blame] | 865 | /// |
| 866 | /// Note that this routine emits an error if you call it with ::new or ::delete |
| 867 | /// as the current tokens, so only call it in contexts where these are invalid. |
Chris Lattner | 5b45473 | 2009-01-05 03:55:46 +0000 | [diff] [blame] | 868 | bool Parser::TryAnnotateTypeOrScopeToken() { |
Douglas Gregor | d57959a | 2009-03-27 23:10:48 +0000 | [diff] [blame] | 869 | assert((Tok.is(tok::identifier) || Tok.is(tok::coloncolon) |
| 870 | || Tok.is(tok::kw_typename)) && |
Chris Lattner | 7452c6f | 2009-01-05 01:24:05 +0000 | [diff] [blame] | 871 | "Cannot be a type or scope token!"); |
| 872 | |
Douglas Gregor | d57959a | 2009-03-27 23:10:48 +0000 | [diff] [blame] | 873 | if (Tok.is(tok::kw_typename)) { |
| 874 | // Parse a C++ typename-specifier, e.g., "typename T::type". |
| 875 | // |
| 876 | // typename-specifier: |
| 877 | // 'typename' '::' [opt] nested-name-specifier identifier |
| 878 | // 'typename' '::' [opt] nested-name-specifier template [opt] |
Douglas Gregor | 1734317 | 2009-04-01 00:28:59 +0000 | [diff] [blame] | 879 | // simple-template-id |
Douglas Gregor | d57959a | 2009-03-27 23:10:48 +0000 | [diff] [blame] | 880 | SourceLocation TypenameLoc = ConsumeToken(); |
| 881 | CXXScopeSpec SS; |
| 882 | bool HadNestedNameSpecifier = ParseOptionalCXXScopeSpecifier(SS); |
| 883 | if (!HadNestedNameSpecifier) { |
| 884 | Diag(Tok.getLocation(), diag::err_expected_qualified_after_typename); |
| 885 | return false; |
| 886 | } |
| 887 | |
| 888 | TypeResult Ty; |
| 889 | if (Tok.is(tok::identifier)) { |
| 890 | // FIXME: check whether the next token is '<', first! |
| 891 | Ty = Actions.ActOnTypenameType(TypenameLoc, SS, *Tok.getIdentifierInfo(), |
| 892 | Tok.getLocation()); |
Douglas Gregor | 1734317 | 2009-04-01 00:28:59 +0000 | [diff] [blame] | 893 | } else if (Tok.is(tok::annot_template_id)) { |
| 894 | TemplateIdAnnotation *TemplateId |
| 895 | = static_cast<TemplateIdAnnotation *>(Tok.getAnnotationValue()); |
| 896 | if (TemplateId->Kind == TNK_Function_template) { |
| 897 | Diag(Tok, diag::err_typename_refers_to_non_type_template) |
| 898 | << Tok.getAnnotationRange(); |
| 899 | return false; |
| 900 | } |
Douglas Gregor | d57959a | 2009-03-27 23:10:48 +0000 | [diff] [blame] | 901 | |
Douglas Gregor | 31a19b6 | 2009-04-01 21:51:26 +0000 | [diff] [blame] | 902 | AnnotateTemplateIdTokenAsType(0); |
Douglas Gregor | 1734317 | 2009-04-01 00:28:59 +0000 | [diff] [blame] | 903 | assert(Tok.is(tok::annot_typename) && |
| 904 | "AnnotateTemplateIdTokenAsType isn't working properly"); |
Douglas Gregor | 31a19b6 | 2009-04-01 21:51:26 +0000 | [diff] [blame] | 905 | if (Tok.getAnnotationValue()) |
| 906 | Ty = Actions.ActOnTypenameType(TypenameLoc, SS, SourceLocation(), |
| 907 | Tok.getAnnotationValue()); |
| 908 | else |
| 909 | Ty = true; |
Douglas Gregor | 1734317 | 2009-04-01 00:28:59 +0000 | [diff] [blame] | 910 | } else { |
| 911 | Diag(Tok, diag::err_expected_type_name_after_typename) |
| 912 | << SS.getRange(); |
| 913 | return false; |
| 914 | } |
| 915 | |
Douglas Gregor | 1734317 | 2009-04-01 00:28:59 +0000 | [diff] [blame] | 916 | Tok.setKind(tok::annot_typename); |
Douglas Gregor | 31a19b6 | 2009-04-01 21:51:26 +0000 | [diff] [blame] | 917 | Tok.setAnnotationValue(Ty.isInvalid()? 0 : Ty.get()); |
Douglas Gregor | 1734317 | 2009-04-01 00:28:59 +0000 | [diff] [blame] | 918 | Tok.setAnnotationEndLoc(Tok.getLocation()); |
| 919 | Tok.setLocation(TypenameLoc); |
| 920 | PP.AnnotateCachedTokens(Tok); |
| 921 | return true; |
Douglas Gregor | d57959a | 2009-03-27 23:10:48 +0000 | [diff] [blame] | 922 | } |
| 923 | |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 924 | CXXScopeSpec SS; |
Argyrios Kyrtzidis | 4bdd91c | 2008-11-26 21:41:52 +0000 | [diff] [blame] | 925 | if (getLang().CPlusPlus) |
Chris Lattner | 7a0ab5f | 2009-01-06 06:59:53 +0000 | [diff] [blame] | 926 | ParseOptionalCXXScopeSpecifier(SS); |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 927 | |
| 928 | if (Tok.is(tok::identifier)) { |
Chris Lattner | 608d1fc | 2009-01-05 01:49:50 +0000 | [diff] [blame] | 929 | // Determine whether the identifier is a type name. |
Steve Naroff | b43a50f | 2009-01-28 19:39:02 +0000 | [diff] [blame] | 930 | if (TypeTy *Ty = Actions.getTypeName(*Tok.getIdentifierInfo(), |
Douglas Gregor | b696ea3 | 2009-02-04 17:00:24 +0000 | [diff] [blame] | 931 | Tok.getLocation(), CurScope, &SS)) { |
Chris Lattner | 608d1fc | 2009-01-05 01:49:50 +0000 | [diff] [blame] | 932 | // This is a typename. Replace the current token in-place with an |
| 933 | // annotation type token. |
Chris Lattner | b31757b | 2009-01-06 05:06:21 +0000 | [diff] [blame] | 934 | Tok.setKind(tok::annot_typename); |
Chris Lattner | 608d1fc | 2009-01-05 01:49:50 +0000 | [diff] [blame] | 935 | Tok.setAnnotationValue(Ty); |
| 936 | Tok.setAnnotationEndLoc(Tok.getLocation()); |
| 937 | if (SS.isNotEmpty()) // it was a C++ qualified type name. |
| 938 | Tok.setLocation(SS.getBeginLoc()); |
| 939 | |
| 940 | // In case the tokens were cached, have Preprocessor replace |
| 941 | // them with the annotation token. |
| 942 | PP.AnnotateCachedTokens(Tok); |
| 943 | return true; |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 944 | } |
| 945 | |
| 946 | if (!getLang().CPlusPlus) { |
Chris Lattner | 608d1fc | 2009-01-05 01:49:50 +0000 | [diff] [blame] | 947 | // If we're in C, we can't have :: tokens at all (the lexer won't return |
| 948 | // them). If the identifier is not a type, then it can't be scope either, |
| 949 | // just early exit. |
| 950 | return false; |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 951 | } |
Chris Lattner | 608d1fc | 2009-01-05 01:49:50 +0000 | [diff] [blame] | 952 | |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 953 | // If this is a template-id, annotate with a template-id or type token. |
Douglas Gregor | 55f6b14 | 2009-02-09 18:46:07 +0000 | [diff] [blame] | 954 | if (NextToken().is(tok::less)) { |
Douglas Gregor | 7532dc6 | 2009-03-30 22:58:21 +0000 | [diff] [blame] | 955 | TemplateTy Template; |
Douglas Gregor | 55f6b14 | 2009-02-09 18:46:07 +0000 | [diff] [blame] | 956 | if (TemplateNameKind TNK |
| 957 | = Actions.isTemplateName(*Tok.getIdentifierInfo(), |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 958 | CurScope, Template, &SS)) |
Chris Lattner | c8e27cc | 2009-06-26 04:27:47 +0000 | [diff] [blame] | 959 | if (AnnotateTemplateIdToken(Template, TNK, &SS)) { |
| 960 | // If an unrecoverable error occurred, we need to return true here, |
| 961 | // because the token stream is in a damaged state. We may not return |
| 962 | // a valid identifier. |
| 963 | return Tok.isNot(tok::identifier); |
| 964 | } |
Douglas Gregor | 55f6b14 | 2009-02-09 18:46:07 +0000 | [diff] [blame] | 965 | } |
Douglas Gregor | d6fb7ef | 2008-12-18 19:37:40 +0000 | [diff] [blame] | 966 | |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 967 | // The current token, which is either an identifier or a |
| 968 | // template-id, is not part of the annotation. Fall through to |
| 969 | // push that token back into the stream and complete the C++ scope |
| 970 | // specifier annotation. |
Douglas Gregor | d57959a | 2009-03-27 23:10:48 +0000 | [diff] [blame] | 971 | } |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 972 | |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 973 | if (Tok.is(tok::annot_template_id)) { |
| 974 | TemplateIdAnnotation *TemplateId |
| 975 | = static_cast<TemplateIdAnnotation *>(Tok.getAnnotationValue()); |
Douglas Gregor | c45c232 | 2009-03-31 00:43:58 +0000 | [diff] [blame] | 976 | if (TemplateId->Kind == TNK_Type_template) { |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 977 | // A template-id that refers to a type was parsed into a |
| 978 | // template-id annotation in a context where we weren't allowed |
| 979 | // to produce a type annotation token. Update the template-id |
| 980 | // annotation token to a type annotation token now. |
Douglas Gregor | 31a19b6 | 2009-04-01 21:51:26 +0000 | [diff] [blame] | 981 | AnnotateTemplateIdTokenAsType(&SS); |
| 982 | return true; |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 983 | } |
| 984 | } |
Douglas Gregor | d6fb7ef | 2008-12-18 19:37:40 +0000 | [diff] [blame] | 985 | |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 986 | if (SS.isEmpty()) |
Eli Friedman | 3c9028a | 2009-06-27 08:17:02 +0000 | [diff] [blame] | 987 | return Tok.isNot(tok::identifier) && Tok.isNot(tok::coloncolon); |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 988 | |
| 989 | // A C++ scope specifier that isn't followed by a typename. |
| 990 | // Push the current token back into the token stream (or revert it if it is |
| 991 | // cached) and use an annotation scope token for current token. |
| 992 | if (PP.isBacktrackEnabled()) |
| 993 | PP.RevertCachedTokens(1); |
| 994 | else |
| 995 | PP.EnterToken(Tok); |
| 996 | Tok.setKind(tok::annot_cxxscope); |
Douglas Gregor | 3507369 | 2009-03-26 23:56:24 +0000 | [diff] [blame] | 997 | Tok.setAnnotationValue(SS.getScopeRep()); |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 998 | Tok.setAnnotationRange(SS.getRange()); |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 999 | |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 1000 | // In case the tokens were cached, have Preprocessor replace them with the |
| 1001 | // annotation token. |
| 1002 | PP.AnnotateCachedTokens(Tok); |
Chris Lattner | a7bc7c8 | 2009-01-04 23:23:14 +0000 | [diff] [blame] | 1003 | return true; |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 1004 | } |
| 1005 | |
| 1006 | /// TryAnnotateScopeToken - Like TryAnnotateTypeOrScopeToken but only |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 1007 | /// annotates C++ scope specifiers and template-ids. This returns |
Chris Lattner | c8e27cc | 2009-06-26 04:27:47 +0000 | [diff] [blame] | 1008 | /// true if the token was annotated or there was an error that could not be |
| 1009 | /// recovered from. |
Chris Lattner | 55a7cef | 2009-01-05 00:13:00 +0000 | [diff] [blame] | 1010 | /// |
| 1011 | /// Note that this routine emits an error if you call it with ::new or ::delete |
| 1012 | /// as the current tokens, so only call it in contexts where these are invalid. |
Chris Lattner | 5e02c47 | 2009-01-05 00:07:25 +0000 | [diff] [blame] | 1013 | bool Parser::TryAnnotateCXXScopeToken() { |
Argyrios Kyrtzidis | 4bdd91c | 2008-11-26 21:41:52 +0000 | [diff] [blame] | 1014 | assert(getLang().CPlusPlus && |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 1015 | "Call sites of this function should be guarded by checking for C++"); |
Chris Lattner | 7452c6f | 2009-01-05 01:24:05 +0000 | [diff] [blame] | 1016 | assert((Tok.is(tok::identifier) || Tok.is(tok::coloncolon)) && |
| 1017 | "Cannot be a type or scope token!"); |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 1018 | |
Argyrios Kyrtzidis | 4bdd91c | 2008-11-26 21:41:52 +0000 | [diff] [blame] | 1019 | CXXScopeSpec SS; |
Chris Lattner | 7a0ab5f | 2009-01-06 06:59:53 +0000 | [diff] [blame] | 1020 | if (!ParseOptionalCXXScopeSpecifier(SS)) |
Douglas Gregor | 39a8de1 | 2009-02-25 19:37:18 +0000 | [diff] [blame] | 1021 | return Tok.is(tok::annot_template_id); |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 1022 | |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 1023 | // Push the current token back into the token stream (or revert it if it is |
| 1024 | // cached) and use an annotation scope token for current token. |
| 1025 | if (PP.isBacktrackEnabled()) |
| 1026 | PP.RevertCachedTokens(1); |
| 1027 | else |
| 1028 | PP.EnterToken(Tok); |
| 1029 | Tok.setKind(tok::annot_cxxscope); |
Douglas Gregor | 3507369 | 2009-03-26 23:56:24 +0000 | [diff] [blame] | 1030 | Tok.setAnnotationValue(SS.getScopeRep()); |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 1031 | Tok.setAnnotationRange(SS.getRange()); |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 1032 | |
Chris Lattner | 6ec76d4 | 2009-01-04 22:32:19 +0000 | [diff] [blame] | 1033 | // In case the tokens were cached, have Preprocessor replace them with the |
| 1034 | // annotation token. |
| 1035 | PP.AnnotateCachedTokens(Tok); |
Chris Lattner | 5e02c47 | 2009-01-05 00:07:25 +0000 | [diff] [blame] | 1036 | return true; |
Argyrios Kyrtzidis | eb83ecd | 2008-11-08 16:45:02 +0000 | [diff] [blame] | 1037 | } |