transitive_closure(R, n) unsigned *R;
int n;
{
  register int rowsize;
  register unsigned i;
  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;
  i = 0;
  rowi = R;
  while (rowi < relend) {
    ccol = cword;
    rowj = R;
    while (rowj < relend) {
      if (*ccol & (1 << i)) {
        rp = rowi;
        rend = rowj + rowsize;
        while (rowj < rend)
          *rowj++ |= *rp++;
      } else {
        rowj += rowsize;
      }
      ccol += rowsize;
    }
    if (++i >= 32) {
      i = 0;
      cword++;
    }
    rowi += rowsize;
  }
}


x86 assembly (clang, -O0):
<transitive_closure>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    -0x14(%rbp),%eax
add    $0x1f,%eax
mov    $0x20,%ecx
cltd
idiv   %ecx
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
imul   -0x18(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x48(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x50(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x58(%rbp)
mov    -0x58(%rbp),%rax
cmp    -0x48(%rbp),%rax
jae    125a <transitive_closure+0x15a>
mov    -0x50(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x48(%rbp),%rax
jae    121b <transitive_closure+0x11b>
mov    -0x40(%rbp),%rax
mov    (%rax),%eax
mov    -0x1c(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
and    %ecx,%eax
cmp    $0x0,%eax
je     11ec <transitive_closure+0xec>
mov    -0x58(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
movslq -0x18(%rbp),%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x38(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x38(%rbp),%rax
jae    11e7 <transitive_closure+0xe7>
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0x4,%rcx
mov    %rcx,-0x30(%rbp)
mov    (%rax),%ecx
mov    -0x28(%rbp),%rax
mov    %rax,%rdx
add    $0x4,%rdx
mov    %rdx,-0x28(%rbp)
or     (%rax),%ecx
mov    %ecx,(%rax)
jmp    11b0 <transitive_closure+0xb0>
jmp    1201 <transitive_closure+0x101>
mov    -0x18(%rbp),%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x18(%rbp),%ecx
mov    -0x40(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
jmp    116a <transitive_closure+0x6a>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
cmp    $0x20,%eax
jb     1240 <transitive_closure+0x140>
movl   $0x0,-0x1c(%rbp)
mov    -0x50(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x50(%rbp)
mov    -0x18(%rbp),%ecx
mov    -0x58(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x58(%rbp)
jmp    114c <transitive_closure+0x4c>
mov    -0x4(%rbp),%eax
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,-0x30(%rsp)
sar    $0x5,%eax
mov    %eax,%ecx
imul   %esi,%ecx
test   %ecx,%ecx
jle    134b <transitive_closure+0x24b>
movslq %ecx,%rcx
mov    -0x30(%rsp),%r10
lea    (%r10,%rcx,4),%r11
movslq %eax,%r13
lea    0x0(,%r13,4),%r14
mov    %r10,%r8
xor    %eax,%eax
xor    %ecx,%ecx
mov    %rsi,-0x18(%rsp)
mov    %r11,-0x20(%rsp)
mov    %r14,-0x28(%rsp)
jmp    1191 <transitive_closure+0x91>
nopl   0x0(%rax)
add    $0x1,%ecx
xor    %eax,%eax
cmp    $0x20,%ecx
setae  %al
mov    $0x0,%edx
cmovae %edx,%ecx
mov    -0x10(%rsp),%r10
lea    (%r10,%rax,4),%r10
add    %r14,%r8
mov    -0x8(%rsp),%rax
add    $0x1,%rax
cmp    %r11,%r8
jae    134b <transitive_closure+0x24b>
mov    %rax,-0x8(%rsp)
imul   %r13,%rax
mov    -0x30(%rsp),%rdx
lea    (%rdx,%rax,4),%r15
add    $0x4,%r15
mov    $0x1,%r12d
shl    %cl,%r12d
mov    %r10,-0x10(%rsp)
mov    %rdx,%rdi
jmp    11dc <transitive_closure+0xdc>
mov    %rdx,%rdi
mov    -0x18(%rsp),%rsi
mov    -0x20(%rsp),%r11
mov    -0x28(%rsp),%r14
nopl   0x0(%rax)
lea    (%r10,%r13,4),%r10
mov    %rdi,%rdx
cmp    %r11,%rdi
jae    1160 <transitive_closure+0x60>
lea    (%rdx,%r13,4),%rbp
test   %r12d,(%r10)
cmove  %rbp,%rdi
je     11d0 <transitive_closure+0xd0>
test   %esi,%esi
jle    11d0 <transitive_closure+0xd0>
lea    (%r14,%rdx,1),%rdi
lea    0x4(%rdx),%rax
cmp    %rax,%rdi
mov    %rax,%r9
cmova  %rdi,%r9
mov    %rdx,%rbx
not    %rbx
add    %rbx,%r9
cmp    $0x1c,%r9
jb     1231 <transitive_closure+0x131>
cmp    %rax,%rdi
cmova  %rdi,%rax
add    %rbx,%rax
and    $0xfffffffffffffffc,%rax
lea    (%r15,%rax,1),%rdi
cmp    %rdi,%rdx
jae    1256 <transitive_closure+0x156>
add    %rdx,%rax
add    $0x4,%rax
cmp    %rax,%r8
jae    1256 <transitive_closure+0x156>
mov    %r8,%rax
mov    %rdx,%rdi
nopw   0x0(%rax,%rax,1)
mov    (%rax),%edx
or     %edx,(%rdi)
add    $0x4,%rax
add    $0x4,%rdi
cmp    %rbp,%rdi
jb     1240 <transitive_closure+0x140>
jmp    11d0 <transitive_closure+0xd0>
mov    %r15,%rsi
shr    $0x2,%r9
add    $0x1,%r9
mov    %r9,%r11
and    $0xfffffffffffffff8,%r11
lea    -0x8(%r11),%rax
mov    %rax,%r15
shr    $0x3,%r15
add    $0x1,%r15
test   %rax,%rax
je     1340 <transitive_closure+0x240>
mov    %r15,%rdi
and    $0xfffffffffffffffe,%rdi
xor    %r14d,%r14d
nopw   0x0(%rax,%rax,1)
movups (%r8,%r14,4),%xmm0
movups 0x10(%r8,%r14,4),%xmm1
movups (%rdx,%r14,4),%xmm2
orps   %xmm0,%xmm2
movups 0x10(%rdx,%r14,4),%xmm0
orps   %xmm1,%xmm0
movups 0x20(%rdx,%r14,4),%xmm1
movups 0x30(%rdx,%r14,4),%xmm3
movups %xmm2,(%rdx,%r14,4)
movups %xmm0,0x10(%rdx,%r14,4)
movups 0x20(%r8,%r14,4),%xmm0
orps   %xmm1,%xmm0
movups 0x30(%r8,%r14,4),%xmm1
orps   %xmm3,%xmm1
movups %xmm0,0x20(%rdx,%r14,4)
movups %xmm1,0x30(%rdx,%r14,4)
add    $0x10,%r14
add    $0xfffffffffffffffe,%rdi
jne    1290 <transitive_closure+0x190>
test   $0x1,%r15b
je     1318 <transitive_closure+0x218>
movups (%r8,%r14,4),%xmm0
movups 0x10(%r8,%r14,4),%xmm1
movups (%rdx,%r14,4),%xmm2
orps   %xmm0,%xmm2
movups 0x10(%rdx,%r14,4),%xmm0
orps   %xmm1,%xmm0
movups %xmm2,(%rdx,%r14,4)
movups %xmm0,0x10(%rdx,%r14,4)
lea    (%rdx,%r11,4),%rdx
cmp    %r11,%r9
mov    %rsi,%r15
je     11ba <transitive_closure+0xba>
lea    (%r8,%r11,4),%rax
mov    -0x18(%rsp),%rsi
mov    -0x20(%rsp),%r11
mov    -0x28(%rsp),%r14
jmp    1234 <transitive_closure+0x134>
xor    %r14d,%r14d
test   $0x1,%r15b
jne    12f1 <transitive_closure+0x1f1>
jmp    1318 <transitive_closure+0x218>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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