char *com_parse(char **data_p) {
  int c;
  int len;
  char *data;
  static char com_token[128];
  data = *data_p;
  len = 0;
  com_token[0] = 0;
  if (!data) {
    *data_p = ((void *)0);
    return "";
  }
skipwhite:
  while ((c = *data) <= ' ') {
    if (c == 0) {
      *data_p = ((void *)0);
      return "";
    }
    data++;
  }
  if (c == '/' && data[1] == '/') {
    while (*data && *data != '\n') {
      data++;
    }
    goto skipwhite;
  }
  if (c == '\"') {
    data++;
    while (1) {
      c = *data++;
      if (c == '\"' || !c) {
        com_token[len] = 0;
        *data_p = data;
        return com_token;
      }
      if (len < 1024) {
        com_token[len] = c;
        len++;
      }
    }
  }
  do {
    if (len < 1024) {
      com_token[len] = c;
      len++;
    }
    data++;
    c = *data;
  } while (c > 32);
  if (len == 1024) {
    len = 0;
  }
  com_token[len] = 0;
  *data_p = data;
  return com_token;
}


x86 assembly (clang, -O0):
<com_parse>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x20(%rbp)
movl   $0x0,-0x18(%rbp)
movb   $0x0,0x2f0f(%rip)
cmpq   $0x0,-0x20(%rbp)
jne    1147 <com_parse+0x47>
mov    -0x10(%rbp),%rax
movq   $0x0,(%rax)
lea    0xec2(%rip),%rax
mov    %rax,-0x8(%rbp)
jmp    1323 <com_parse+0x223>
jmp    114c <com_parse+0x4c>
jmp    1151 <com_parse+0x51>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
mov    %eax,-0x14(%rbp)
cmp    $0x20,%eax
jg     119a <com_parse+0x9a>
cmpl   $0x0,-0x14(%rbp)
jne    1189 <com_parse+0x89>
mov    -0x10(%rbp),%rax
movq   $0x0,(%rax)
lea    0xe80(%rip),%rax
mov    %rax,-0x8(%rbp)
jmp    1323 <com_parse+0x223>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1151 <com_parse+0x51>
cmpl   $0x2f,-0x14(%rbp)
jne    1205 <com_parse+0x105>
mov    -0x20(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x2f,%eax
jne    1205 <com_parse+0x105>
jmp    11ba <com_parse+0xba>
mov    -0x20(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x21(%rbp)
je     11df <com_parse+0xdf>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
cmp    $0xa,%eax
setne  %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    11ef <com_parse+0xef>
jmp    1200 <com_parse+0x100>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    11ba <com_parse+0xba>
jmp    114c <com_parse+0x4c>
cmpl   $0x22,-0x14(%rbp)
jne    129c <com_parse+0x19c>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
movsbl (%rax),%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x22,-0x14(%rbp)
je     1244 <com_parse+0x144>
cmpl   $0x0,-0x14(%rbp)
jne    126e <com_parse+0x16e>
movslq -0x18(%rbp),%rcx
lea    0x2de1(%rip),%rax
movb   $0x0,(%rax,%rcx,1)
mov    -0x20(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
lea    0x2dcb(%rip),%rax
mov    %rax,-0x8(%rbp)
jmp    1323 <com_parse+0x223>
cmpl   $0x400,-0x18(%rbp)
jge    1297 <com_parse+0x197>
mov    -0x14(%rbp),%eax
mov    %al,%dl
movslq -0x18(%rbp),%rcx
lea    0x2da5(%rip),%rax
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    121b <com_parse+0x11b>
jmp    12a1 <com_parse+0x1a1>
cmpl   $0x400,-0x18(%rbp)
jge    12ca <com_parse+0x1ca>
mov    -0x14(%rbp),%eax
mov    %al,%dl
movslq -0x18(%rbp),%rcx
lea    0x2d72(%rip),%rax
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x20,-0x14(%rbp)
jg     12a1 <com_parse+0x1a1>
cmpl   $0x400,-0x18(%rbp)
jne    12fe <com_parse+0x1fe>
movl   $0x0,-0x18(%rbp)
movslq -0x18(%rbp),%rcx
lea    0x2d27(%rip),%rax
movb   $0x0,(%rax,%rcx,1)
mov    -0x20(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
lea    0x2d11(%rip),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<com_parse>:
mov    (%rdi),%rcx
movb   $0x0,0x2f26(%rip)
lea    0xeef(%rip),%rax
test   %rcx,%rcx
je     1163 <com_parse+0x63>
mov    (%rcx),%dl
cmp    $0x20,%dl
jg     1131 <com_parse+0x31>
nopl   (%rax)
test   %dl,%dl
je     1163 <com_parse+0x63>
movzbl 0x1(%rcx),%edx
add    $0x1,%rcx
cmp    $0x21,%dl
jl     1120 <com_parse+0x20>
cmp    $0x2f,%dl
jne    1169 <com_parse+0x69>
cmpb   $0x2f,0x1(%rcx)
jne    11a2 <com_parse+0xa2>
mov    $0x2f,%dl
test   %dl,%dl
je     1118 <com_parse+0x18>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
cmp    $0xa,%dl
je     1118 <com_parse+0x18>
movzbl 0x1(%rcx),%edx
add    $0x1,%rcx
test   %dl,%dl
jne    1150 <com_parse+0x50>
jmp    1118 <com_parse+0x18>
xor    %ecx,%ecx
mov    %rcx,(%rdi)
ret
cmp    $0x22,%dl
jne    11a2 <com_parse+0xa2>
add    $0x1,%rcx
xor    %eax,%eax
lea    0x2eb5(%rip),%r8
nopl   0x0(%rax,%rax,1)
movzbl (%rcx),%edx
test   %dl,%dl
je     11de <com_parse+0xde>
cmp    $0x22,%dl
je     11de <com_parse+0xde>
add    $0x1,%rcx
cmp    $0x3ff,%eax
ja     1180 <com_parse+0x80>
mov    %eax,%esi
mov    %dl,(%rsi,%r8,1)
add    $0x1,%eax
jmp    1180 <com_parse+0x80>
xor    %esi,%esi
lea    0x2e85(%rip),%r8
jmp    11bd <com_parse+0xbd>
nopl   (%rax)
movzbl 0x1(%rcx),%edx
add    $0x1,%rcx
cmp    $0x20,%dl
jle    11d1 <com_parse+0xd1>
cmp    $0x3ff,%esi
jg     11b0 <com_parse+0xb0>
movslq %esi,%rax
mov    %dl,(%rax,%r8,1)
add    $0x1,%esi
jmp    11b0 <com_parse+0xb0>
xor    %eax,%eax
cmp    $0x400,%esi
cmovne %esi,%eax
jmp    11e2 <com_parse+0xe2>
add    $0x1,%rcx
movslq %eax,%rdx
lea    0x2e44(%rip),%rax
movb   $0x0,(%rdx,%rax,1)
mov    %rcx,(%rdi)
ret

LLVM IR (-O0):
@com_parse.com_token = internal global [128 x i8] zeroinitializer
@.str = [1 x i8] zeroinitializer
define i8* @com_parse(i8** %0) {
%2 = alloca i8*
%3 = alloca i8**
%4 = alloca i32
%5 = alloca i32
%6 = alloca i8*
store i8** %0, i8*** %3
%7 = load i8**, i8*** %3
%8 = load i8*, i8** %7
store i8* %8, i8** %6
store i32 0, i32* %5
store i8 0, i8* getelementptr inbounds ([128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 0)
%9 = load i8*, i8** %6
%10 = icmp ne i8* %9, null
br i1 %10, label %13, label %11
11: ; preds = %1
%12 = load i8**, i8*** %3
store i8* null, i8** %12
store i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0), i8** %2
br label %119
13: ; preds = %1
br label %14
14: ; preds = %53, %13
br label %15
15: ; preds = %25, %14
%16 = load i8*, i8** %6
%17 = load i8, i8* %16
%18 = sext i8 %17 to i32
store i32 %18, i32* %4
%19 = icmp sle i32 %18, 32
br i1 %19, label %20, label %28
20: ; preds = %15
%21 = load i32, i32* %4
%22 = icmp eq i32 %21, 0
br i1 %22, label %23, label %25
23: ; preds = %20
%24 = load i8**, i8*** %3
store i8* null, i8** %24
store i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0), i8** %2
br label %119
25: ; preds = %20
%26 = load i8*, i8** %6
%27 = getelementptr inbounds i8, i8* %26, i32 1
store i8* %27, i8** %6
br label %15
28: ; preds = %15
%29 = load i32, i32* %4
%30 = icmp eq i32 %29, 47
br i1 %30, label %31, label %54
31: ; preds = %28
%32 = load i8*, i8** %6
%33 = getelementptr inbounds i8, i8* %32, i64 1
%34 = load i8, i8* %33
%35 = sext i8 %34 to i32
%36 = icmp eq i32 %35, 47
br i1 %36, label %37, label %54
37: ; preds = %31
br label %38
38: ; preds = %50, %37
%39 = load i8*, i8** %6
%40 = load i8, i8* %39
%41 = sext i8 %40 to i32
%42 = icmp ne i32 %41, 0
br i1 %42, label %43, label %48
43: ; preds = %38
%44 = load i8*, i8** %6
%45 = load i8, i8* %44
%46 = sext i8 %45 to i32
%47 = icmp ne i32 %46, 10
br label %48
48: ; preds = %43, %38
%49 = phi i1 [ false, %38 ], [ %47, %43 ]
br i1 %49, label %50, label %53
50: ; preds = %48
%51 = load i8*, i8** %6
%52 = getelementptr inbounds i8, i8* %51, i32 1
store i8* %52, i8** %6
br label %38
53: ; preds = %48
br label %14
54: ; preds = %31, %28
%55 = load i32, i32* %4
%56 = icmp eq i32 %55, 34
br i1 %56, label %57, label %88
57: ; preds = %54
%58 = load i8*, i8** %6
%59 = getelementptr inbounds i8, i8* %58, i32 1
store i8* %59, i8** %6
br label %60
60: ; preds = %57, %87
%61 = load i8*, i8** %6
%62 = getelementptr inbounds i8, i8* %61, i32 1
store i8* %62, i8** %6
%63 = load i8, i8* %61
%64 = sext i8 %63 to i32
store i32 %64, i32* %4
%65 = load i32, i32* %4
%66 = icmp eq i32 %65, 34
br i1 %66, label %70, label %67
67: ; preds = %60
%68 = load i32, i32* %4
%69 = icmp ne i32 %68, 0
br i1 %69, label %76, label %70
70: ; preds = %67, %60
%71 = load i32, i32* %5
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %72
store i8 0, i8* %73
%74 = load i8*, i8** %6
%75 = load i8**, i8*** %3
store i8* %74, i8** %75
store i8* getelementptr inbounds ([128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 0), i8** %2
br label %119
76: ; preds = %67
%77 = load i32, i32* %5
%78 = icmp slt i32 %77, 1024
br i1 %78, label %79, label %87
79: ; preds = %76
%80 = load i32, i32* %4
%81 = trunc i32 %80 to i8
%82 = load i32, i32* %5
%83 = sext i32 %82 to i64
%84 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %83
store i8 %81, i8* %84
%85 = load i32, i32* %5
%86 = add nsw i32 %85, 1
store i32 %86, i32* %5
br label %87
87: ; preds = %79, %76
br label %60
88: ; preds = %54
br label %89
89: ; preds = %106, %88
%90 = load i32, i32* %5
%91 = icmp slt i32 %90, 1024
br i1 %91, label %92, label %100
92: ; preds = %89
%93 = load i32, i32* %4
%94 = trunc i32 %93 to i8
%95 = load i32, i32* %5
%96 = sext i32 %95 to i64
%97 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %96
store i8 %94, i8* %97
%98 = load i32, i32* %5
%99 = add nsw i32 %98, 1
store i32 %99, i32* %5
br label %100
100: ; preds = %92, %89
%101 = load i8*, i8** %6
%102 = getelementptr inbounds i8, i8* %101, i32 1
store i8* %102, i8** %6
%103 = load i8*, i8** %6
%104 = load i8, i8* %103
%105 = sext i8 %104 to i32
store i32 %105, i32* %4
br label %106
106: ; preds = %100
%107 = load i32, i32* %4
%108 = icmp sgt i32 %107, 32
br i1 %108, label %89, label %109
109: ; preds = %106
%110 = load i32, i32* %5
%111 = icmp eq i32 %110, 1024
br i1 %111, label %112, label %113
112: ; preds = %109
store i32 0, i32* %5
br label %113
113: ; preds = %112, %109
%114 = load i32, i32* %5
%115 = sext i32 %114 to i64
%116 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %115
store i8 0, i8* %116
%117 = load i8*, i8** %6
%118 = load i8**, i8*** %3
store i8* %117, i8** %118
store i8* getelementptr inbounds ([128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 0), i8** %2
br label %119
119: ; preds = %113, %70, %23, %11
%120 = load i8*, i8** %2
ret i8* %120
}

LLVM IR (-O2):
@com_parse.com_token = internal global [128 x i8] zeroinitializer
@.str = [1 x i8] zeroinitializer
define i8* @com_parse(i8** nocapture %0) {
%2 = load i8*, i8** %0
store i8 0, i8* getelementptr inbounds ([128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 0)
%3 = icmp eq i8* %2, null
br i1 %3, label %70, label %4
4: ; preds = %1
%5 = load i8, i8* %2
br label %7
6: ; preds = %27, %27
br label %7
7: ; preds = %6, %4
%8 = phi i8 [ %5, %4 ], [ %28, %6 ]
%9 = phi i8* [ %2, %4 ], [ %29, %6 ]
%10 = icmp slt i8 %8, 33
br i1 %10, label %11, label %19
11: ; preds = %7, %15
%12 = phi i8 [ %17, %15 ], [ %8, %7 ]
%13 = phi i8* [ %16, %15 ], [ %9, %7 ]
%14 = icmp eq i8 %12, 0
br i1 %14, label %70, label %15
15: ; preds = %11
%16 = getelementptr inbounds i8, i8* %13, i64 1
%17 = load i8, i8* %16
%18 = icmp slt i8 %17, 33
br i1 %18, label %11, label %19
19: ; preds = %15, %7
%20 = phi i8 [ %8, %7 ], [ %17, %15 ]
%21 = phi i8* [ %9, %7 ], [ %16, %15 ]
switch i8 %20, label %26 [
i8 47, label %22
i8 34, label %33
]
22: ; preds = %19
%23 = getelementptr inbounds i8, i8* %21, i64 1
%24 = load i8, i8* %23
%25 = icmp eq i8 %24, 47
br i1 %25, label %27, label %26
26: ; preds = %19, %22
br label %48
27: ; preds = %22, %30
%28 = phi i8 [ %32, %30 ], [ 47, %22 ]
%29 = phi i8* [ %31, %30 ], [ %21, %22 ]
switch i8 %28, label %30 [
i8 0, label %6
i8 10, label %6
]
30: ; preds = %27
%31 = getelementptr inbounds i8, i8* %29, i64 1
%32 = load i8, i8* %31
br label %27
33: ; preds = %19
%34 = getelementptr inbounds i8, i8* %21, i64 1
br label %35
35: ; preds = %44, %33
%36 = phi i32 [ %47, %44 ], [ 0, %33 ]
%37 = phi i8* [ %41, %44 ], [ %34, %33 ]
%38 = icmp ult i32 %36, 1024
br label %39
39: ; preds = %35, %43
%40 = phi i8* [ %41, %43 ], [ %37, %35 ]
%41 = getelementptr inbounds i8, i8* %40, i64 1
%42 = load i8, i8* %40
switch i8 %42, label %43 [
i8 34, label %65
i8 0, label %65
]
43: ; preds = %39
br i1 %38, label %44, label %39
44: ; preds = %43
%45 = zext i32 %36 to i64
%46 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %45
store i8 %42, i8* %46
%47 = add nuw nsw i32 %36, 1
br label %35
48: ; preds = %26, %57
%49 = phi i8 [ %60, %57 ], [ %20, %26 ]
%50 = phi i32 [ %58, %57 ], [ 0, %26 ]
%51 = phi i8* [ %59, %57 ], [ %21, %26 ]
%52 = icmp slt i32 %50, 1024
br i1 %52, label %53, label %57
53: ; preds = %48
%54 = sext i32 %50 to i64
%55 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %54
store i8 %49, i8* %55
%56 = add nsw i32 %50, 1
br label %57
57: ; preds = %53, %48
%58 = phi i32 [ %56, %53 ], [ %50, %48 ]
%59 = getelementptr inbounds i8, i8* %51, i64 1
%60 = load i8, i8* %59
%61 = icmp sgt i8 %60, 32
br i1 %61, label %48, label %62
62: ; preds = %57
%63 = icmp eq i32 %58, 1024
%64 = select i1 %63, i32 0, i32 %58
br label %65
65: ; preds = %39, %39, %62
%66 = phi i32 [ %64, %62 ], [ %36, %39 ], [ %36, %39 ]
%67 = phi i8* [ %59, %62 ], [ %41, %39 ], [ %41, %39 ]
%68 = sext i32 %66 to i64
%69 = getelementptr inbounds [128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 %68
store i8 0, i8* %69
br label %70
70: ; preds = %11, %65, %1
%71 = phi i8* [ null, %1 ], [ %67, %65 ], [ null, %11 ]
%72 = phi i8* [ getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0), %1 ], [ getelementptr inbounds ([128 x i8], [128 x i8]* @com_parse.com_token, i64 0, i64 0), %65 ], [ getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0), %11 ]
store i8* %71, i8** %0
ret i8* %72
}