int string_is_char(char *string) {
  int i;
  if (string[0] != '\'')
    return 0;
  for (i = 1; string[i] && string[i + 1]; i++)
    ;
  if (string[i] != '\'')
    return 0;
  return 1;
}


x86 assembly (clang, -O0):
<string_is_char>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x27,%eax
je     1124 <string_is_char+0x24>
movl   $0x0,-0x4(%rbp)
jmp    11aa <string_is_char+0xaa>
movl   $0x1,-0x14(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x15(%rbp)
je     115f <string_is_char+0x5f>
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x15(%rbp)
mov    -0x15(%rbp),%al
test   $0x1,%al
jne    116f <string_is_char+0x6f>
jmp    1182 <string_is_char+0x82>
jmp    1174 <string_is_char+0x74>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    112b <string_is_char+0x2b>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x27,%eax
je     11a3 <string_is_char+0xa3>
movl   $0x0,-0x4(%rbp)
jmp    11aa <string_is_char+0xaa>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<string_is_char>:
xor    %eax,%eax
cmpb   $0x27,(%rdi)
jne    1129 <string_is_char+0x29>
mov    0x1(%rdi),%al
add    $0x2,%rdi
xchg   %ax,%ax
mov    %eax,%ecx
test   %al,%al
je     1121 <string_is_char+0x21>
movzbl (%rdi),%eax
add    $0x1,%rdi
test   %al,%al
jne    1110 <string_is_char+0x10>
xor    %eax,%eax
cmp    $0x27,%cl
sete   %al
ret

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

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