diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-05-04 07:35:44 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-05-04 07:35:44 -0700 |
| commit | 5be89bc80f7f235805ec706f1ff13e6952f0d34e (patch) | |
| tree | 0d9a26ddd0314f589127fd74837348ab6b1cdd54 /y.tab.c.shipped | |
| parent | 159139d01de827e8e7232e2b74b2fc142612d8e2 (diff) | |
| download | txr-5be89bc80f7f235805ec706f1ff13e6952f0d34e.tar.gz txr-5be89bc80f7f235805ec706f1ff13e6952f0d34e.tar.bz2 txr-5be89bc80f7f235805ec706f1ff13e6952f0d34e.zip | |
parser: fix regression in #; syntax.
A crash has showed up when processing commented-out objects.
This is due to the most recent gc fix to the parser.
* parser.y (set_syntax_tree): Avoid the set macro when tree
has the special value nao (not an object).
* y.tab.c.shipped: Regenerated.
* y.tab.h.shipped: Likewise.
Diffstat (limited to 'y.tab.c.shipped')
| -rw-r--r-- | y.tab.c.shipped | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/y.tab.c.shipped b/y.tab.c.shipped index 2df3bdb9..526f2eef 100644 --- a/y.tab.c.shipped +++ b/y.tab.c.shipped @@ -6743,7 +6743,10 @@ void yydebug_onoff(int val) static void set_syntax_tree(parser_t *parser, val tree) { - set(mkloc(parser->syntax_tree, parser->parser), tree); + if (tree == nao) + parser->syntax_tree = tree; + else + set(mkloc(parser->syntax_tree, parser->parser), tree); } static val sym_helper(parser_t *parser, wchar_t *lexeme, val meta_allowed) |