int identity_matrix(const char matrix[10][10]) {
  int row;
  int column;
  for (row = 0; row < 10; row += 1) {
    for (column = 0; column < 10; column += 1) {
      if (matrix[row][column] != (row == column))
        return 0;
    }
  }
  return 1;
}


x86 assembly (clang, -O0):
<identity_matrix>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
cmpl   $0xa,-0x14(%rbp)
jge    118a <identity_matrix+0x8a>
movl   $0x0,-0x18(%rbp)
cmpl   $0xa,-0x18(%rbp)
jge    1177 <identity_matrix+0x77>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
imul   $0xa,%rcx,%rcx
add    %rcx,%rax
movslq -0x18(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    -0x14(%rbp),%ecx
cmp    -0x18(%rbp),%ecx
sete   %cl
and    $0x1,%cl
movzbl %cl,%ecx
cmp    %ecx,%eax
je     1164 <identity_matrix+0x64>
movl   $0x0,-0x4(%rbp)
jmp    1191 <identity_matrix+0x91>
jmp    1169 <identity_matrix+0x69>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1120 <identity_matrix+0x20>
jmp    117c <identity_matrix+0x7c>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    110f <identity_matrix+0xf>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<identity_matrix>:
xor    %eax,%eax
xor    %ecx,%ecx
movsbl (%rdi,%rcx,1),%edx
xor    %esi,%esi
test   %rcx,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x1(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0xa,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x2(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x14,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x3(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x1e,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x4(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x28,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x5(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x32,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x6(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x3c,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x7(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x46,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x8(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x50,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
movsbl 0x9(%rdi,%rcx,1),%edx
xor    %esi,%esi
cmp    $0x5a,%rcx
sete   %sil
cmp    %esi,%edx
jne    11e3 <identity_matrix+0xe3>
add    $0xa,%rcx
cmp    $0x64,%rcx
jne    1104 <identity_matrix+0x4>
mov    $0x1,%eax
ret

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

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