int IVenColumna(char tauler[6][7], char jugador) {
  int i, j;
  int n;
  for (j = 0; j < 7; j++) {
    n = 0;
    for (i = 0; i < 6; i++)
      if (tauler[i][j] == jugador) {
        n++;
        if (n == 4)
          return 1;
      } else
        n = 0;
  }
  return 0;
}


x86 assembly (clang, -O0):
<IVenColumna>:
push   %rbp
mov    %rsp,%rbp
mov    %sil,%al
mov    %rdi,-0x10(%rbp)
mov    %al,-0x11(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x7,-0x1c(%rbp)
jge    11ab <IVenColumna+0xab>
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x18(%rbp)
cmpl   $0x6,-0x18(%rbp)
jge    1198 <IVenColumna+0x98>
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
imul   $0x7,%rcx,%rcx
add    %rcx,%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
movsbl -0x11(%rbp),%ecx
cmp    %ecx,%eax
jne    117e <IVenColumna+0x7e>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
cmpl   $0x4,-0x20(%rbp)
jne    1179 <IVenColumna+0x79>
movl   $0x1,-0x4(%rbp)
jmp    11b2 <IVenColumna+0xb2>
jmp    1185 <IVenColumna+0x85>
movl   $0x0,-0x20(%rbp)
jmp    118a <IVenColumna+0x8a>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    112d <IVenColumna+0x2d>
jmp    119d <IVenColumna+0x9d>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1115 <IVenColumna+0x15>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<IVenColumna>:
mov    $0xfffffffffffffff9,%rcx
mov    $0x2,%r8d
jmp    1115 <IVenColumna+0x15>
nop
inc    %rcx
je     1167 <IVenColumna+0x67>
xor    %edx,%edx
cmp    %sil,0x1c(%rdi,%rcx,1)
jne    1146 <IVenColumna+0x46>
xor    %edx,%edx
cmp    %sil,0x7(%rdi,%rcx,1)
sete   %dl
add    $0x3,%edx
cmp    %sil,0xe(%rdi,%rcx,1)
cmovne %r8d,%edx
cmp    %sil,0x15(%rdi,%rcx,1)
mov    $0x1,%eax
cmovne %eax,%edx
cmp    $0x4,%edx
je     1166 <IVenColumna+0x66>
cmp    %sil,0x23(%rdi,%rcx,1)
jne    1110 <IVenColumna+0x10>
add    $0x1,%edx
mov    $0x1,%eax
cmp    $0x4,%edx
je     1166 <IVenColumna+0x66>
cmp    %sil,0x2a(%rdi,%rcx,1)
jne    1110 <IVenColumna+0x10>
cmp    $0x3,%edx
jne    1110 <IVenColumna+0x10>
ret
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @IVenColumna([7 x i8]* %0, i8 signext %1) {
%3 = alloca i32
%4 = alloca [7 x i8]*
%5 = alloca i8
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store [7 x i8]* %0, [7 x i8]** %4
store i8 %1, i8* %5
store i32 0, i32* %7
br label %9
9: ; preds = %42, %2
%10 = load i32, i32* %7
%11 = icmp slt i32 %10, 7
br i1 %11, label %12, label %45
12: ; preds = %9
store i32 0, i32* %8
store i32 0, i32* %6
br label %13
13: ; preds = %38, %12
%14 = load i32, i32* %6
%15 = icmp slt i32 %14, 6
br i1 %15, label %16, label %41
16: ; preds = %13
%17 = load [7 x i8]*, [7 x i8]** %4
%18 = load i32, i32* %6
%19 = sext i32 %18 to i64
%20 = getelementptr inbounds [7 x i8], [7 x i8]* %17, i64 %19
%21 = load i32, i32* %7
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds [7 x i8], [7 x i8]* %20, i64 0, i64 %22
%24 = load i8, i8* %23
%25 = sext i8 %24 to i32
%26 = load i8, i8* %5
%27 = sext i8 %26 to i32
%28 = icmp eq i32 %25, %27
br i1 %28, label %29, label %36
29: ; preds = %16
%30 = load i32, i32* %8
%31 = add nsw i32 %30, 1
store i32 %31, i32* %8
%32 = load i32, i32* %8
%33 = icmp eq i32 %32, 4
br i1 %33, label %34, label %35
34: ; preds = %29
store i32 1, i32* %3
br label %46
35: ; preds = %29
br label %37
36: ; preds = %16
store i32 0, i32* %8
br label %37
37: ; preds = %36, %35
br label %38
38: ; preds = %37
%39 = load i32, i32* %6
%40 = add nsw i32 %39, 1
store i32 %40, i32* %6
br label %13
41: ; preds = %13
br label %42
42: ; preds = %41
%43 = load i32, i32* %7
%44 = add nsw i32 %43, 1
store i32 %44, i32* %7
br label %9
45: ; preds = %9
store i32 0, i32* %3
br label %46
46: ; preds = %45, %34
%47 = load i32, i32* %3
ret i32 %47
}

LLVM IR (-O2):
define i32 @IVenColumna([7 x i8]* nocapture %0, i8 signext %1) {
br label %3
3: ; preds = %2, %36
%4 = phi i64 [ 0, %2 ], [ %37, %36 ]
%5 = getelementptr inbounds [7 x i8], [7 x i8]* %0, i64 3, i64 %4
%6 = load i8, i8* %5
%7 = icmp eq i8 %6, %1
br i1 %7, label %8, label %22
8: ; preds = %3
%9 = getelementptr inbounds [7 x i8], [7 x i8]* %0, i64 2, i64 %4
%10 = load i8, i8* %9
%11 = icmp eq i8 %10, %1
%12 = getelementptr inbounds [7 x i8], [7 x i8]* %0, i64 1, i64 %4
%13 = load i8, i8* %12
%14 = icmp eq i8 %13, %1
%15 = getelementptr inbounds [7 x i8], [7 x i8]* %0, i64 0, i64 %4
%16 = load i8, i8* %15
%17 = icmp eq i8 %16, %1
%18 = select i1 %17, i32 4, i32 3
%19 = select i1 %14, i32 %18, i32 2
%20 = select i1 %11, i32 %19, i32 1
%21 = icmp eq i32 %20, 4
br i1 %21, label %39, label %22
22: ; preds = %8, %3
%23 = phi i32 [ %20, %8 ], [ 0, %3 ]
%24 = getelementptr inbounds [7 x i8], [7 x i8]* %0, i64 4, i64 %4
%25 = load i8, i8* %24
%26 = icmp eq i8 %25, %1
br i1 %26, label %27, label %36
27: ; preds = %22
%28 = add nuw nsw i32 %23, 1
%29 = icmp eq i32 %28, 4
br i1 %29, label %39, label %30
30: ; preds = %27
%31 = getelementptr inbounds [7 x i8], [7 x i8]* %0, i64 5, i64 %4
%32 = load i8, i8* %31
%33 = icmp eq i8 %32, %1
%34 = icmp eq i32 %28, 3
%35 = select i1 %33, i1 %34, i1 false
br i1 %35, label %39, label %36
36: ; preds = %22, %30
%37 = add nuw nsw i64 %4, 1
%38 = icmp eq i64 %37, 7
br i1 %38, label %39, label %3
39: ; preds = %30, %36, %8, %27
%40 = phi i32 [ 1, %27 ], [ 1, %8 ], [ 0, %36 ], [ 1, %30 ]
ret i32 %40
}