1 /* Generate transitive closure of a matrix,
2 Copyright 1984, 1989, 2000 Free Software Foundation, Inc.
4 This file is part of Bison, the GNU Compiler Compiler.
6 Bison is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 Bison is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with Bison; see the file COPYING. If not, write to
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
25 /* Given n by n matrix of bits R, modify its contents to be the
26 transive closure of what was given. */
29 TC (unsigned *R
, int n
)
42 rowsize
= WORDSIZE(n
) * sizeof(unsigned);
43 relend
= (unsigned *) ((char *) R
+ (n
* rowsize
));
58 rend
= (unsigned *) ((char *) rowj
+ rowsize
);
65 rowj
= (unsigned *) ((char *) rowj
+ rowsize
);
68 ccol
= (unsigned *) ((char *) ccol
+ rowsize
);
78 rowi
= (unsigned *) ((char *) rowi
+ rowsize
);
83 /* Reflexive Transitive Closure. Same as TC
84 and then set all the bits on the diagonal of R. */
87 RTC (unsigned *R
, int n
)
96 rowsize
= WORDSIZE(n
) * sizeof(unsigned);
97 relend
= (unsigned *) ((char *) R
+ n
*rowsize
);
112 rp
= (unsigned *) ((char *) rp
+ rowsize
);