X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/0fb669f9d648dfdd7a39478a6b658511455ae966..868d2d96387042d8aba99fe427e76d186a7a4759:/src/relation.c diff --git a/src/relation.c b/src/relation.c index 441b0076..1d2b42dd 100644 --- a/src/relation.c +++ b/src/relation.c @@ -1,5 +1,5 @@ /* Binary relations. - Copyright (C) 2002, 2004 Free Software Foundation, Inc. + Copyright (C) 2002, 2004, 2005 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -18,6 +18,7 @@ the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ +#include #include "system.h" #include @@ -123,6 +124,7 @@ relation_digraph (relation r, relation_node size, bitsetv *function) void relation_transpose (relation *R_arg, relation_node n) { + relation r = *R_arg; /* The result. */ relation new_R = xnmalloc (n, sizeof *new_R); /* END_R[I] -- next entry of NEW_R[I]. */ @@ -135,14 +137,14 @@ relation_transpose (relation *R_arg, relation_node n) if (trace_flag & trace_sets) { fputs ("relation_transpose: input\n", stderr); - relation_print (*R_arg, n, stderr); + relation_print (r, n, stderr); } /* Count. */ for (i = 0; i < n; i++) - if ((*R_arg)[i]) - for (j = 0; (*R_arg)[i][j] != END_NODE; ++j) - ++nedges[(*R_arg)[i][j]]; + if (r[i]) + for (j = 0; r[i][j] != END_NODE; ++j) + ++nedges[r[i][j]]; /* Allocate. */ for (i = 0; i < n; i++) @@ -159,20 +161,17 @@ relation_transpose (relation *R_arg, relation_node n) /* Store. */ for (i = 0; i < n; i++) - if ((*R_arg)[i]) - for (j = 0; (*R_arg)[i][j] != END_NODE; ++j) - { - *end_R[(*R_arg)[i][j]] = i; - ++end_R[(*R_arg)[i][j]]; - } + if (r[i]) + for (j = 0; r[i][j] != END_NODE; ++j) + *end_R[r[i][j]]++ = i; free (nedges); free (end_R); /* Free the input: it is replaced with the result. */ for (i = 0; i < n; i++) - free ((*R_arg)[i]); - free (*R_arg); + free (r[i]); + free (r); if (trace_flag & trace_sets) {