char *BTSHASP_EatWhite(char *s) {
  int i;
  while (*s && (*s <= ' '))
    s++;
  if ((s[0] == '/') && (s[1] == '/')) {
    s += 2;
    while (*s && (*s != '\r') && (*s != '\n'))
      s++;
    s = BTSHASP_EatWhite(s);
    return (s);
  }
  if ((s[0] == '/') && (s[1] == '*')) {
    s += 2;
    i = 1;
    while (*s && (i > 0)) {
      if ((s[0] == '/') && (s[1] == '*')) {
        i++;
        s += 2;
        continue;
      }
      if ((s[0] == '*') && (s[1] == '/')) {
        i--;
        s += 2;
        continue;
      }
      s++;
    }
    s = BTSHASP_EatWhite(s);
    return (s);
  }
  return (s);
}


x86 assembly (clang, -O0):
<BTSHASP_EatWhite>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x15(%rbp)
je     1141 <BTSHASP_EatWhite+0x31>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
setle  %al
mov    %al,-0x15(%rbp)
mov    -0x15(%rbp),%al
test   $0x1,%al
jne    1151 <BTSHASP_EatWhite+0x41>
jmp    1162 <BTSHASP_EatWhite+0x52>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    111c <BTSHASP_EatWhite+0xc>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2f,%eax
jne    1204 <BTSHASP_EatWhite+0xf4>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x2f,%eax
jne    1204 <BTSHASP_EatWhite+0xf4>
mov    -0x10(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x16(%rbp)
je     11c9 <BTSHASP_EatWhite+0xb9>
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0xd,%ecx
mov    %al,-0x16(%rbp)
je     11c9 <BTSHASP_EatWhite+0xb9>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0xa,%eax
setne  %al
mov    %al,-0x16(%rbp)
mov    -0x16(%rbp),%al
test   $0x1,%al
jne    11d9 <BTSHASP_EatWhite+0xc9>
jmp    11ea <BTSHASP_EatWhite+0xda>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    118f <BTSHASP_EatWhite+0x7f>
mov    -0x10(%rbp),%rdi
call   1030 <BTSHASP_EatWhite@plt>
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    1310 <BTSHASP_EatWhite+0x200>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2f,%eax
jne    1308 <BTSHASP_EatWhite+0x1f8>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x2a,%eax
jne    1308 <BTSHASP_EatWhite+0x1f8>
mov    -0x10(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x10(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x17(%rbp)
je     1257 <BTSHASP_EatWhite+0x147>
cmpl   $0x0,-0x14(%rbp)
setg   %al
mov    %al,-0x17(%rbp)
mov    -0x17(%rbp),%al
test   $0x1,%al
jne    1267 <BTSHASP_EatWhite+0x157>
jmp    12ee <BTSHASP_EatWhite+0x1de>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2f,%eax
jne    12a2 <BTSHASP_EatWhite+0x192>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x2a,%eax
jne    12a2 <BTSHASP_EatWhite+0x192>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x10(%rbp)
jmp    1238 <BTSHASP_EatWhite+0x128>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2a,%eax
jne    12dd <BTSHASP_EatWhite+0x1cd>
mov    -0x10(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x2f,%eax
jne    12dd <BTSHASP_EatWhite+0x1cd>
mov    -0x14(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x10(%rbp)
jmp    1238 <BTSHASP_EatWhite+0x128>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1238 <BTSHASP_EatWhite+0x128>
mov    -0x10(%rbp),%rdi
call   1030 <BTSHASP_EatWhite@plt>
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    1310 <BTSHASP_EatWhite+0x200>
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<BTSHASP_EatWhite>:
mov    $0x2401,%esi
jmp    1110 <BTSHASP_EatWhite+0x10>
add    $0xfffffffffffffffe,%rdi
nopl   0x0(%rax,%rax,1)
mov    %rdi,%rax
mov    (%rdi),%cl
add    $0x1,%rdi
test   %cl,%cl
je     1122 <BTSHASP_EatWhite+0x22>
cmp    $0x21,%cl
jl     1110 <BTSHASP_EatWhite+0x10>
cmp    $0x2f,%cl
jne    11ea <BTSHASP_EatWhite+0xea>
mov    (%rdi),%cl
cmp    $0x2a,%cl
je     1170 <BTSHASP_EatWhite+0x70>
cmp    $0x2f,%cl
jne    11ea <BTSHASP_EatWhite+0xea>
add    $0x2,%rax
mov    %rax,%rdi
jmp    1154 <BTSHASP_EatWhite+0x54>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0x1,%rdi
movzbl (%rdi),%eax
cmp    $0xd,%rax
ja     1150 <BTSHASP_EatWhite+0x50>
bt     %rax,%rsi
jae    1150 <BTSHASP_EatWhite+0x50>
jmp    1110 <BTSHASP_EatWhite+0x10>
cs nopw 0x0(%rax,%rax,1)
nop
mov    0x2(%rax),%cl
add    $0x2,%rax
mov    %rax,%rdi
test   %cl,%cl
je     1110 <BTSHASP_EatWhite+0x10>
mov    $0x1,%edx
mov    %rax,%rdi
add    $0x2,%rdi
jmp    11a0 <BTSHASP_EatWhite+0xa0>
nopl   0x0(%rax)
movzbl -0x1(%rdi),%ecx
add    $0x1,%rdi
test   %cl,%cl
je     1107 <BTSHASP_EatWhite+0x7>
cmp    $0x2a,%cl
je     11c0 <BTSHASP_EatWhite+0xc0>
cmp    $0x2f,%cl
jne    1190 <BTSHASP_EatWhite+0x90>
movzbl -0x1(%rdi),%ecx
cmp    $0x2a,%cl
jne    1194 <BTSHASP_EatWhite+0x94>
jmp    11d0 <BTSHASP_EatWhite+0xd0>
cs nopw 0x0(%rax,%rax,1)
nop
movzbl -0x1(%rdi),%ecx
cmp    $0x2f,%cl
jne    1194 <BTSHASP_EatWhite+0x94>
mov    $0xffffffff,%eax
jmp    11d5 <BTSHASP_EatWhite+0xd5>
mov    $0x1,%eax
mov    (%rdi),%cl
test   %cl,%cl
je     1110 <BTSHASP_EatWhite+0x10>
add    %eax,%edx
test   %edx,%edx
jg     1186 <BTSHASP_EatWhite+0x86>
jmp    1110 <BTSHASP_EatWhite+0x10>
ret

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

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