int parse(char *program) {
  char *p = program;
  int open = 0;
  while (*p) {
    if (*p == '[') {
      open++;
    }
    if (*p == ']') {
      if (open <= 0) {
        return 0;
      }
      open--;
    }
    p++;
  }
  return open == 0;
}


x86 assembly (clang, -O0):
<parse>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x18(%rbp),%rax
cmpb   $0x0,(%rax)
je     117d <parse+0x7d>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5b,%eax
jne    113d <parse+0x3d>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5d,%eax
jne    116c <parse+0x6c>
cmpl   $0x0,-0x1c(%rbp)
jg     1163 <parse+0x63>
movl   $0x0,-0x4(%rbp)
jmp    118c <parse+0x8c>
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1117 <parse+0x17>
cmpl   $0x0,-0x1c(%rbp)
sete   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<parse>:
xor    %ecx,%ecx
jmp    1117 <parse+0x17>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0x1,%ecx
add    $0x1,%rdi
movzbl (%rdi),%eax
cmp    $0x5b,%al
je     1110 <parse+0x10>
cmp    $0x5d,%al
je     1130 <parse+0x30>
test   %al,%al
jne    1137 <parse+0x37>
jmp    113d <parse+0x3d>
nopl   0x0(%rax,%rax,1)
test   %ecx,%ecx
jle    1145 <parse+0x45>
add    $0xffffffff,%ecx
add    $0x1,%rdi
jmp    1117 <parse+0x17>
xor    %eax,%eax
test   %ecx,%ecx
sete   %al
ret
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i32 @parse(i8* nocapture %0) {
br label %2
2: ; preds = %12, %1
%3 = phi i8* [ %0, %1 ], [ %14, %12 ]
%4 = phi i32 [ 0, %1 ], [ %13, %12 ]
%5 = load i8, i8* %3
switch i8 %5, label %12 [
i8 0, label %15
i8 91, label %6
i8 93, label %8
]
6: ; preds = %2
%7 = add nsw i32 %4, 1
br label %12
8: ; preds = %2
%9 = icmp slt i32 %4, 1
br i1 %9, label %18, label %10
10: ; preds = %8
%11 = add nsw i32 %4, -1
br label %12
12: ; preds = %2, %6, %10
%13 = phi i32 [ %11, %10 ], [ %7, %6 ], [ %4, %2 ]
%14 = getelementptr inbounds i8, i8* %3, i64 1
br label %2
15: ; preds = %2
%16 = icmp eq i32 %4, 0
%17 = zext i1 %16 to i32
br label %18
18: ; preds = %8, %15
%19 = phi i32 [ %17, %15 ], [ 0, %8 ]
ret i32 %19
}