int islandPerimeter(int **grid, int gridRowSize, int gridColSize) {
  int ans = 0;
  for (int i = 0; i < gridColSize; ++i) {
    for (int j = 0; j < gridRowSize; ++j) {
      if (!grid[j][i])
        continue;
      if (i - 1 < 0)
        ans++;
      else if (grid[j][i - 1] == 0)
        ans++;
      if (i + 1 >= gridColSize)
        ans++;
      else if (grid[j][i + 1] == 0)
        ans++;
      if (j - 1 < 0)
        ans++;
      else if (grid[j - 1][i] == 0)
        ans++;
      if (j + 1 >= gridRowSize)
        ans++;
      else if (grid[j + 1][i] == 0)
        ans++;
    }
  }
  return ans;
}


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    -0x10(%rbp),%eax
jge    12a8 <islandPerimeter+0x1a8>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1295 <islandPerimeter+0x195>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
cmpl   $0x0,(%rax,%rcx,4)
jne    115a <islandPerimeter+0x5a>
jmp    1287 <islandPerimeter+0x187>
mov    -0x18(%rbp),%eax
sub    $0x1,%eax
cmp    $0x0,%eax
jge    1177 <islandPerimeter+0x77>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11a4 <islandPerimeter+0xa4>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x18(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
cmpl   $0x0,(%rax,%rcx,4)
jne    119f <islandPerimeter+0x9f>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11a4 <islandPerimeter+0xa4>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
cmp    -0x10(%rbp),%eax
jl     11c1 <islandPerimeter+0xc1>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11ee <islandPerimeter+0xee>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x18(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
cmpl   $0x0,(%rax,%rcx,4)
jne    11e9 <islandPerimeter+0xe9>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11ee <islandPerimeter+0xee>
mov    -0x1c(%rbp),%eax
sub    $0x1,%eax
cmp    $0x0,%eax
jge    120b <islandPerimeter+0x10b>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1238 <islandPerimeter+0x138>
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
cmpl   $0x0,(%rax,%rcx,4)
jne    1233 <islandPerimeter+0x133>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1238 <islandPerimeter+0x138>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
cmp    -0xc(%rbp),%eax
jl     1255 <islandPerimeter+0x155>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1282 <islandPerimeter+0x182>
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
cmpl   $0x0,(%rax,%rcx,4)
jne    127d <islandPerimeter+0x17d>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1282 <islandPerimeter+0x182>
jmp    1287 <islandPerimeter+0x187>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    112f <islandPerimeter+0x2f>
jmp    129a <islandPerimeter+0x19a>
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   %r14
push   %rbx
test   %edx,%edx
jle    122d <islandPerimeter+0x12d>
movslq %esi,%r8
mov    %edx,%r9d
mov    %r8d,%r10d
xor    %r14d,%r14d
xor    %eax,%eax
jmp    1133 <islandPerimeter+0x33>
nopl   0x0(%rax)
add    $0x1,%r14
mov    %r14,%r11
mov    %r11,%r14
cmp    %r9,%r11
je     122f <islandPerimeter+0x12f>
test   %esi,%esi
jle    1120 <islandPerimeter+0x20>
lea    0x1(%r14),%r11
mov    (%rdi),%rbx
cmpl   $0x0,(%rbx,%r14,4)
je     1190 <islandPerimeter+0x90>
mov    $0x1,%ecx
mov    $0x1,%edx
test   %r14,%r14
je     115f <islandPerimeter+0x5f>
xor    %edx,%edx
cmpl   $0x0,-0x4(%rbx,%r14,4)
sete   %dl
add    %edx,%eax
cmp    %r9,%r11
jge    1171 <islandPerimeter+0x71>
xor    %ecx,%ecx
cmpl   $0x0,0x4(%rbx,%r14,4)
sete   %cl
add    %ecx,%eax
cmp    $0x1,%esi
jbe    1225 <islandPerimeter+0x125>
mov    0x8(%rdi),%rcx
cmpl   $0x1,(%rcx,%r14,4)
adc    $0x0,%eax
add    $0x1,%eax
jmp    1195 <islandPerimeter+0x95>
nopl   (%rax)
cmp    $0x1,%esi
je     1127 <islandPerimeter+0x27>
mov    $0x1,%ecx
jmp    11b3 <islandPerimeter+0xb3>
nopl   0x0(%rax)
add    $0x1,%rcx
mov    %rcx,%rdx
mov    %rdx,%rcx
cmp    %r10,%rdx
je     1127 <islandPerimeter+0x27>
mov    (%rdi,%rcx,8),%rdx
cmpl   $0x0,(%rdx,%r14,4)
je     11a0 <islandPerimeter+0xa0>
mov    $0x1,%ebx
mov    $0x1,%ebp
test   %r14,%r14
je     11d9 <islandPerimeter+0xd9>
xor    %ebp,%ebp
cmpl   $0x0,-0x4(%rdx,%r14,4)
sete   %bpl
add    %ebp,%eax
cmp    %r9,%r11
jge    11eb <islandPerimeter+0xeb>
xor    %ebx,%ebx
cmpl   $0x0,0x4(%rdx,%r14,4)
sete   %bl
add    %ebx,%eax
mov    -0x8(%rdi,%rcx,8),%rdx
cmpl   $0x1,(%rdx,%r14,4)
adc    $0x0,%eax
lea    0x1(%rcx),%rdx
cmp    %r8,%rdx
jge    1220 <islandPerimeter+0x120>
mov    0x8(%rdi,%rcx,8),%rcx
cmpl   $0x1,(%rcx,%r14,4)
adc    $0x0,%eax
jmp    11a7 <islandPerimeter+0xa7>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0x1,%eax
jmp    11a7 <islandPerimeter+0xa7>
add    $0x2,%eax
jmp    1127 <islandPerimeter+0x27>
xor    %eax,%eax
pop    %rbx
pop    %r14
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 = %130, %3
%11 = load i32, i32* %8
%12 = load i32, i32* %6
%13 = icmp slt i32 %11, %12
br i1 %13, label %14, label %133
14: ; preds = %10
store i32 0, i32* %9
br label %15
15: ; preds = %126, %14
%16 = load i32, i32* %9
%17 = load i32, i32* %5
%18 = icmp slt i32 %16, %17
br i1 %18, label %19, label %129
19: ; preds = %15
%20 = load i32**, i32*** %4
%21 = load i32, i32* %9
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i32*, i32** %20, i64 %22
%24 = load i32*, i32** %23
%25 = load i32, i32* %8
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds i32, i32* %24, i64 %26
%28 = load i32, i32* %27
%29 = icmp ne i32 %28, 0
br i1 %29, label %31, label %30
30: ; preds = %19
br label %126
31: ; preds = %19
%32 = load i32, i32* %8
%33 = sub nsw i32 %32, 1
%34 = icmp slt i32 %33, 0
br i1 %34, label %35, label %38
35: ; preds = %31
%36 = load i32, i32* %7
%37 = add nsw i32 %36, 1
store i32 %37, i32* %7
br label %54
38: ; preds = %31
%39 = load i32**, i32*** %4
%40 = load i32, i32* %9
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds i32*, i32** %39, i64 %41
%43 = load i32*, i32** %42
%44 = load i32, i32* %8
%45 = sub nsw i32 %44, 1
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i32, i32* %43, i64 %46
%48 = load i32, i32* %47
%49 = icmp eq i32 %48, 0
br i1 %49, label %50, label %53
50: ; preds = %38
%51 = load i32, i32* %7
%52 = add nsw i32 %51, 1
store i32 %52, i32* %7
br label %53
53: ; preds = %50, %38
br label %54
54: ; preds = %53, %35
%55 = load i32, i32* %8
%56 = add nsw i32 %55, 1
%57 = load i32, i32* %6
%58 = icmp sge i32 %56, %57
br i1 %58, label %59, label %62
59: ; preds = %54
%60 = load i32, i32* %7
%61 = add nsw i32 %60, 1
store i32 %61, i32* %7
br label %78
62: ; preds = %54
%63 = load i32**, i32*** %4
%64 = load i32, i32* %9
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds i32*, i32** %63, i64 %65
%67 = load i32*, i32** %66
%68 = load i32, i32* %8
%69 = add nsw i32 %68, 1
%70 = sext i32 %69 to i64
%71 = getelementptr inbounds i32, i32* %67, i64 %70
%72 = load i32, i32* %71
%73 = icmp eq i32 %72, 0
br i1 %73, label %74, label %77
74: ; preds = %62
%75 = load i32, i32* %7
%76 = add nsw i32 %75, 1
store i32 %76, i32* %7
br label %77
77: ; preds = %74, %62
br label %78
78: ; preds = %77, %59
%79 = load i32, i32* %9
%80 = sub nsw i32 %79, 1
%81 = icmp slt i32 %80, 0
br i1 %81, label %82, label %85
82: ; preds = %78
%83 = load i32, i32* %7
%84 = add nsw i32 %83, 1
store i32 %84, i32* %7
br label %101
85: ; preds = %78
%86 = load i32**, i32*** %4
%87 = load i32, i32* %9
%88 = sub nsw i32 %87, 1
%89 = sext i32 %88 to i64
%90 = getelementptr inbounds i32*, i32** %86, i64 %89
%91 = load i32*, i32** %90
%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 = icmp eq i32 %95, 0
br i1 %96, label %97, label %100
97: ; preds = %85
%98 = load i32, i32* %7
%99 = add nsw i32 %98, 1
store i32 %99, i32* %7
br label %100
100: ; preds = %97, %85
br label %101
101: ; preds = %100, %82
%102 = load i32, i32* %9
%103 = add nsw i32 %102, 1
%104 = load i32, i32* %5
%105 = icmp sge i32 %103, %104
br i1 %105, label %106, label %109
106: ; preds = %101
%107 = load i32, i32* %7
%108 = add nsw i32 %107, 1
store i32 %108, i32* %7
br label %125
109: ; preds = %101
%110 = load i32**, i32*** %4
%111 = load i32, i32* %9
%112 = add nsw i32 %111, 1
%113 = sext i32 %112 to i64
%114 = getelementptr inbounds i32*, i32** %110, i64 %113
%115 = load i32*, i32** %114
%116 = load i32, i32* %8
%117 = sext i32 %116 to i64
%118 = getelementptr inbounds i32, i32* %115, i64 %117
%119 = load i32, i32* %118
%120 = icmp eq i32 %119, 0
br i1 %120, label %121, label %124
121: ; preds = %109
%122 = load i32, i32* %7
%123 = add nsw i32 %122, 1
store i32 %123, i32* %7
br label %124
124: ; preds = %121, %109
br label %125
125: ; preds = %124, %106
br label %126
126: ; preds = %125, %30
%127 = load i32, i32* %9
%128 = add nsw i32 %127, 1
store i32 %128, i32* %9
br label %15
129: ; preds = %15
br label %130
130: ; preds = %129
%131 = load i32, i32* %8
%132 = add nsw i32 %131, 1
store i32 %132, i32* %8
br label %10
133: ; preds = %10
%134 = load i32, i32* %7
ret i32 %134
}

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