parser: rename circ_suppress flag.

* parser.h (struct parser): eof flag changed to unsigned char.
circ_suppress flag renamed to ignore, changed to unsigned char
and relocated next to eof to compact together.

* parser.c (parser_circ_ref): Follow rename.

* parser.y (hash_semi_or_n_expr, hash_semi_or_i_expr, n_exprs,
parse): Likewise.

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.c b/parser.c
index 59ec46c7..2510dbfe 100644
--- a/parser.c
+++ b/parser.c
@@ -424,7 +424,7 @@ val parser_circ_ref(parser_t *p, val num)
   if (!obj)
     yyerrorf(p->scanner, lit("dangling #~s# ref"), num, nao);
 
-  if (obj == unique_s && !p->circ_suppress) {
+  if (obj == unique_s && !p->ignore) {
     p->circ_count++;
     return cons(circref_s, cons(num, nil));
   }