X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/a0b76449c7ebb01064f6e091715819f7519c90b2..9ca7f077a0a5ecdd00c5945c7a7bd3cf46e23c13:/src/derives.c?ds=sidebyside diff --git a/src/derives.c b/src/derives.c index 10d3adbf..dc6049c7 100644 --- a/src/derives.c +++ b/src/derives.c @@ -1,26 +1,24 @@ /* Match rules with nonterminals for bison, - Copyright (C) 1984, 1989, 2000, 2001, 2002 Free Software - Foundation, Inc. + Copyright (C) 1984, 1989, 2000, 2001, 2002, 2003, 2005 Free + Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. - Bison is free software; you can redistribute it and/or modify + This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2, or (at your option) - any later version. + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. - Bison is distributed in the hope that it will be useful, + This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License - along with Bison; see the file COPYING. If not, write to - the Free Software Foundation, Inc., 59 Temple Place - Suite 330, - Boston, MA 02111-1307, USA. */ - + along with this program. If not, see . */ +#include #include "system.h" #include "getargs.h" @@ -37,7 +35,7 @@ typedef struct rule_list rule *value; } rule_list; -rule ***derives = NULL; +rule ***derives; static void print_derives (void) @@ -50,7 +48,7 @@ print_derives (void) { rule **rp; fprintf (stderr, "\t%s derives\n", symbols[i]->tag); - for (rp = derives[i]; *rp; ++rp) + for (rp = derives[i - ntokens]; *rp; ++rp) { fprintf (stderr, "\t\t%3d ", (*rp)->user_number); rule_rhs_print (*rp, stderr); @@ -65,38 +63,38 @@ void derives_compute (void) { symbol_number i; - int r; + rule_number r; rule **q; - /* DSET[NTERM] -- A linked list of the numbers of the rules whose - LHS is NTERM. */ - rule_list **dset = XCALLOC (rule_list *, nvars) - ntokens; + /* DSET[NTERM - NTOKENS] -- A linked list of the numbers of the rules + whose LHS is NTERM. */ + rule_list **dset = xcalloc (nvars, sizeof *dset); /* DELTS[RULE] -- There are NRULES rule number to attach to nterms. Instead of performing NRULES allocations for each, have an array indexed by rule numbers. */ - rule_list *delts = XCALLOC (rule_list, nrules); + rule_list *delts = xnmalloc (nrules, sizeof *delts); for (r = nrules - 1; r >= 0; --r) { symbol_number lhs = rules[r].lhs->number; rule_list *p = &delts[r]; /* A new LHS is found. */ - p->next = dset[lhs]; + p->next = dset[lhs - ntokens]; p->value = &rules[r]; - dset[lhs] = p; + dset[lhs - ntokens] = p; } /* DSET contains what we need under the form of a linked list. Make it a single array. */ - derives = XCALLOC (rule **, nvars) - ntokens; - q = XCALLOC (rule *, nvars + int_of_rule_number (nrules)); + derives = xnmalloc (nvars, sizeof *derives); + q = xnmalloc (nvars + nrules, sizeof *q); for (i = ntokens; i < nsyms; i++) { - rule_list *p = dset[i]; - derives[i] = q; + rule_list *p = dset[i - ntokens]; + derives[i - ntokens] = q; while (p) { *q++ = p->value; @@ -108,7 +106,7 @@ derives_compute (void) if (trace_flag & trace_sets) print_derives (); - free (dset + ntokens); + free (dset); free (delts); } @@ -116,6 +114,6 @@ derives_compute (void) void derives_free (void) { - XFREE (derives[ntokens]); - XFREE (derives + ntokens); + free (derives[0]); + free (derives); }