void transitive_closure(R, n) unsigned *R;
int n;
{
  register int rowsize;
  register unsigned mask;
  register unsigned *rowj;
  register unsigned *rp;
  register unsigned *rend;
  register unsigned *ccol;
  register unsigned *relend;
  register unsigned *cword;
  register unsigned *rowi;
  rowsize = (((n) + (32 - 1)) / 32);
  relend = R + n * rowsize;
  cword = R;
  mask = 1;
  rowi = R;
  while (rowi < relend) {
    ccol = cword;
    rowj = R;
    while (rowj < relend) {
      if (*ccol & mask) {
        rp = rowi;
        rend = rowj + rowsize;
        while (rowj < rend)
          *rowj++ |= *rp++;
      } else {
        rowj += rowsize;
      }
      ccol += rowsize;
    }
    mask <<= 1;
    if (mask == 0) {
      mask = 1;
      cword++;
    }
    rowi += rowsize;
  }
}


x86 assembly (clang, -O0):
<transitive_closure>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0xc(%rbp),%eax
add    $0x1f,%eax
mov    $0x20,%ecx
cltd
idiv   %ecx
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x48(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x50(%rbp)
mov    -0x50(%rbp),%rax
cmp    -0x40(%rbp),%rax
jae    1250 <transitive_closure+0x150>
mov    -0x48(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x40(%rbp),%rax
jae    1210 <transitive_closure+0x110>
mov    -0x38(%rbp),%rax
mov    (%rax),%eax
and    -0x14(%rbp),%eax
cmp    $0x0,%eax
je     11e1 <transitive_closure+0xe1>
mov    -0x50(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x10(%rbp),%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x30(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x30(%rbp),%rax
jae    11dc <transitive_closure+0xdc>
mov    -0x28(%rbp),%rax
mov    %rax,%rcx
add    $0x4,%rcx
mov    %rcx,-0x28(%rbp)
mov    (%rax),%ecx
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0x4,%rdx
mov    %rdx,-0x20(%rbp)
or     (%rax),%ecx
mov    %ecx,(%rax)
jmp    11a5 <transitive_closure+0xa5>
jmp    11f6 <transitive_closure+0xf6>
mov    -0x10(%rbp),%ecx
mov    -0x20(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%ecx
mov    -0x38(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x38(%rbp)
jmp    116a <transitive_closure+0x6a>
mov    -0x14(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x0,-0x14(%rbp)
jne    1236 <transitive_closure+0x136>
movl   $0x1,-0x14(%rbp)
mov    -0x48(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x48(%rbp)
mov    -0x10(%rbp),%ecx
mov    -0x50(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x50(%rbp)
jmp    114c <transitive_closure+0x4c>
pop    %rbp
ret

x86 assembly (clang, -O2):
<transitive_closure>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
lea    0x1f(%rsi),%ecx
lea    0x3e(%rsi),%eax
test   %ecx,%ecx
cmovns %ecx,%eax
mov    %rdi,-0x20(%rsp)
sar    $0x5,%eax
mov    %eax,%ecx
imul   %esi,%ecx
test   %ecx,%ecx
jle    1310 <transitive_closure+0x210>
movslq %ecx,%rcx
mov    -0x20(%rsp),%r14
lea    (%r14,%rcx,4),%r15
movslq %eax,%r13
lea    0x0(,%r13,4),%r10
xor    %eax,%eax
mov    %r14,%rdx
mov    $0x1,%r12d
jmp    117f <transitive_closure+0x7f>
xchg   %ax,%ax
xor    %eax,%eax
add    %r12d,%r12d
sete   %al
mov    $0x1,%ecx
cmove  %ecx,%r12d
mov    -0x18(%rsp),%r14
lea    (%r14,%rax,4),%r14
add    %r10,%rdx
mov    -0x10(%rsp),%rax
add    $0x1,%rax
cmp    %r15,%rdx
jae    1310 <transitive_closure+0x210>
mov    %rax,-0x10(%rsp)
imul   %r13,%rax
mov    -0x20(%rsp),%rbp
lea    0x4(,%rax,4),%r9
add    %rbp,%r9
mov    %r14,-0x18(%rsp)
mov    %rbp,%rcx
mov    %r9,-0x8(%rsp)
jmp    11bc <transitive_closure+0xbc>
mov    %rbp,%rcx
nopw   0x0(%rax,%rax,1)
lea    (%r14,%r13,4),%r14
mov    %rcx,%rbp
cmp    %r15,%rcx
jae    1150 <transitive_closure+0x50>
lea    0x0(,%r13,4),%rbx
add    %rbp,%rbx
test   %r12d,(%r14)
cmove  %rbx,%rcx
je     11b0 <transitive_closure+0xb0>
test   %esi,%esi
jle    11b0 <transitive_closure+0xb0>
lea    (%r10,%rbp,1),%rcx
lea    0x4(%rbp),%rdi
cmp    %rdi,%rcx
mov    %rdi,%r8
cmova  %rcx,%r8
mov    %rbp,%rax
not    %rax
add    %rax,%r8
cmp    $0x1c,%r8
jb     1219 <transitive_closure+0x119>
cmp    %rdi,%rcx
cmova  %rcx,%rdi
add    %rax,%rdi
and    $0xfffffffffffffffc,%rdi
lea    (%r9,%rdi,1),%rax
cmp    %rax,%rbp
jae    1236 <transitive_closure+0x136>
lea    (%rdi,%rbp,1),%rax
add    $0x4,%rax
cmp    %rax,%rdx
jae    1236 <transitive_closure+0x136>
mov    %rdx,%rdi
mov    %rbp,%rcx
nop
mov    (%rdi),%eax
or     %eax,(%rcx)
add    $0x4,%rdi
add    $0x4,%rcx
cmp    %rbx,%rcx
jb     1220 <transitive_closure+0x120>
jmp    11b0 <transitive_closure+0xb0>
shr    $0x2,%r8
add    $0x1,%r8
mov    %r8,%rcx
and    $0xfffffffffffffff8,%rcx
lea    -0x8(%rcx),%rax
mov    %rax,%r11
shr    $0x3,%r11
add    $0x1,%r11
test   %rax,%rax
je     1306 <transitive_closure+0x206>
mov    %r11,%r9
and    $0xfffffffffffffffe,%r9
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
movups (%rdx,%rdi,4),%xmm0
movups 0x10(%rdx,%rdi,4),%xmm1
movups 0x0(%rbp,%rdi,4),%xmm2
orps   %xmm0,%xmm2
movups 0x10(%rbp,%rdi,4),%xmm0
orps   %xmm1,%xmm0
movups 0x20(%rbp,%rdi,4),%xmm1
movups 0x30(%rbp,%rdi,4),%xmm3
movups %xmm2,0x0(%rbp,%rdi,4)
movups %xmm0,0x10(%rbp,%rdi,4)
movups 0x20(%rdx,%rdi,4),%xmm0
orps   %xmm1,%xmm0
movups 0x30(%rdx,%rdi,4),%xmm1
orps   %xmm3,%xmm1
movups %xmm0,0x20(%rbp,%rdi,4)
movups %xmm1,0x30(%rbp,%rdi,4)
add    $0x10,%rdi
add    $0xfffffffffffffffe,%r9
jne    1270 <transitive_closure+0x170>
test   $0x1,%r11b
je     12ea <transitive_closure+0x1ea>
movups (%rdx,%rdi,4),%xmm0
movups 0x10(%rdx,%rdi,4),%xmm1
movups 0x0(%rbp,%rdi,4),%xmm2
orps   %xmm0,%xmm2
movups 0x10(%rbp,%rdi,4),%xmm0
orps   %xmm1,%xmm0
movups %xmm2,0x0(%rbp,%rdi,4)
movups %xmm0,0x10(%rbp,%rdi,4)
lea    0x0(%rbp,%rcx,4),%rbp
cmp    %rcx,%r8
mov    -0x8(%rsp),%r9
je     11a7 <transitive_closure+0xa7>
lea    (%rdx,%rcx,4),%rdi
jmp    121c <transitive_closure+0x11c>
xor    %edi,%edi
test   $0x1,%r11b
jne    12c7 <transitive_closure+0x1c7>
jmp    12ea <transitive_closure+0x1ea>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @transitive_closure(i32* %0, i32 %1) {
%3 = alloca i32*
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32*
%8 = alloca i32*
%9 = alloca i32*
%10 = alloca i32*
%11 = alloca i32*
%12 = alloca i32*
%13 = alloca i32*
store i32* %0, i32** %3
store i32 %1, i32* %4
%14 = load i32, i32* %4
%15 = add nsw i32 %14, 31
%16 = sdiv i32 %15, 32
store i32 %16, i32* %5
%17 = load i32*, i32** %3
%18 = load i32, i32* %4
%19 = load i32, i32* %5
%20 = mul nsw i32 %18, %19
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i32, i32* %17, i64 %21
store i32* %22, i32** %11
%23 = load i32*, i32** %3
store i32* %23, i32** %12
store i32 1, i32* %6
%24 = load i32*, i32** %3
store i32* %24, i32** %13
br label %25
25: ; preds = %79, %2
%26 = load i32*, i32** %13
%27 = load i32*, i32** %11
%28 = icmp ult i32* %26, %27
br i1 %28, label %29, label %84
29: ; preds = %25
%30 = load i32*, i32** %12
store i32* %30, i32** %10
%31 = load i32*, i32** %3
store i32* %31, i32** %7
br label %32
32: ; preds = %66, %29
%33 = load i32*, i32** %7
%34 = load i32*, i32** %11
%35 = icmp ult i32* %33, %34
br i1 %35, label %36, label %71
36: ; preds = %32
%37 = load i32*, i32** %10
%38 = load i32, i32* %37
%39 = load i32, i32* %6
%40 = and i32 %38, %39
%41 = icmp ne i32 %40, 0
br i1 %41, label %42, label %61
42: ; preds = %36
%43 = load i32*, i32** %13
store i32* %43, i32** %8
%44 = load i32*, i32** %7
%45 = load i32, i32* %5
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i32, i32* %44, i64 %46
store i32* %47, i32** %9
br label %48
48: ; preds = %52, %42
%49 = load i32*, i32** %7
%50 = load i32*, i32** %9
%51 = icmp ult i32* %49, %50
br i1 %51, label %52, label %60
52: ; preds = %48
%53 = load i32*, i32** %8
%54 = getelementptr inbounds i32, i32* %53, i32 1
store i32* %54, i32** %8
%55 = load i32, i32* %53
%56 = load i32*, i32** %7
%57 = getelementptr inbounds i32, i32* %56, i32 1
store i32* %57, i32** %7
%58 = load i32, i32* %56
%59 = or i32 %58, %55
store i32 %59, i32* %56
br label %48
60: ; preds = %48
br label %66
61: ; preds = %36
%62 = load i32, i32* %5
%63 = load i32*, i32** %7
%64 = sext i32 %62 to i64
%65 = getelementptr inbounds i32, i32* %63, i64 %64
store i32* %65, i32** %7
br label %66
66: ; preds = %61, %60
%67 = load i32, i32* %5
%68 = load i32*, i32** %10
%69 = sext i32 %67 to i64
%70 = getelementptr inbounds i32, i32* %68, i64 %69
store i32* %70, i32** %10
br label %32
71: ; preds = %32
%72 = load i32, i32* %6
%73 = shl i32 %72, 1
store i32 %73, i32* %6
%74 = load i32, i32* %6
%75 = icmp eq i32 %74, 0
br i1 %75, label %76, label %79
76: ; preds = %71
store i32 1, i32* %6
%77 = load i32*, i32** %12
%78 = getelementptr inbounds i32, i32* %77, i32 1
store i32* %78, i32** %12
br label %79
79: ; preds = %76, %71
%80 = load i32, i32* %5
%81 = load i32*, i32** %13
%82 = sext i32 %80 to i64
%83 = getelementptr inbounds i32, i32* %81, i64 %82
store i32* %83, i32** %13
br label %25
84: ; preds = %25
ret void
}

LLVM IR (-O2):
define void @transitive_closure(i32* %0, i32 %1) {
%3 = add nsw i32 %1, 31
%4 = sdiv i32 %3, 32
%5 = mul nsw i32 %4, %1
%6 = sext i32 %5 to i64
%7 = getelementptr inbounds i32, i32* %0, i64 %6
%8 = icmp sgt i32 %5, 0
br i1 %8, label %9, label %152
9: ; preds = %2
%10 = sext i32 %4 to i64
%11 = icmp slt i32 %1, 1
%12 = shl nsw i64 %10, 2
%13 = shl nsw i64 %10, 2
br label %14
14: ; preds = %143, %9
%15 = phi i64 [ %151, %143 ], [ 0, %9 ]
%16 = phi i32* [ %149, %143 ], [ %0, %9 ]
%17 = phi i32* [ %148, %143 ], [ %0, %9 ]
%18 = phi i32 [ %146, %143 ], [ 1, %9 ]
%19 = mul i64 %15, %10
%20 = add i64 %19, 1
%21 = getelementptr i32, i32* %0, i64 %20
br label %22
22: ; preds = %14, %139
%23 = phi i32* [ %141, %139 ], [ %17, %14 ]
%24 = phi i32* [ %140, %139 ], [ %0, %14 ]
%25 = ptrtoint i32* %24 to i64
%26 = ptrtoint i32* %24 to i64
%27 = load i32, i32* %23
%28 = and i32 %27, %18
%29 = icmp eq i32 %28, 0
%30 = getelementptr inbounds i32, i32* %24, i64 %10
%31 = or i1 %29, %11
%32 = select i1 %29, i32* %30, i32* %24
br i1 %31, label %139, label %33
33: ; preds = %22
%34 = add i64 %13, %25
%35 = add i64 %25, 4
%36 = call i64 @llvm.umax.i64(i64 %34, i64 %35)
%37 = xor i64 %25, -1
%38 = add i64 %36, %37
%39 = lshr i64 %38, 2
%40 = add nuw nsw i64 %39, 1
%41 = icmp ult i64 %38, 28
br i1 %41, label %127, label %42
42: ; preds = %33
%43 = getelementptr i32, i32* %24, i64 1
%44 = add i64 %12, %26
%45 = add i64 %26, 4
%46 = call i64 @llvm.umax.i64(i64 %44, i64 %45)
%47 = xor i64 %26, -1
%48 = add i64 %46, %47
%49 = lshr i64 %48, 2
%50 = getelementptr i32, i32* %43, i64 %49
%51 = getelementptr i32, i32* %21, i64 %49
%52 = icmp ult i32* %24, %51
%53 = icmp ult i32* %16, %50
%54 = and i1 %52, %53
br i1 %54, label %127, label %55
55: ; preds = %42
%56 = and i64 %40, 9223372036854775800
%57 = getelementptr i32, i32* %24, i64 %56
%58 = getelementptr i32, i32* %16, i64 %56
%59 = add nsw i64 %56, -8
%60 = lshr exact i64 %59, 3
%61 = add nuw nsw i64 %60, 1
%62 = and i64 %61, 1
%63 = icmp eq i64 %59, 0
br i1 %63, label %105, label %64
64: ; preds = %55
%65 = and i64 %61, 4611686018427387902
br label %66
66: ; preds = %66, %64
%67 = phi i64 [ 0, %64 ], [ %102, %66 ]
%68 = phi i64 [ 0, %64 ], [ %103, %66 ]
%69 = getelementptr i32, i32* %24, i64 %67
%70 = getelementptr i32, i32* %16, i64 %67
%71 = bitcast i32* %70 to <4 x i32>*
%72 = load <4 x i32>, <4 x i32>* %71
%73 = getelementptr i32, i32* %70, i64 4
%74 = bitcast i32* %73 to <4 x i32>*
%75 = load <4 x i32>, <4 x i32>* %74
%76 = bitcast i32* %69 to <4 x i32>*
%77 = load <4 x i32>, <4 x i32>* %76
%78 = getelementptr i32, i32* %69, i64 4
%79 = bitcast i32* %78 to <4 x i32>*
%80 = load <4 x i32>, <4 x i32>* %79
%81 = or <4 x i32> %77, %72
%82 = or <4 x i32> %80, %75
%83 = bitcast i32* %69 to <4 x i32>*
store <4 x i32> %81, <4 x i32>* %83
%84 = bitcast i32* %78 to <4 x i32>*
store <4 x i32> %82, <4 x i32>* %84
%85 = or i64 %67, 8
%86 = getelementptr i32, i32* %24, i64 %85
%87 = getelementptr i32, i32* %16, i64 %85
%88 = bitcast i32* %87 to <4 x i32>*
%89 = load <4 x i32>, <4 x i32>* %88
%90 = getelementptr i32, i32* %87, i64 4
%91 = bitcast i32* %90 to <4 x i32>*
%92 = load <4 x i32>, <4 x i32>* %91
%93 = bitcast i32* %86 to <4 x i32>*
%94 = load <4 x i32>, <4 x i32>* %93
%95 = getelementptr i32, i32* %86, i64 4
%96 = bitcast i32* %95 to <4 x i32>*
%97 = load <4 x i32>, <4 x i32>* %96
%98 = or <4 x i32> %94, %89
%99 = or <4 x i32> %97, %92
%100 = bitcast i32* %86 to <4 x i32>*
store <4 x i32> %98, <4 x i32>* %100
%101 = bitcast i32* %95 to <4 x i32>*
store <4 x i32> %99, <4 x i32>* %101
%102 = add nuw i64 %67, 16
%103 = add i64 %68, 2
%104 = icmp eq i64 %103, %65
br i1 %104, label %105, label %66
105: ; preds = %66, %55
%106 = phi i64 [ 0, %55 ], [ %102, %66 ]
%107 = icmp eq i64 %62, 0
br i1 %107, label %125, label %108
108: ; preds = %105
%109 = getelementptr i32, i32* %24, i64 %106
%110 = getelementptr i32, i32* %16, i64 %106
%111 = bitcast i32* %110 to <4 x i32>*
%112 = load <4 x i32>, <4 x i32>* %111
%113 = getelementptr i32, i32* %110, i64 4
%114 = bitcast i32* %113 to <4 x i32>*
%115 = load <4 x i32>, <4 x i32>* %114
%116 = bitcast i32* %109 to <4 x i32>*
%117 = load <4 x i32>, <4 x i32>* %116
%118 = getelementptr i32, i32* %109, i64 4
%119 = bitcast i32* %118 to <4 x i32>*
%120 = load <4 x i32>, <4 x i32>* %119
%121 = or <4 x i32> %117, %112
%122 = or <4 x i32> %120, %115
%123 = bitcast i32* %109 to <4 x i32>*
store <4 x i32> %121, <4 x i32>* %123
%124 = bitcast i32* %118 to <4 x i32>*
store <4 x i32> %122, <4 x i32>* %124
br label %125
125: ; preds = %105, %108
%126 = icmp eq i64 %40, %56
br i1 %126, label %139, label %127
127: ; preds = %42, %33, %125
%128 = phi i32* [ %24, %42 ], [ %24, %33 ], [ %57, %125 ]
%129 = phi i32* [ %16, %42 ], [ %16, %33 ], [ %58, %125 ]
br label %130
130: ; preds = %127, %130
%131 = phi i32* [ %135, %130 ], [ %128, %127 ]
%132 = phi i32* [ %133, %130 ], [ %129, %127 ]
%133 = getelementptr inbounds i32, i32* %132, i64 1
%134 = load i32, i32* %132
%135 = getelementptr inbounds i32, i32* %131, i64 1
%136 = load i32, i32* %131
%137 = or i32 %136, %134
store i32 %137, i32* %131
%138 = icmp ult i32* %135, %30
br i1 %138, label %130, label %139
139: ; preds = %130, %125, %22
%140 = phi i32* [ %32, %22 ], [ %57, %125 ], [ %135, %130 ]
%141 = getelementptr inbounds i32, i32* %23, i64 %10
%142 = icmp ult i32* %140, %7
br i1 %142, label %22, label %143
143: ; preds = %139
%144 = shl i32 %18, 1
%145 = icmp eq i32 %144, 0
%146 = select i1 %145, i32 1, i32 %144
%147 = zext i1 %145 to i64
%148 = getelementptr i32, i32* %17, i64 %147
%149 = getelementptr inbounds i32, i32* %16, i64 %10
%150 = icmp ult i32* %149, %7
%151 = add i64 %15, 1
br i1 %150, label %14, label %152
152: ; preds = %143, %2
ret void
}