int comprimeCar(char c, int vec[], char s[], int dimMax) {
  int i = 0, estado = 0, j = 0, iguales = 0;
  while (s[i] && j < dimMax) {
    switch (estado) {
    case 0:
      s[j++] = s[i];
      if (s[i] == c) {
        estado = 1;
      }
      i++;
      break;
    case 1:
      if (s[i] != c) {
        s[j++] = s[i];
        estado = 0;
      } else {
        iguales++;
      }
      i++;
      break;
    }
  }
  return iguales;
}


x86 assembly (clang, -O0):
<comprimeCar>:
push   %rbp
mov    %rsp,%rbp
mov    %dil,%al
mov    %al,-0x1(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
movl   $0x0,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x2d(%rbp)
je     1157 <comprimeCar+0x57>
mov    -0x28(%rbp),%eax
cmp    -0x1c(%rbp),%eax
setl   %al
mov    %al,-0x2d(%rbp)
mov    -0x2d(%rbp),%al
test   $0x1,%al
jne    1167 <comprimeCar+0x67>
jmp    1233 <comprimeCar+0x133>
mov    -0x24(%rbp),%eax
mov    %eax,-0x34(%rbp)
test   %eax,%eax
je     118b <comprimeCar+0x8b>
jmp    117a <comprimeCar+0x7a>
mov    -0x34(%rbp),%eax
sub    $0x1,%eax
je     11d8 <comprimeCar+0xd8>
jmp    122e <comprimeCar+0x12e>
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
mov    %ecx,%esi
add    $0x1,%esi
mov    %esi,-0x28(%rbp)
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
movsbl -0x1(%rbp),%ecx
cmp    %ecx,%eax
jne    11ca <comprimeCar+0xca>
movl   $0x1,-0x24(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    122e <comprimeCar+0x12e>
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
movsbl -0x1(%rbp),%ecx
cmp    %ecx,%eax
je     121c <comprimeCar+0x11c>
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
mov    %ecx,%esi
add    $0x1,%esi
mov    %esi,-0x28(%rbp)
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
movl   $0x0,-0x24(%rbp)
jmp    1225 <comprimeCar+0x125>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1131 <comprimeCar+0x31>
mov    -0x2c(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<comprimeCar>:
mov    (%rdx),%r10b
xor    %eax,%eax
test   %r10b,%r10b
je     1187 <comprimeCar+0x87>
test   %ecx,%ecx
jle    1187 <comprimeCar+0x87>
xor    %eax,%eax
mov    %rdx,%rsi
xor    %r9d,%r9d
xor    %r11d,%r11d
xor    %r8d,%r8d
nopl   0x0(%rax)
cmp    $0x1,%r11d
je     1150 <comprimeCar+0x50>
test   %r11d,%r11d
jne    1172 <comprimeCar+0x72>
movslq %r9d,%r11
add    $0x1,%r9d
mov    %r10b,(%rdx,%r11,1)
xor    %r11d,%r11d
cmp    %dil,(%rsi)
sete   %r11b
jmp    116e <comprimeCar+0x6e>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
cmp    %dil,%r10b
jne    1160 <comprimeCar+0x60>
add    $0x1,%eax
mov    $0x1,%r11d
jmp    116e <comprimeCar+0x6e>
movslq %r9d,%rsi
add    $0x1,%r9d
mov    %r10b,(%rdx,%rsi,1)
xor    %r11d,%r11d
add    $0x1,%r8d
movslq %r8d,%rsi
movzbl (%rdx,%rsi,1),%r10d
test   %r10b,%r10b
je     1187 <comprimeCar+0x87>
add    %rdx,%rsi
cmp    %ecx,%r9d
jl     1120 <comprimeCar+0x20>
ret

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

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