const char *clear_parenthesis(const char *input, int *length) {
  int p = 0;
  while (input[p] == '(' && input[*length - 1 - p] == ')') {
    p++;
  }
  int end = *length - 1 - p;
  int i, pcount = 0;
  for (i = p; i <= end && p > 0; i++) {
    if (input[i] == '(') {
      pcount++;
    } else if (input[i] == ')') {
      if (pcount == 0) {
        p--;
      } else {
        pcount--;
      }
    }
  }
  *length = *length - 2 * p;
  return input + p;
}


x86 assembly (clang, -O0):
<clear_parenthesis>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%ecx
xor    %eax,%eax
cmp    $0x28,%ecx
mov    %al,-0x21(%rbp)
jne    114d <clear_parenthesis+0x4d>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    (%rcx),%ecx
sub    $0x1,%ecx
sub    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x29,%eax
sete   %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    115d <clear_parenthesis+0x5d>
jmp    116b <clear_parenthesis+0x6b>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1113 <clear_parenthesis+0x13>
mov    -0x10(%rbp),%rax
mov    (%rax),%eax
sub    $0x1,%eax
sub    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%ecx
xor    %eax,%eax
cmp    -0x18(%rbp),%ecx
mov    %al,-0x22(%rbp)
jg     11a2 <clear_parenthesis+0xa2>
cmpl   $0x0,-0x14(%rbp)
setg   %al
mov    %al,-0x22(%rbp)
mov    -0x22(%rbp),%al
test   $0x1,%al
jne    11b2 <clear_parenthesis+0xb2>
jmp    1228 <clear_parenthesis+0x128>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x28,%eax
jne    11d5 <clear_parenthesis+0xd5>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1215 <clear_parenthesis+0x115>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x29,%eax
jne    1210 <clear_parenthesis+0x110>
cmpl   $0x0,-0x20(%rbp)
jne    1202 <clear_parenthesis+0x102>
mov    -0x14(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x14(%rbp)
jmp    120b <clear_parenthesis+0x10b>
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
jmp    1210 <clear_parenthesis+0x110>
jmp    1215 <clear_parenthesis+0x115>
jmp    121a <clear_parenthesis+0x11a>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1187 <clear_parenthesis+0x87>
mov    -0x10(%rbp),%rax
mov    (%rax),%ecx
mov    -0x14(%rbp),%eax
shl    $0x1,%eax
sub    %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
add    %rcx,%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<clear_parenthesis>:
mov    %rdi,%rax
xor    %r10d,%r10d
cmpb   $0x28,(%rdi)
mov    (%rsi),%r8d
jne    11ad <clear_parenthesis+0xad>
lea    -0x1(%r8),%ecx
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
movslq %ecx,%rdi
cmpb   $0x29,(%rax,%rdi,1)
jne    1138 <clear_parenthesis+0x38>
add    $0x1,%rdx
mov    %edx,%edi
add    $0xffffffff,%ecx
cmpb   $0x28,(%rax,%rdi,1)
je     1120 <clear_parenthesis+0x20>
mov    %edx,%r9d
not    %r9d
add    %r8d,%r9d
cmp    %edx,%r9d
jl     11aa <clear_parenthesis+0xaa>
test   %edx,%edx
jle    11aa <clear_parenthesis+0xaa>
mov    %edx,%edi
add    %rax,%rdi
xor    %r11d,%r11d
mov    %edx,%r10d
cs nopw 0x0(%rax,%rax,1)
nop
movzbl (%rdi),%ecx
cmp    $0x29,%cl
je     1180 <clear_parenthesis+0x80>
cmp    $0x28,%cl
jne    1189 <clear_parenthesis+0x89>
add    $0x1,%r11d
cmp    %edx,%r9d
jg     118e <clear_parenthesis+0x8e>
jmp    11ad <clear_parenthesis+0xad>
nopl   0x0(%rax,%rax,1)
test   %r11d,%r11d
je     119c <clear_parenthesis+0x9c>
add    $0xffffffff,%r11d
cmp    %edx,%r9d
jle    11ad <clear_parenthesis+0xad>
add    $0x1,%edx
add    $0x1,%rdi
test   %r10d,%r10d
jg     1160 <clear_parenthesis+0x60>
jmp    11ad <clear_parenthesis+0xad>
add    $0xffffffff,%r10d
xor    %r11d,%r11d
cmp    %edx,%r9d
jg     118e <clear_parenthesis+0x8e>
jmp    11ad <clear_parenthesis+0xad>
mov    %edx,%r10d
sub    %r10d,%r8d
sub    %r10d,%r8d
mov    %r8d,(%rsi)
movslq %r10d,%rcx
add    %rcx,%rax
ret

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

LLVM IR (-O2):
define i8* @clear_parenthesis(i8* %0, i32* nocapture %1) {
%3 = load i8, i8* %0
%4 = icmp eq i8 %3, 40
%5 = load i32, i32* %1
br i1 %4, label %6, label %53
6: ; preds = %2, %15
%7 = phi i64 [ %16, %15 ], [ 0, %2 ]
%8 = trunc i64 %7 to i32
%9 = xor i32 %8, -1
%10 = add i32 %5, %9
%11 = sext i32 %10 to i64
%12 = getelementptr inbounds i8, i8* %0, i64 %11
%13 = load i8, i8* %12
%14 = icmp eq i8 %13, 41
br i1 %14, label %15, label %21
15: ; preds = %6
%16 = add nuw i64 %7, 1
%17 = and i64 %16, 4294967295
%18 = getelementptr inbounds i8, i8* %0, i64 %17
%19 = load i8, i8* %18
%20 = icmp eq i8 %19, 40
br i1 %20, label %6, label %21
21: ; preds = %15, %6
%22 = phi i64 [ %7, %6 ], [ %16, %15 ]
%23 = trunc i64 %22 to i32
%24 = xor i32 %23, -1
%25 = add i32 %5, %24
%26 = icmp sge i32 %25, %23
%27 = icmp sgt i32 %23, 0
%28 = and i1 %26, %27
br i1 %28, label %29, label %53
29: ; preds = %21
%30 = and i64 %22, 4294967295
br label %31
31: ; preds = %29, %45
%32 = phi i64 [ %30, %29 ], [ %48, %45 ]
%33 = phi i32 [ 0, %29 ], [ %47, %45 ]
%34 = phi i32 [ %23, %29 ], [ %46, %45 ]
%35 = getelementptr inbounds i8, i8* %0, i64 %32
%36 = load i8, i8* %35
switch i8 %36, label %45 [
i8 40, label %37
i8 41, label %39
]
37: ; preds = %31
%38 = add nsw i32 %33, 1
br label %45
39: ; preds = %31
%40 = icmp eq i32 %33, 0
br i1 %40, label %41, label %43
41: ; preds = %39
%42 = add nsw i32 %34, -1
br label %45
43: ; preds = %39
%44 = add nsw i32 %33, -1
br label %45
45: ; preds = %31, %37, %41, %43
%46 = phi i32 [ %34, %37 ], [ %42, %41 ], [ %34, %43 ], [ %34, %31 ]
%47 = phi i32 [ %38, %37 ], [ 0, %41 ], [ %44, %43 ], [ %33, %31 ]
%48 = add nuw nsw i64 %32, 1
%49 = trunc i64 %32 to i32
%50 = icmp sgt i32 %25, %49
%51 = icmp sgt i32 %46, 0
%52 = select i1 %50, i1 %51, i1 false
br i1 %52, label %31, label %53
53: ; preds = %45, %2, %21
%54 = phi i32 [ %23, %21 ], [ 0, %2 ], [ %46, %45 ]
%55 = mul i32 %54, -2
%56 = add i32 %55, %5
store i32 %56, i32* %1
%57 = sext i32 %54 to i64
%58 = getelementptr inbounds i8, i8* %0, i64 %57
ret i8* %58
}