reflexive_transitive_closure(R, n) unsigned *R;
int n;
{
  register int rowsize;
  register unsigned mask;
  register unsigned *rp;
  register unsigned *relend;
  transitive_closure(R, n);
  rowsize = (((n) + (((int)sizeof(int) << 3) - 1)) / ((int)sizeof(int) << 3));
  relend = R + n * rowsize;
  mask = 1;
  rp = R;
  while (rp < relend) {
    *rp |= mask;
    mask <<= 1;
    if (mask == 0) {
      mask = 1;
      rp++;
    }
    rp += rowsize;
  }
}


x86 assembly (clang, -O0):
<reflexive_transitive_closure>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x14(%rbp),%esi
mov    $0x0,%al
call   1030 <transitive_closure@plt>
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,-0x30(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x30(%rbp),%rax
jae    11bf <reflexive_transitive_closure+0xaf>
mov    -0x1c(%rbp),%ecx
mov    -0x28(%rbp),%rax
or     (%rax),%ecx
mov    %ecx,(%rax)
mov    -0x1c(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jne    11a5 <reflexive_transitive_closure+0x95>
movl   $0x1,-0x1c(%rbp)
mov    -0x28(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x28(%rbp)
mov    -0x18(%rbp),%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
jmp    1166 <reflexive_transitive_closure+0x56>
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<reflexive_transitive_closure>:
push   %r14
push   %rbx
push   %rax
mov    %esi,%r14d
mov    %rdi,%rbx
xor    %eax,%eax
call   1030 <transitive_closure@plt>
lea    0x1f(%r14),%eax
lea    0x3e(%r14),%ecx
test   %eax,%eax
cmovns %eax,%ecx
sar    $0x5,%ecx
imul   %ecx,%r14d
test   %r14d,%r14d
jle    116a <reflexive_transitive_closure+0x5a>
movslq %r14d,%rax
lea    (%rbx,%rax,4),%rax
movslq %ecx,%rcx
mov    $0x1,%edx
mov    $0x1,%esi
xchg   %ax,%ax
or     %esi,(%rbx)
xor    %edi,%edi
add    %esi,%esi
sete   %dil
lea    (%rbx,%rcx,4),%rbx
cmove  %edx,%esi
lea    (%rbx,%rdi,4),%rbx
cmp    %rax,%rbx
jb     1150 <reflexive_transitive_closure+0x40>
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
define i32 @reflexive_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*
store i32* %0, i32** %4
store i32 %1, i32* %5
%10 = load i32*, i32** %4
%11 = load i32, i32* %5
%12 = call i32 (i32*, i32, ...) bitcast (i32 (...)* @transitive_closure to i32 (i32*, i32, ...)*)(i32* %10, i32 %11)
%13 = load i32, i32* %5
%14 = add nsw i32 %13, 31
%15 = sdiv i32 %14, 32
store i32 %15, i32* %6
%16 = load i32*, i32** %4
%17 = load i32, i32* %5
%18 = load i32, i32* %6
%19 = mul nsw i32 %17, %18
%20 = sext i32 %19 to i64
%21 = getelementptr inbounds i32, i32* %16, i64 %20
store i32* %21, i32** %9
store i32 1, i32* %7
%22 = load i32*, i32** %4
store i32* %22, i32** %8
br label %23
23: ; preds = %39, %2
%24 = load i32*, i32** %8
%25 = load i32*, i32** %9
%26 = icmp ult i32* %24, %25
br i1 %26, label %27, label %44
27: ; preds = %23
%28 = load i32, i32* %7
%29 = load i32*, i32** %8
%30 = load i32, i32* %29
%31 = or i32 %30, %28
store i32 %31, i32* %29
%32 = load i32, i32* %7
%33 = shl i32 %32, 1
store i32 %33, i32* %7
%34 = load i32, i32* %7
%35 = icmp eq i32 %34, 0
br i1 %35, label %36, label %39
36: ; preds = %27
store i32 1, i32* %7
%37 = load i32*, i32** %8
%38 = getelementptr inbounds i32, i32* %37, i32 1
store i32* %38, i32** %8
br label %39
39: ; preds = %36, %27
%40 = load i32, i32* %6
%41 = load i32*, i32** %8
%42 = sext i32 %40 to i64
%43 = getelementptr inbounds i32, i32* %41, i64 %42
store i32* %43, i32** %8
br label %23
44: ; preds = %23
%45 = load i32, i32* %3
ret i32 %45
}

LLVM IR (-O2):
define i32 @reflexive_transitive_closure(i32* %0, i32 %1) {
%3 = tail call i32 (i32*, i32, ...) bitcast (i32 (...)* @transitive_closure to i32 (i32*, i32, ...)*)(i32* %0, i32 %1)
%4 = add nsw i32 %1, 31
%5 = sdiv i32 %4, 32
%6 = mul nsw i32 %5, %1
%7 = sext i32 %6 to i64
%8 = getelementptr inbounds i32, i32* %0, i64 %7
%9 = icmp sgt i32 %6, 0
br i1 %9, label %10, label %24
10: ; preds = %2
%11 = sext i32 %5 to i64
br label %12
12: ; preds = %10, %12
%13 = phi i32 [ 1, %10 ], [ %21, %12 ]
%14 = phi i32* [ %0, %10 ], [ %22, %12 ]
%15 = load i32, i32* %14
%16 = or i32 %15, %13
store i32 %16, i32* %14
%17 = shl i32 %13, 1
%18 = icmp eq i32 %17, 0
%19 = zext i1 %18 to i64
%20 = getelementptr i32, i32* %14, i64 %11
%21 = select i1 %18, i32 1, i32 %17
%22 = getelementptr inbounds i32, i32* %20, i64 %19
%23 = icmp ult i32* %22, %8
br i1 %23, label %12, label %24
24: ; preds = %12, %2
ret i32 undef
}