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) + (((int)sizeof(int) << 3) - 1)) / ((int)sizeof(int) << 3));
  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,-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   $0x1,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x58(%rbp)
mov    -0x58(%rbp),%rax
cmp    -0x48(%rbp),%rax
jae    1250 <transitive_closure+0x150>
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    1210 <transitive_closure+0x110>
mov    -0x40(%rbp),%rax
mov    (%rax),%eax
and    -0x1c(%rbp),%eax
cmp    $0x0,%eax
je     11e1 <transitive_closure+0xe1>
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    11dc <transitive_closure+0xdc>
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    11a5 <transitive_closure+0xa5>
jmp    11f6 <transitive_closure+0xf6>
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
shl    $0x1,%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jne    1236 <transitive_closure+0x136>
movl   $0x1,-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,-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 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 1, 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 = %67, %30
%34 = load i32*, i32** %8
%35 = load i32*, i32** %12
%36 = icmp ult i32* %34, %35
br i1 %36, label %37, label %72
37: ; preds = %33
%38 = load i32*, i32** %11
%39 = load i32, i32* %38
%40 = load i32, i32* %7
%41 = and i32 %39, %40
%42 = icmp ne i32 %41, 0
br i1 %42, label %43, label %62
43: ; preds = %37
%44 = load i32*, i32** %14
store i32* %44, i32** %9
%45 = load i32*, i32** %8
%46 = load i32, i32* %6
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds i32, i32* %45, i64 %47
store i32* %48, i32** %10
br label %49
49: ; preds = %53, %43
%50 = load i32*, i32** %8
%51 = load i32*, i32** %10
%52 = icmp ult i32* %50, %51
br i1 %52, label %53, label %61
53: ; preds = %49
%54 = load i32*, i32** %9
%55 = getelementptr inbounds i32, i32* %54, i32 1
store i32* %55, i32** %9
%56 = load i32, i32* %54
%57 = load i32*, i32** %8
%58 = getelementptr inbounds i32, i32* %57, i32 1
store i32* %58, i32** %8
%59 = load i32, i32* %57
%60 = or i32 %59, %56
store i32 %60, i32* %57
br label %49
61: ; preds = %49
br label %67
62: ; preds = %37
%63 = load i32, i32* %6
%64 = load i32*, i32** %8
%65 = sext i32 %63 to i64
%66 = getelementptr inbounds i32, i32* %64, i64 %65
store i32* %66, i32** %8
br label %67
67: ; preds = %62, %61
%68 = load i32, i32* %6
%69 = load i32*, i32** %11
%70 = sext i32 %68 to i64
%71 = getelementptr inbounds i32, i32* %69, i64 %70
store i32* %71, i32** %11
br label %33
72: ; preds = %33
%73 = load i32, i32* %7
%74 = shl i32 %73, 1
store i32 %74, i32* %7
%75 = load i32, i32* %7
%76 = icmp eq i32 %75, 0
br i1 %76, label %77, label %80
77: ; preds = %72
store i32 1, 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, %72
%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 %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 i32 undef
}