int DeleteLine(char f[22][10]) {
  int i, j, k, row_clear, score = 0, recursive = 0;
  for (i = 22 - 1; i >= 0; i--) {
    row_clear = 1;
    for (j = 0; j < 10; j++) {
      row_clear &= !!f[i][j];
    }
    recursive |= row_clear;
    if (row_clear) {
      score++;
      for (k = i; k > 0; k--) {
        for (j = 0; j < 10; j++) {
          f[k][j] = f[k - 1][j];
        }
      }
    }
  }
  if (recursive)
    score += DeleteLine(f);
  return score;
}


x86 assembly (clang, -O0):
<DeleteLine>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x15,-0xc(%rbp)
cmpl   $0x0,-0xc(%rbp)
jl     1231 <DeleteLine+0x121>
movl   $0x1,-0x18(%rbp)
movl   $0x0,-0x10(%rbp)
cmpl   $0xa,-0x10(%rbp)
jge    118a <DeleteLine+0x7a>
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
imul   $0xa,%rcx,%rcx
add    %rcx,%rax
movslq -0x10(%rbp),%rcx
cmpb   $0x0,(%rax,%rcx,1)
setne  %al
xor    $0xff,%al
xor    $0xff,%al
and    $0x1,%al
movzbl %al,%eax
and    -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1149 <DeleteLine+0x39>
mov    -0x18(%rbp),%eax
or     -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
cmpl   $0x0,-0x18(%rbp)
je     121e <DeleteLine+0x10e>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x0,-0x14(%rbp)
jle    1219 <DeleteLine+0x109>
movl   $0x0,-0x10(%rbp)
cmpl   $0xa,-0x10(%rbp)
jge    1206 <DeleteLine+0xf6>
mov    -0x8(%rbp),%rax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
imul   $0xa,%rcx,%rcx
add    %rcx,%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
imul   $0xa,%rcx,%rcx
add    %rcx,%rax
movslq -0x10(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    11bd <DeleteLine+0xad>
jmp    120b <DeleteLine+0xfb>
mov    -0x14(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x14(%rbp)
jmp    11ac <DeleteLine+0x9c>
jmp    121e <DeleteLine+0x10e>
jmp    1223 <DeleteLine+0x113>
mov    -0xc(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0xc(%rbp)
jmp    1131 <DeleteLine+0x21>
cmpl   $0x0,-0x20(%rbp)
je     124a <DeleteLine+0x13a>
mov    -0x8(%rbp),%rdi
call   1030 <DeleteLine@plt>
add    -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<DeleteLine>:
push   %rbp
push   %r14
push   %rbx
lea    0xdb(%rdi),%r8
xor    %eax,%eax
pxor   %xmm0,%xmm0
jmp    112c <DeleteLine+0x2c>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    %r10d,%eax
test   %r9d,%r9d
je     1218 <DeleteLine+0x118>
mov    $0x15,%esi
mov    $0x16,%r11d
mov    %r8,%r14
xor    %r9d,%r9d
xor    %r10d,%r10d
jmp    115e <DeleteLine+0x5e>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0xffffffffffffffff,%r11
add    $0xfffffffffffffff6,%r14
sub    $0x1,%rsi
jb     1120 <DeleteLine+0x20>
lea    (%rsi,%rsi,4),%rcx
movq   (%rdi,%rcx,2),%xmm1
pcmpeqb %xmm0,%xmm1
cmpb   $0x0,0x8(%rdi,%rcx,2)
setne  %bl
cmpb   $0x0,0x9(%rdi,%rcx,2)
setne  %cl
pmovmskb %xmm1,%ebp
test   %bpl,%bpl
sete   %dl
and    %bl,%cl
and    %dl,%cl
movzbl %cl,%ecx
or     %ecx,%r9d
cmp    $0x1,%cl
jne    1150 <DeleteLine+0x50>
add    $0x1,%r10d
test   %rsi,%rsi
je     1120 <DeleteLine+0x20>
mov    %r14,%rcx
mov    %r11,%rbp
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    -0x2(%rbp),%edx
lea    (%rdx,%rdx,4),%rdx
movzbl (%rdi,%rdx,2),%ebx
mov    %bl,-0x9(%rcx)
movzbl 0x1(%rdi,%rdx,2),%ebx
mov    %bl,-0x8(%rcx)
movzbl 0x2(%rdi,%rdx,2),%ebx
mov    %bl,-0x7(%rcx)
movzbl 0x3(%rdi,%rdx,2),%ebx
mov    %bl,-0x6(%rcx)
movzbl 0x4(%rdi,%rdx,2),%ebx
mov    %bl,-0x5(%rcx)
movzbl 0x5(%rdi,%rdx,2),%ebx
mov    %bl,-0x4(%rcx)
movzbl 0x6(%rdi,%rdx,2),%ebx
mov    %bl,-0x3(%rcx)
movzbl 0x7(%rdi,%rdx,2),%ebx
mov    %bl,-0x2(%rcx)
movzbl 0x8(%rdi,%rdx,2),%ebx
mov    %bl,-0x1(%rcx)
movzbl 0x9(%rdi,%rdx,2),%edx
mov    %dl,(%rcx)
add    $0xffffffffffffffff,%rbp
add    $0xfffffffffffffff6,%rcx
cmp    $0x1,%rbp
jg     11b0 <DeleteLine+0xb0>
jmp    1150 <DeleteLine+0x50>
pop    %rbx
pop    %r14
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @DeleteLine([10 x i8]* nocapture %0) {
br label %2
2: ; preds = %66, %1
%3 = phi i32 [ 0, %1 ], [ %69, %66 ]
br label %4
4: ; preds = %2, %62
%5 = phi i64 [ 21, %2 ], [ %64, %62 ]
%6 = phi i32 [ 0, %2 ], [ %23, %62 ]
%7 = phi i32 [ 0, %2 ], [ %63, %62 ]
%8 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %5, i64 0
%9 = bitcast i8* %8 to <8 x i8>*
%10 = load <8 x i8>, <8 x i8>* %9
%11 = icmp eq <8 x i8> %10, zeroinitializer
%12 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %5, i64 8
%13 = load i8, i8* %12
%14 = icmp ne i8 %13, 0
%15 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %5, i64 9
%16 = load i8, i8* %15
%17 = icmp ne i8 %16, 0
%18 = bitcast <8 x i1> %11 to i8
%19 = icmp eq i8 %18, 0
%20 = and i1 %19, %14
%21 = and i1 %20, %17
%22 = zext i1 %21 to i32
%23 = or i32 %6, %22
br i1 %21, label %24, label %62
24: ; preds = %4
%25 = add nsw i32 %7, 1
%26 = icmp eq i64 %5, 0
br i1 %26, label %66, label %27
27: ; preds = %24, %27
%28 = phi i64 [ %29, %27 ], [ %5, %24 ]
%29 = add nsw i64 %28, -1
%30 = and i64 %29, 4294967295
%31 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 0
%32 = load i8, i8* %31
%33 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 0
store i8 %32, i8* %33
%34 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 1
%35 = load i8, i8* %34
%36 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 1
store i8 %35, i8* %36
%37 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 2
%38 = load i8, i8* %37
%39 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 2
store i8 %38, i8* %39
%40 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 3
%41 = load i8, i8* %40
%42 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 3
store i8 %41, i8* %42
%43 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 4
%44 = load i8, i8* %43
%45 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 4
store i8 %44, i8* %45
%46 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 5
%47 = load i8, i8* %46
%48 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 5
store i8 %47, i8* %48
%49 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 6
%50 = load i8, i8* %49
%51 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 6
store i8 %50, i8* %51
%52 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 7
%53 = load i8, i8* %52
%54 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 7
store i8 %53, i8* %54
%55 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 8
%56 = load i8, i8* %55
%57 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 8
store i8 %56, i8* %57
%58 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %30, i64 9
%59 = load i8, i8* %58
%60 = getelementptr inbounds [10 x i8], [10 x i8]* %0, i64 %28, i64 9
store i8 %59, i8* %60
%61 = icmp sgt i64 %28, 1
br i1 %61, label %27, label %62
62: ; preds = %27, %4
%63 = phi i32 [ %7, %4 ], [ %25, %27 ]
%64 = add nsw i64 %5, -1
%65 = icmp eq i64 %5, 0
br i1 %65, label %66, label %4
66: ; preds = %24, %62
%67 = phi i32 [ %63, %62 ], [ %25, %24 ]
%68 = icmp eq i32 %23, 0
%69 = add nsw i32 %67, %3
br i1 %68, label %70, label %2
70: ; preds = %66
ret i32 %69
}