int IsNumber(char *token) {
  int foundExponentSign = 0;
  int foundExponent = 0;
  int foundDec = 0;
  int foundDigit = 0;
  int isNumber = 1;
  int k;
  if (token[0] == '-' || token[0] == '+') {
    k = 1;
  } else {
    k = 0;
  }
  while (token[k] != '\0') {
    if (token[k] >= '0' && token[k] <= '9') {
      k++;
      foundDigit++;
    } else if (token[k] == '.' && foundDec == 0 && foundExponent == 0 &&
               foundExponentSign == 0) {
      foundDec = 1;
      k++;
    } else if ((token[k] == 'e' || token[k] == 'E') && foundExponent == 0 &&
               foundDigit > 0) {
      foundExponent = 1;
      k++;
    } else if ((token[k] == '-' || token[k] == '+') && foundExponent == 1 &&
               foundExponentSign == 0) {
      foundExponentSign = 1;
      k++;
    } else {
      isNumber = 0;
      break;
    }
  }
  return isNumber;
}


x86 assembly (clang, -O0):
<IsNumber>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movl   $0x0,-0xc(%rbp)
movl   $0x0,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
je     114b <IsNumber+0x4b>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    1157 <IsNumber+0x57>
movl   $0x1,-0x20(%rbp)
jmp    115e <IsNumber+0x5e>
movl   $0x0,-0x20(%rbp)
jmp    1163 <IsNumber+0x63>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
je     12c7 <IsNumber+0x1c7>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x30,%eax
jl     11b9 <IsNumber+0xb9>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x39,%eax
jg     11b9 <IsNumber+0xb9>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    12c2 <IsNumber+0x1c2>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x2e,%eax
jne    1201 <IsNumber+0x101>
cmpl   $0x0,-0x14(%rbp)
jne    1201 <IsNumber+0x101>
cmpl   $0x0,-0x10(%rbp)
jne    1201 <IsNumber+0x101>
cmpl   $0x0,-0xc(%rbp)
jne    1201 <IsNumber+0x101>
movl   $0x1,-0x14(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    12bd <IsNumber+0x1bd>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x65,%eax
je     122b <IsNumber+0x12b>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x45,%eax
jne    1254 <IsNumber+0x154>
cmpl   $0x0,-0x10(%rbp)
jne    1254 <IsNumber+0x154>
cmpl   $0x0,-0x18(%rbp)
jle    1254 <IsNumber+0x154>
movl   $0x1,-0x10(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    12b8 <IsNumber+0x1b8>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x2d,%eax
je     127e <IsNumber+0x17e>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x2b,%eax
jne    12a7 <IsNumber+0x1a7>
cmpl   $0x1,-0x10(%rbp)
jne    12a7 <IsNumber+0x1a7>
cmpl   $0x0,-0xc(%rbp)
jne    12a7 <IsNumber+0x1a7>
movl   $0x1,-0xc(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    12b3 <IsNumber+0x1b3>
movl   $0x0,-0x1c(%rbp)
jmp    12c7 <IsNumber+0x1c7>
jmp    12b8 <IsNumber+0x1b8>
jmp    12bd <IsNumber+0x1bd>
jmp    12c2 <IsNumber+0x1c2>
jmp    1163 <IsNumber+0x63>
mov    -0x1c(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<IsNumber>:
mov    (%rdi),%cl
add    $0xd5,%cl
xor    %eax,%eax
test   $0xfd,%cl
sete   %al
mov    (%rdi,%rax,1),%dl
test   %dl,%dl
je     11c1 <IsNumber+0xc1>
lea    (%rax,%rdi,1),%rcx
add    $0x1,%rcx
xor    %edi,%edi
xor    %r8d,%r8d
xor    %esi,%esi
xor    %r9d,%r9d
jmp    1142 <IsNumber+0x42>
nopl   0x0(%rax)
add    $0x1,%edi
movzbl (%rcx),%edx
add    $0x1,%rcx
test   %dl,%dl
je     11c1 <IsNumber+0xc1>
lea    -0x30(%rdx),%eax
cmp    $0x9,%al
jbe    1130 <IsNumber+0x30>
cmp    $0x2e,%dl
jne    1170 <IsNumber+0x70>
test   %r8d,%r8d
jne    1170 <IsNumber+0x70>
test   %esi,%esi
jne    1170 <IsNumber+0x70>
test   %r9d,%r9d
jne    1170 <IsNumber+0x70>
xor    %r9d,%r9d
mov    $0x1,%r8d
xor    %esi,%esi
jmp    1133 <IsNumber+0x33>
nopl   0x0(%rax)
cmp    $0x65,%dl
jne    1186 <IsNumber+0x86>
xor    %eax,%eax
test   %esi,%esi
jne    11c6 <IsNumber+0xc6>
mov    $0x1,%esi
test   %edi,%edi
jg     1133 <IsNumber+0x33>
jmp    11c6 <IsNumber+0xc6>
cmp    $0x45,%dl
jne    119a <IsNumber+0x9a>
test   %esi,%esi
jne    119a <IsNumber+0x9a>
test   %edi,%edi
jle    119a <IsNumber+0x9a>
mov    $0x1,%esi
jmp    1133 <IsNumber+0x33>
xor    %eax,%eax
cmp    $0x2d,%dl
je     11a6 <IsNumber+0xa6>
cmp    $0x2b,%dl
jne    11c6 <IsNumber+0xc6>
cmp    $0x1,%esi
jne    11c6 <IsNumber+0xc6>
mov    $0x1,%esi
test   %r9d,%r9d
mov    $0x1,%r9d
je     1133 <IsNumber+0x33>
jmp    11c6 <IsNumber+0xc6>
mov    $0x1,%eax
ret

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

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