* parser.y (unquotes_occur): Fix use of unquote_s rather than sys_unquote_s

which breaks backquote, caught by tests/010/reghash.txr.
I thought fixed this already! But I must have made the change to y.tab.c
rather than parser.y.

* Makefile (lex.yy.c, y.tab.c): Make these files readonly to prevent
unintended edits.

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.y b/parser.y
index 2c48e43b..67409d4b 100644
--- a/parser.y
+++ b/parser.y
@@ -1114,7 +1114,7 @@ static val unquotes_occur(val quoted_form, int level)
     return nil;
   } else {
     val sym = car(quoted_form);
-    if (sym == unquote_s || sym == sys_splice_s)
+    if (sym == sys_unquote_s || sym == sys_splice_s)
       return (level == 0) ? t : unquotes_occur(cdr(quoted_form), level - 1);
     if (sym == sys_qquote_s)
       return unquotes_occur(cdr(quoted_form), level + 1);