int is_string(s)
char *s;
{
  char *x;
  if (*s != '"')
    return (0);
  for (s++; *s; s++) {
    if (*s == '"')
      return (!*++s);
    if ((*s == '\\') || (*s == '^')) {
      if (*++s)
        continue;
      return (0);
    }
  }
  return (0);
}


x86 assembly (clang, -O0):
<is_string>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x22,%eax
je     1124 <is_string+0x24>
movl   $0x0,-0x4(%rbp)
jmp    11d9 <is_string+0xd9>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
cmpb   $0x0,(%rax)
je     11d2 <is_string+0xd2>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x22,%eax
jne    1172 <is_string+0x72>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
cmpb   $0x0,0x1(%rax)
setne  %al
xor    $0xff,%al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x4(%rbp)
jmp    11d9 <is_string+0xd9>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5c,%eax
je     1192 <is_string+0x92>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5e,%eax
jne    11bc <is_string+0xbc>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
cmpb   $0x0,0x1(%rax)
je     11b0 <is_string+0xb0>
jmp    11c1 <is_string+0xc1>
movl   $0x0,-0x4(%rbp)
jmp    11d9 <is_string+0xd9>
jmp    11c1 <is_string+0xc1>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1130 <is_string+0x30>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<is_string>:
xor    %eax,%eax
cmpb   $0x22,(%rdi)
je     111f <is_string+0x1f>
ret
nopl   0x0(%rax,%rax,1)
cmp    $0x5e,%dl
jne    111f <is_string+0x1f>
lea    0x2(%rcx),%rdi
cmpb   $0x0,0x2(%rcx)
je     1107 <is_string+0x7>
mov    %rdi,%rcx
add    $0x1,%rdi
movzbl 0x1(%rcx),%edx
cmp    $0x5d,%dl
jg     1110 <is_string+0x10>
cmp    $0x5c,%dl
je     1115 <is_string+0x15>
test   %dl,%dl
je     1107 <is_string+0x7>
cmp    $0x22,%dl
jne    111f <is_string+0x1f>
xor    %eax,%eax
cmpb   $0x0,0x2(%rcx)
sete   %al
ret

LLVM IR (-O0):
define i32 @is_string(i8* %0) {
%2 = alloca i32
%3 = alloca i8*
%4 = alloca i8*
store i8* %0, i8** %3
%5 = load i8*, i8** %3
%6 = load i8, i8* %5
%7 = sext i8 %6 to i32
%8 = icmp ne i32 %7, 34
br i1 %8, label %9, label %10
9: ; preds = %1
store i32 0, i32* %2
br label %51
10: ; preds = %1
%11 = load i8*, i8** %3
%12 = getelementptr inbounds i8, i8* %11, i32 1
store i8* %12, i8** %3
br label %13
13: ; preds = %47, %10
%14 = load i8*, i8** %3
%15 = load i8, i8* %14
%16 = icmp ne i8 %15, 0
br i1 %16, label %17, label %50
17: ; preds = %13
%18 = load i8*, i8** %3
%19 = load i8, i8* %18
%20 = sext i8 %19 to i32
%21 = icmp eq i32 %20, 34
br i1 %21, label %22, label %29
22: ; preds = %17
%23 = load i8*, i8** %3
%24 = getelementptr inbounds i8, i8* %23, i32 1
store i8* %24, i8** %3
%25 = load i8, i8* %24
%26 = icmp ne i8 %25, 0
%27 = xor i1 %26, true
%28 = zext i1 %27 to i32
store i32 %28, i32* %2
br label %51
29: ; preds = %17
%30 = load i8*, i8** %3
%31 = load i8, i8* %30
%32 = sext i8 %31 to i32
%33 = icmp eq i32 %32, 92
br i1 %33, label %39, label %34
34: ; preds = %29
%35 = load i8*, i8** %3
%36 = load i8, i8* %35
%37 = sext i8 %36 to i32
%38 = icmp eq i32 %37, 94
br i1 %38, label %39, label %46
39: ; preds = %34, %29
%40 = load i8*, i8** %3
%41 = getelementptr inbounds i8, i8* %40, i32 1
store i8* %41, i8** %3
%42 = load i8, i8* %41
%43 = icmp ne i8 %42, 0
br i1 %43, label %44, label %45
44: ; preds = %39
br label %47
45: ; preds = %39
store i32 0, i32* %2
br label %51
46: ; preds = %34
br label %47
47: ; preds = %46, %44
%48 = load i8*, i8** %3
%49 = getelementptr inbounds i8, i8* %48, i32 1
store i8* %49, i8** %3
br label %13
50: ; preds = %13
store i32 0, i32* %2
br label %51
51: ; preds = %50, %45, %22, %9
%52 = load i32, i32* %2
ret i32 %52
}

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