diff options
author | Teddy <ted.sybil@gmail.com> | 2013-08-04 16:19:29 +0800 |
---|---|---|
committer | Teddy <ted.sybil@gmail.com> | 2013-08-04 16:19:29 +0800 |
commit | 418f6ed5dd00e296b87b202a99753632fc593382 (patch) | |
tree | 7e372342b3fa116c7c695ac8f77c2b994dc1bd44 /parser.cpp | |
parent | 65f17438de5983ca010e10b4b24c5da65756a9b5 (diff) |
added more error report
Diffstat (limited to 'parser.cpp')
-rw-r--r-- | parser.cpp | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -2,6 +2,8 @@ #include <cctype> #include <sstream> #include "parser.h" +#include "exc.h" +#include "consts.h" #include "builtin.h" using std::stringstream; @@ -85,8 +87,10 @@ Cons *ASTGenerator::absorb(Tokenizor *tk) { else if (token == ")") { Cons *lst = empty_list; - while (*(--top_ptr)) + while (top_ptr >= parse_stack && *(--top_ptr)) lst = new Cons(*top_ptr, lst); // Collect the list + if (top_ptr < parse_stack) + throw NormalError(READ_ERR_UNEXPECTED_RIGHT_BRACKET); *top_ptr++ = lst; } else *top_ptr++ = ASTGenerator::to_obj(token); |