int cre8ecs(fwd, bck, num)
int fwd[], bck[], num;
{
  int i, j, numcl;
  numcl = 0;
  for (i = 1; i <= num; ++i)
    if (bck[i] == 0) {
      bck[i] = ++numcl;
      for (j = fwd[i]; j != 0; j = fwd[j])
        bck[j] = -numcl;
    }
  return (numcl);
}


x86 assembly (clang, -O0):
<cre8ecs>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x1,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     11a2 <cre8ecs+0xa2>
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
cmpl   $0x0,(%rax,%rcx,4)
jne    118f <cre8ecs+0x8f>
mov    -0x20(%rbp),%edx
add    $0x1,%edx
mov    %edx,-0x20(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
je     118a <cre8ecs+0x8a>
xor    %edx,%edx
sub    -0x20(%rbp),%edx
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x1c(%rbp)
jmp    115d <cre8ecs+0x5d>
jmp    118f <cre8ecs+0x8f>
jmp    1194 <cre8ecs+0x94>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    111d <cre8ecs+0x1d>
mov    -0x20(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<cre8ecs>:
test   %edx,%edx
jle    1160 <cre8ecs+0x60>
add    $0x1,%edx
xor    %eax,%eax
mov    $0x1,%r9d
jmp    112c <cre8ecs+0x2c>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %r8d,%eax
add    $0x1,%r9
cmp    %rdx,%r9
je     115f <cre8ecs+0x5f>
cmpl   $0x0,(%rsi,%r9,4)
jne    1123 <cre8ecs+0x23>
lea    0x1(%rax),%r8d
mov    %r8d,(%rsi,%r9,4)
mov    (%rdi,%r9,4),%ecx
test   %ecx,%ecx
je     1120 <cre8ecs+0x20>
not    %eax
cs nopw 0x0(%rax,%rax,1)
nop
movslq %ecx,%rcx
mov    %eax,(%rsi,%rcx,4)
mov    (%rdi,%rcx,4),%ecx
test   %ecx,%ecx
jne    1150 <cre8ecs+0x50>
jmp    1120 <cre8ecs+0x20>
ret
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @cre8ecs(i32* %0, i32* %1, i32 %2) {
%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
store i32 %2, i32* %6
store i32 0, i32* %9
store i32 1, i32* %7
br label %10
10: ; preds = %51, %3
%11 = load i32, i32* %7
%12 = load i32, i32* %6
%13 = icmp sle i32 %11, %12
br i1 %13, label %14, label %54
14: ; preds = %10
%15 = load i32*, i32** %5
%16 = load i32, i32* %7
%17 = sext i32 %16 to i64
%18 = getelementptr inbounds i32, i32* %15, i64 %17
%19 = load i32, i32* %18
%20 = icmp eq i32 %19, 0
br i1 %20, label %21, label %50
21: ; preds = %14
%22 = load i32, i32* %9
%23 = add nsw i32 %22, 1
store i32 %23, i32* %9
%24 = load i32*, i32** %5
%25 = load i32, i32* %7
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds i32, i32* %24, i64 %26
store i32 %23, i32* %27
%28 = load i32*, i32** %4
%29 = load i32, i32* %7
%30 = sext i32 %29 to i64
%31 = getelementptr inbounds i32, i32* %28, i64 %30
%32 = load i32, i32* %31
store i32 %32, i32* %8
br label %33
33: ; preds = %43, %21
%34 = load i32, i32* %8
%35 = icmp ne i32 %34, 0
br i1 %35, label %36, label %49
36: ; preds = %33
%37 = load i32, i32* %9
%38 = sub nsw i32 0, %37
%39 = load i32*, i32** %5
%40 = load i32, i32* %8
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds i32, i32* %39, i64 %41
store i32 %38, i32* %42
br label %43
43: ; preds = %36
%44 = load i32*, i32** %4
%45 = load i32, i32* %8
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i32, i32* %44, i64 %46
%48 = load i32, i32* %47
store i32 %48, i32* %8
br label %33
49: ; preds = %33
br label %50
50: ; preds = %49, %14
br label %51
51: ; preds = %50
%52 = load i32, i32* %7
%53 = add nsw i32 %52, 1
store i32 %53, i32* %7
br label %10
54: ; preds = %10
%55 = load i32, i32* %9
ret i32 %55
}

LLVM IR (-O2):
define i32 @cre8ecs(i32* nocapture %0, i32* nocapture %1, i32 %2) {
%4 = icmp slt i32 %2, 1
br i1 %4, label %32, label %5
5: ; preds = %3
%6 = add nuw i32 %2, 1
%7 = zext i32 %6 to i64
br label %8
8: ; preds = %5, %28
%9 = phi i64 [ 1, %5 ], [ %30, %28 ]
%10 = phi i32 [ 0, %5 ], [ %29, %28 ]
%11 = getelementptr inbounds i32, i32* %1, i64 %9
%12 = load i32, i32* %11
%13 = icmp eq i32 %12, 0
br i1 %13, label %14, label %28
14: ; preds = %8
%15 = add nsw i32 %10, 1
store i32 %15, i32* %11
%16 = getelementptr inbounds i32, i32* %0, i64 %9
%17 = load i32, i32* %16
%18 = icmp eq i32 %17, 0
br i1 %18, label %28, label %19
19: ; preds = %14
%20 = xor i32 %10, -1
br label %21
21: ; preds = %19, %21
%22 = phi i32 [ %17, %19 ], [ %26, %21 ]
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds i32, i32* %1, i64 %23
store i32 %20, i32* %24
%25 = getelementptr inbounds i32, i32* %0, i64 %23
%26 = load i32, i32* %25
%27 = icmp eq i32 %26, 0
br i1 %27, label %28, label %21
28: ; preds = %21, %14, %8
%29 = phi i32 [ %10, %8 ], [ %15, %14 ], [ %15, %21 ]
%30 = add nuw nsw i64 %9, 1
%31 = icmp eq i64 %30, %7
br i1 %31, label %32, label %8
32: ; preds = %28, %3
%33 = phi i32 [ 0, %3 ], [ %29, %28 ]
ret i32 %33
}