From 0a6384c4010454e386761b5eacda2600a89b7d7f Mon Sep 17 00:00:00 2001 From: Akim Demaille Date: Fri, 17 Mar 2000 11:34:53 +0000 Subject: [PATCH] * reader.c (packsymbols): Formatting changes. --- ChangeLog | 4 +++ src/reader.c | 85 ++++++++++++++++++++++++++++------------------------ 2 files changed, 50 insertions(+), 39 deletions(-) diff --git a/ChangeLog b/ChangeLog index 34c5039b..66a4bfcd 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2000-03-17 Akim Demaille + + * reader.c (packsymbols): Formatting changes. + 2000-03-17 Akim Demaille * reader.c (copy_comment): New function, factored out from: diff --git a/src/reader.c b/src/reader.c index 0aea3159..11f4add1 100644 --- a/src/reader.c +++ b/src/reader.c @@ -1790,8 +1790,9 @@ get_type (void) #endif -/* assign symbol numbers, and write definition of token names into fdefines. -Set up vectors tags and sprec of names and precedences of symbols. */ +/* Assign symbol numbers, and write definition of token names into + fdefines. Set up vectors tags and sprec of names and precedences + of symbols. */ void packsymbols (void) @@ -1822,34 +1823,38 @@ packsymbols (void) } else if (bp->alias) { - /* this symbol and its alias are a single token defn. - allocate a tokno, and assign to both - check agreement of ->prec and ->assoc fields - and make both the same - */ - if (bp->value == 0) - bp->value = bp->alias->value = tokno++; - - if (bp->prec != bp->alias->prec) { - if (bp->prec != 0 && bp->alias->prec != 0 - && bp->user_token_number == SALIAS) - warnss(_("conflicting precedences for %s and %s"), - bp->tag, bp->alias->tag); - if (bp->prec != 0) bp->alias->prec = bp->prec; - else bp->prec = bp->alias->prec; - } + /* this symbol and its alias are a single token defn. + allocate a tokno, and assign to both check agreement of + ->prec and ->assoc fields and make both the same */ + if (bp->value == 0) + bp->value = bp->alias->value = tokno++; - if (bp->assoc != bp->alias->assoc) { - if (bp->assoc != 0 && bp->alias->assoc != 0 - && bp->user_token_number == SALIAS) - warnss(_("conflicting assoc values for %s and %s"), - bp->tag, bp->alias->tag); - if (bp->assoc != 0) bp->alias->assoc = bp->assoc; - else bp->assoc = bp->alias->assoc; - } + if (bp->prec != bp->alias->prec) + { + if (bp->prec != 0 && bp->alias->prec != 0 + && bp->user_token_number == SALIAS) + warnss(_("conflicting precedences for %s and %s"), + bp->tag, bp->alias->tag); + if (bp->prec != 0) + bp->alias->prec = bp->prec; + else + bp->prec = bp->alias->prec; + } - if (bp->user_token_number == SALIAS) - continue; /* do not do processing below for SALIASs */ + if (bp->assoc != bp->alias->assoc) + { + if (bp->assoc != 0 && bp->alias->assoc != 0 + && bp->user_token_number == SALIAS) + warnss(_("conflicting assoc values for %s and %s"), + bp->tag, bp->alias->tag); + if (bp->assoc != 0) + bp->alias->assoc = bp->assoc; + else + bp->assoc = bp->alias->assoc; + } + + if (bp->user_token_number == SALIAS) + continue; /* do not do processing below for SALIASs */ } else /* bp->class == STOKEN */ @@ -1878,21 +1883,23 @@ packsymbols (void) token_translations = NEW2(max_user_token_number+1, short); - /* initialize all entries for literal tokens to 2, - the internal token number for $undefined., - which represents all invalid inputs. */ + /* initialize all entries for literal tokens to 2, the internal + token number for $undefined., which represents all invalid + inputs. */ for (i = 0; i <= max_user_token_number; i++) token_translations[i] = 2; for (bp = firstsymbol; bp; bp = bp->next) { - if (bp->value >= ntokens) continue; /* non-terminal */ - if (bp->user_token_number == SALIAS) continue; + if (bp->value >= ntokens) + continue; /* non-terminal */ + if (bp->user_token_number == SALIAS) + continue; if (token_translations[bp->user_token_number] != 2) warnsss(_("tokens %s and %s both assigned number %s"), - tags[token_translations[bp->user_token_number]], - bp->tag, - int_to_string(bp->user_token_number)); + tags[token_translations[bp->user_token_number]], + bp->tag, + int_to_string(bp->user_token_number)); token_translations[bp->user_token_number] = bp->value; } } @@ -1937,9 +1944,9 @@ packsymbols (void) } } -/* For named tokens, but not literal ones, define the name. - The value is the user token number. -*/ +/* For named tokens, but not literal ones, define the name. The value + is the user token number. */ + void output_token_defines (FILE *file) { -- 2.45.2