void zap_comment(str, quoted) char *str;
int *quoted;
{
  char *p = str;
  while (*p) {
    if (*p == '"') {
      if (p == str || p[-1] != '\\') {
        *quoted = *quoted ? 0 : 1;
      }
    }
    if (*p == '#' && !*quoted) {
      int pos = p - str;
      if (pos == 0 ||
          ((p[-1]) == ' ' || (p[-1]) == '\t') && (pos == 1 || p[-2] != '\\')) {
        int len = strlen(p);
        if (len > 0 && p[len - 1] == '\n') {
          *p++ = '\n';
        }
        *p = '\0';
        break;
      }
    }
    ++p;
  }
}


x86 assembly (clang, -O0):
<zap_comment>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
cmpb   $0x0,(%rax)
je     1258 <zap_comment+0x148>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x22,%eax
jne    1182 <zap_comment+0x72>
mov    -0x18(%rbp),%rax
cmp    -0x8(%rbp),%rax
je     1164 <zap_comment+0x54>
mov    -0x18(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x5c,%eax
je     117d <zap_comment+0x6d>
mov    -0x10(%rbp),%rax
mov    (%rax),%edx
mov    $0x1,%ecx
xor    %eax,%eax
cmp    $0x0,%edx
cmovne %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
jmp    1182 <zap_comment+0x72>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x23,%eax
jne    1247 <zap_comment+0x137>
mov    -0x10(%rbp),%rax
cmpl   $0x0,(%rax)
jne    1247 <zap_comment+0x137>
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
je     11f4 <zap_comment+0xe4>
mov    -0x18(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x20,%eax
je     11d9 <zap_comment+0xc9>
mov    -0x18(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x9,%eax
jne    1242 <zap_comment+0x132>
cmpl   $0x1,-0x1c(%rbp)
je     11f4 <zap_comment+0xe4>
mov    -0x18(%rbp),%rax
movsbl -0x2(%rax),%eax
cmp    $0x5c,%eax
je     1242 <zap_comment+0x132>
mov    -0x18(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x20(%rbp)
cmpl   $0x0,-0x20(%rbp)
jle    1236 <zap_comment+0x126>
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0xa,%eax
jne    1236 <zap_comment+0x126>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0xa,(%rax)
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
jmp    1258 <zap_comment+0x148>
jmp    1247 <zap_comment+0x137>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1128 <zap_comment+0x18>
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<zap_comment>:
push   %r15
push   %r14
push   %rbx
mov    %rdi,%r15
xor    %ebx,%ebx
jmp    1124 <zap_comment+0x14>
nopl   0x0(%rax)
add    $0x1,%rbx
movzbl (%r15,%rbx,1),%eax
cmp    $0x22,%al
je     1140 <zap_comment+0x30>
test   %al,%al
je     11b1 <zap_comment+0xa1>
cmp    $0x23,%al
jne    1120 <zap_comment+0x10>
jmp    1160 <zap_comment+0x50>
nopl   0x0(%rax,%rax,1)
test   %rbx,%rbx
je     114d <zap_comment+0x3d>
cmpb   $0x5c,-0x1(%r15,%rbx,1)
je     1120 <zap_comment+0x10>
xor    %eax,%eax
cmpl   $0x0,(%rsi)
sete   %al
mov    %eax,(%rsi)
movzbl (%r15,%rbx,1),%eax
cmp    $0x23,%al
jne    1120 <zap_comment+0x10>
cmpl   $0x0,(%rsi)
jne    1120 <zap_comment+0x10>
test   %ebx,%ebx
je     1184 <zap_comment+0x74>
movzbl -0x1(%r15,%rbx,1),%eax
cmp    $0x20,%al
je     1177 <zap_comment+0x67>
cmp    $0x9,%al
jne    1120 <zap_comment+0x10>
cmp    $0x1,%ebx
je     1184 <zap_comment+0x74>
cmpb   $0x5c,-0x2(%r15,%rbx,1)
je     1120 <zap_comment+0x10>
lea    (%r15,%rbx,1),%r14
mov    %r14,%rdi
call   1030 <strlen@plt>
test   %eax,%eax
jle    11ad <zap_comment+0x9d>
add    $0xffffffff,%eax
add    %r15,%rax
cmpb   $0xa,(%rbx,%rax,1)
jne    11ad <zap_comment+0x9d>
lea    (%r15,%rbx,1),%r14
add    $0x1,%r14
movb   $0xa,(%r15,%rbx,1)
movb   $0x0,(%r14)
pop    %rbx
pop    %r14
pop    %r15
ret

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

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