int islandPerimeter(int **grid, int gridRowSize, int gridColSize) {
  int stripes = 0;
  int i, j;
  for (i = 0; i < gridRowSize; i++) {
    for (j = 0; j < gridColSize; j++) {
      if (grid[i][j] == 1) {
        stripes += (4 - (((i - 1) < 0 ? 0 : grid[i - 1][j]) +
                         ((i + 1) >= gridRowSize ? 0 : grid[i + 1][j]) +
                         ((j - 1) < 0 ? 0 : grid[i][j - 1]) +
                         ((j + 1) >= gridColSize ? 0 : grid[i][j + 1])));
      }
    }
  }
  return stripes;
}


x86 assembly (clang, -O0):
<islandPerimeter>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    127c <islandPerimeter+0x17c>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    1269 <islandPerimeter+0x169>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
cmpl   $0x1,(%rax,%rcx,4)
jne    1256 <islandPerimeter+0x156>
mov    -0x18(%rbp),%eax
sub    $0x1,%eax
cmp    $0x0,%eax
jge    116e <islandPerimeter+0x6e>
xor    %eax,%eax
mov    %eax,-0x20(%rbp)
jmp    1189 <islandPerimeter+0x89>
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
cmp    -0xc(%rbp),%eax
jl     11a8 <islandPerimeter+0xa8>
xor    %eax,%eax
mov    %eax,-0x28(%rbp)
jmp    11c3 <islandPerimeter+0xc3>
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x28(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x28(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x1c(%rbp),%eax
sub    $0x1,%eax
cmp    $0x0,%eax
jge    11e7 <islandPerimeter+0xe7>
xor    %eax,%eax
mov    %eax,-0x30(%rbp)
jmp    1202 <islandPerimeter+0x102>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x1c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%eax
mov    -0x30(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x34(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
cmp    -0x10(%rbp),%eax
jl     1226 <islandPerimeter+0x126>
xor    %eax,%eax
mov    %eax,-0x38(%rbp)
jmp    1241 <islandPerimeter+0x141>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x38(%rbp)
mov    -0x34(%rbp),%ecx
mov    -0x38(%rbp),%eax
add    %eax,%ecx
mov    $0x4,%eax
sub    %ecx,%eax
add    -0x14(%rbp),%eax
mov    %eax,-0x14(%rbp)
jmp    125b <islandPerimeter+0x15b>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    112f <islandPerimeter+0x2f>
jmp    126e <islandPerimeter+0x16e>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    111c <islandPerimeter+0x1c>
mov    -0x14(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<islandPerimeter>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
test   %esi,%esi
jle    1201 <islandPerimeter+0x101>
movslq %edx,%r8
mov    %esi,%r9d
mov    %r8d,%r11d
xor    %r14d,%r14d
xor    %eax,%eax
jmp    1133 <islandPerimeter+0x33>
add    $0x1,%r14
mov    %r14,%r10
mov    %r10,%r14
cmp    %r9,%r10
je     1203 <islandPerimeter+0x103>
test   %edx,%edx
jle    1120 <islandPerimeter+0x20>
mov    (%rdi,%r14,8),%r15
lea    0x1(%r14),%r10
cmpl   $0x1,(%r15)
jne    1178 <islandPerimeter+0x78>
xor    %esi,%esi
mov    $0x0,%ebx
test   %r14,%r14
je     1158 <islandPerimeter+0x58>
mov    -0x8(%rdi,%r14,8),%rcx
mov    (%rcx),%ebx
cmp    %r9,%r10
jge    1164 <islandPerimeter+0x64>
mov    0x8(%rdi,%r14,8),%rcx
mov    (%rcx),%esi
xor    %ecx,%ecx
cmp    $0x2,%edx
jb     116f <islandPerimeter+0x6f>
mov    0x4(%r15),%ecx
add    %esi,%ebx
add    %ecx,%ebx
sub    %ebx,%eax
add    $0x4,%eax
cmp    $0x1,%edx
je     1127 <islandPerimeter+0x27>
mov    $0x1,%ebx
jmp    11a7 <islandPerimeter+0xa7>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    %r12d,%ebp
add    -0x4(%r15,%rbx,4),%ebp
add    %esi,%ebp
sub    %ebp,%eax
add    $0x4,%eax
mov    %rcx,%rbx
cmp    %r11,%rcx
je     1127 <islandPerimeter+0x27>
cmpl   $0x1,(%r15,%rbx,4)
jne    11f0 <islandPerimeter+0xf0>
xor    %r12d,%r12d
mov    $0x0,%ebp
test   %r14,%r14
je     11c3 <islandPerimeter+0xc3>
mov    -0x8(%rdi,%r14,8),%rcx
mov    (%rcx,%rbx,4),%ebp
cmp    %r9,%r10
jge    11d1 <islandPerimeter+0xd1>
mov    0x8(%rdi,%r14,8),%rcx
mov    (%rcx,%rbx,4),%r12d
lea    0x1(%rbx),%rcx
xor    %esi,%esi
cmp    %r8,%rcx
jge    1190 <islandPerimeter+0x90>
mov    0x4(%r15,%rbx,4),%esi
jmp    1190 <islandPerimeter+0x90>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    $0x1,%rbx
mov    %rbx,%rcx
cmp    %r11,%rcx
jne    11a7 <islandPerimeter+0xa7>
jmp    1127 <islandPerimeter+0x27>
xor    %eax,%eax
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @islandPerimeter(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* %7
store i32 0, i32* %8
br label %10
10: ; preds = %112, %3
%11 = load i32, i32* %8
%12 = load i32, i32* %5
%13 = icmp slt i32 %11, %12
br i1 %13, label %14, label %115
14: ; preds = %10
store i32 0, i32* %9
br label %15
15: ; preds = %108, %14
%16 = load i32, i32* %9
%17 = load i32, i32* %6
%18 = icmp slt i32 %16, %17
br i1 %18, label %19, label %111
19: ; preds = %15
%20 = load i32**, i32*** %4
%21 = load i32, i32* %8
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i32*, i32** %20, i64 %22
%24 = load i32*, i32** %23
%25 = load i32, i32* %9
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds i32, i32* %24, i64 %26
%28 = load i32, i32* %27
%29 = icmp eq i32 %28, 1
br i1 %29, label %30, label %107
30: ; preds = %19
%31 = load i32, i32* %8
%32 = sub nsw i32 %31, 1
%33 = icmp slt i32 %32, 0
br i1 %33, label %34, label %35
34: ; preds = %30
br label %46
35: ; preds = %30
%36 = load i32**, i32*** %4
%37 = load i32, i32* %8
%38 = sub nsw i32 %37, 1
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds i32*, i32** %36, i64 %39
%41 = load i32*, i32** %40
%42 = load i32, i32* %9
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds i32, i32* %41, i64 %43
%45 = load i32, i32* %44
br label %46
46: ; preds = %35, %34
%47 = phi i32 [ 0, %34 ], [ %45, %35 ]
%48 = load i32, i32* %8
%49 = add nsw i32 %48, 1
%50 = load i32, i32* %5
%51 = icmp sge i32 %49, %50
br i1 %51, label %52, label %53
52: ; preds = %46
br label %64
53: ; preds = %46
%54 = load i32**, i32*** %4
%55 = load i32, i32* %8
%56 = add nsw i32 %55, 1
%57 = sext i32 %56 to i64
%58 = getelementptr inbounds i32*, i32** %54, i64 %57
%59 = load i32*, i32** %58
%60 = load i32, i32* %9
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds i32, i32* %59, i64 %61
%63 = load i32, i32* %62
br label %64
64: ; preds = %53, %52
%65 = phi i32 [ 0, %52 ], [ %63, %53 ]
%66 = add nsw i32 %47, %65
%67 = load i32, i32* %9
%68 = sub nsw i32 %67, 1
%69 = icmp slt i32 %68, 0
br i1 %69, label %70, label %71
70: ; preds = %64
br label %82
71: ; preds = %64
%72 = load i32**, i32*** %4
%73 = load i32, i32* %8
%74 = sext i32 %73 to i64
%75 = getelementptr inbounds i32*, i32** %72, i64 %74
%76 = load i32*, i32** %75
%77 = load i32, i32* %9
%78 = sub nsw i32 %77, 1
%79 = sext i32 %78 to i64
%80 = getelementptr inbounds i32, i32* %76, i64 %79
%81 = load i32, i32* %80
br label %82
82: ; preds = %71, %70
%83 = phi i32 [ 0, %70 ], [ %81, %71 ]
%84 = add nsw i32 %66, %83
%85 = load i32, i32* %9
%86 = add nsw i32 %85, 1
%87 = load i32, i32* %6
%88 = icmp sge i32 %86, %87
br i1 %88, label %89, label %90
89: ; preds = %82
br label %101
90: ; preds = %82
%91 = load i32**, i32*** %4
%92 = load i32, i32* %8
%93 = sext i32 %92 to i64
%94 = getelementptr inbounds i32*, i32** %91, i64 %93
%95 = load i32*, i32** %94
%96 = load i32, i32* %9
%97 = add nsw i32 %96, 1
%98 = sext i32 %97 to i64
%99 = getelementptr inbounds i32, i32* %95, i64 %98
%100 = load i32, i32* %99
br label %101
101: ; preds = %90, %89
%102 = phi i32 [ 0, %89 ], [ %100, %90 ]
%103 = add nsw i32 %84, %102
%104 = sub nsw i32 4, %103
%105 = load i32, i32* %7
%106 = add nsw i32 %105, %104
store i32 %106, i32* %7
br label %107
107: ; preds = %101, %19
br label %108
108: ; preds = %107
%109 = load i32, i32* %9
%110 = add nsw i32 %109, 1
store i32 %110, i32* %9
br label %15
111: ; preds = %15
br label %112
112: ; preds = %111
%113 = load i32, i32* %8
%114 = add nsw i32 %113, 1
store i32 %114, i32* %8
br label %10
115: ; preds = %10
%116 = load i32, i32* %7
ret i32 %116
}

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